Re: handle invalid char at end of text

below code is working fine

*DATA : INT_VAR TYPE /BI0/OIPOSTXT.

    DATA : INT_VAR(50) TYPE c.

    DATA : str_var1(60) TYPE c.

    DATA : var2 TYPE i.

    DATA : var3 TYPE i.

    DATA : var4 TYPE i.

    DATA : str_var6(60) TYPE c.

    DATA : length TYPE i.



    MOVE SOURCE_FIELDS-SGTXT TO INT_VAR.



    TRANSLATE int_var TO UPPER CASE .



    length = STRLEN( int_var ).

*DO length TIMES.

*  IF int_var CN

    WHILE int_var CN

    ',<>?/\:;"''ABCDEFGHI JKLMNOPQRSTUVWXYZ!%^&*()__+=1234567890' .

      IF sy-fdpos IS INITIAL.

        CLEAR str_var1.

      ELSE.

        str_var1 = int_var+0(sy-fdpos).

      ENDIF.

      var2 = STRLEN( int_var ).

      var3 = sy-fdpos + 1.

      var4 = var2 - var3.

      IF var4 EQ 0.

*        str_var6 = int_var+sy-fdpos.

        CLEAR str_var6.

      ELSE.

        str_var6 = int_var+var3(var4).

      ENDIF.

      CONCATENATE str_var1 str_var6 INTO RESULT.

*  ELSE.

*    RESULT = int_var.

*  ENDIF.

      int_var = RESULT.

    ENDWHILE.

*ENDDO.

    RESULT = int_var.