ASCII

REPORT z_barry_test_ascii .

 

*** 字母到对应的ASCII码

DATA : c.
FIELD-SYMBOLS : TYPE x.
DATA : rn TYPE i.
c = 'A'.
ASSIGN c TO CASTING.
MOVE TO rn.
WRITE rn.

 

*** ASCII到字母

DATA : i TYPE i VALUE 66.
DATA : x TYPE x.
FIELD-SYMBOLS : TYPE c.
MOVE i TO x.
ASSIGN x TO CASTING TYPE c.
MOVE TO c.
WRITE c.

 

 

ECC6

----------------------------------------------

REPORT  z_barry_test_ascii.

 

DATA: str TYPE string ,
      xstr TYPE xstring,
      l_con TYPE REF TO cl_rpe_convert .

 

START-OF-SELECTION.

  CREATE OBJECT l_con.

  CALL METHOD l_con->string_to_xstring
    EXPORTING
      input  = 'ABC'
    IMPORTING
      output = xstr.

  CALL METHOD l_con->xstring_to_string
    EXPORTING
      input  = '4261727279'
    IMPORTING
      output = str.

  WRITE / :  xstr ,str.