[Function] BASE64 ENCODE/DECODE

SCMS_BASE64_ENCODE_STR

SCMS_BASE64_DECODE_STR

 

# 사용예시

DATA: LV_XSTRING TYPE XSTRING,
      LV_STRING TYPE STRING.


"string to xstring
LV_XSTRING = CL_BCS_CONVERT=>STRING_TO_XSTRING( '문자열' ).


CALL FUNCTION 'SCMS_BASE64_ENCODE_STR'
  EXPORTING
    INPUT         = LV_XSTRING
  IMPORTING
    OUTPUT        = LV_STRING
          .

WRITE:/ LV_STRING.



CALL FUNCTION 'SCMS_BASE64_DECODE_STR'
  exporting
    INPUT    = LV_STRING
*    UNESCAPE = 'X'
   importing
     OUTPUT   = LV_XSTRING
*  exceptions
*    FAILED   = 1
*    OTHERS   = 2
  .
if sy-subrc <> 0.
* message id sy-msgid type sy-msgty number sy-msgno
*            with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.


"xstring to string
WRITE:/ CL_BCS_CONVERT=>XSTRING_TO_STRING( IV_XSTR   = LV_XSTRING
                                           IV_CP     = '4110'      ##utf-8 ).