[abap] conversion hexa code in xstring field. 필드 내 특수문자 헥사코드값 변경하기

DATA: hex1(1) TYPE x VALUE 'A0'.

DATA: hex2(1) TYPE x VALUE '20'.

DATA: uhex1(2) TYPE x VALUE '00A0'.

DATA: uhex2(2) TYPE x VALUE '0020'.

DATA: char1(1) TYPE c.

 

DATA: test_string TYPE string VALUE 'Stuff in here'.

DATA: test_xstring TYPE xstring.

 

****Convert the Character String to Binary String

CALL FUNCTION 'SCMS_STRING_TO_XSTRING'

EXPORTING

text = test_string

IMPORTING

buffer = test_xstring.

 

IF cl_abap_char_utilities=>charsize = 1.

REPLACE ALL OCCURENCES OF hex1 IN test_xstring WITH hex2 IN BYTE MODE.

ELSE.

REPLACE ALL OCCURENCES OF uhex1 IN test_xstring WITH uhex2 IN BYTE MODE.

ENDIF.

 

CLEAR test_string.

 

DATA:

convin TYPE REF TO cl_abap_conv_in_ce.

CALL METHOD cl_abap_conv_in_ce=>create

EXPORTING

input = test_xstring

RECEIVING

conv = convin.

 

CALL METHOD convin->read

IMPORTING

data = test_string.

 

WRITE: / test_string.