Hi Murali,
View the code.
REPORT ytest NO STANDARD PAGE HEADING.
DATA: lv_text(30) VALUE 'Ramesh#',
lv_find TYPE c,
lv_lines TYPE i,
lv_result(30) TYPE c.
SEARCH lv_text FOR '#'.
IF sy-subrc IS INITIAL.
lv_lines = strlen( lv_text ).
DO lv_lines TIMES.
IF sy-index = '1'.
lv_find = lv_text(01).
IF lv_find NE '#'.
CONCATENATE lv_result lv_find INTO lv_result.
ENDIF.
ENDIF.
lv_find = lv_text+sy-index(01).
IF lv_find NE '#'.
CONCATENATE lv_result lv_find INTO lv_result.
ENDIF.
ENDDO.
WRITE lv_result.
ENDIF.
Hope it helpful.
Regards,
Venkat.