FUNCTION?ZAZ_CLEAR_SPECIAL_CHAR.
*"----------------------------------------------------------------------
*"*"本地接口：
*"??IMPORTING
*"?????REFERENCE(I_CHAR)?TYPE??/SAPDMC/TEXT60
*"??EXPORTING
*"?????REFERENCE(E_CHAR)?TYPE??/SAPDMC/TEXT60
*"----------------------------------------------------------------------
??DATA:?l_strlen?TYPE?i,
????????l_offset?TYPE?i,
????????cr(2)????TYPE?c,
????????lv_subrc?TYPE?i.

??DATA?lv_char?TYPE?/SAPDMC/TEXT60.

*??MOVE?'!'?TO?cr.

??l_strlen?=?STRLEN(?i_char?).

??IF?l_strlen?GT?0.

*????DO?l_strlen?TIMES.
*??????IF?i_char+l_offset(1)?<?''.
*????????i_char+l_offset(1)?=?'?'.
*??????ENDIF.
*??????ADD?1?TO?l_offset.
*????ENDDO.

??ENDIF.

??MOVE?i_char?TO?lv_char.
??TRANSLATE?lv_char?TO?UPPER?CASE.
??REPLACE?ALL?OCCURRENCES?OF?'#'?IN?lv_char?WITH?space.
??REPLACE?ALL?OCCURRENCES?OF?'!'?IN?lv_char?WITH?space.
*??REPLACE?ALL?OCCURRENCES?OF?'&'?IN?lv_char?WITH?space.
*??REPLACE?ALL?OCCURRENCES?OF?''''?IN?lv_char?WITH?space.
*??REPLACE?ALL?OCCURRENCES?OF?'>'?IN?lv_char?WITH?space.
*??REPLACE?ALL?OCCURRENCES?OF?'['?IN?lv_char?WITH?space.

??REPLACE?ALL?OCCURRENCES?OF?cl_abap_char_utilities=>cr_lf?IN?lv_char?WITH?space.
??REPLACE?ALL?OCCURRENCES?OF?cl_abap_char_utilities=>newline?IN?lv_char?WITH?space.
??REPLACE?ALL?OCCURRENCES?OF?cl_abap_char_utilities=>horizontal_tab?IN?lv_char?WITH?space.
??????REPLACE?ALL?OCCURRENCES?OF?CL_ABAP_CHAR_UTILITIES=>VERTICAL_TAB
??????IN?lv_char?WITH?''.
??????REPLACE?ALL?OCCURRENCES?OF?CL_ABAP_CHAR_UTILITIES=>FORM_FEED?IN
??????lv_char?WITH?''.
??????REPLACE?ALL?OCCURRENCES?OF?CL_ABAP_CHAR_UTILITIES=>BACKSPACE?IN
??????lv_char?WITH?''.

*??CALL?FUNCTION?'RSKC_CHAVL_CHECK'
*????EXPORTING
*??????i_chavl?????=?lv_char
*????IMPORTING
*??????e_err_subrc?=?lv_subrc.
*
*??IF?lv_subrc?EQ?4.
*????e_char?=?''.
*??ELSE.
????MOVE?lv_char?TO?e_char.

ENDFUNCTION.

總結

以上是生活随笔為你收集整理的我做的去除乱码FM的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。