前臺給我們返回的是加密過的json文件罚攀,需要我們先解碼,在json轉(zhuǎn)table
和json相關(guān)的內(nèi)表字段建議都定義char類型
DATA: lv_message TYPE string.
DATA: lv_xstring TYPE xstring.
DATA: lv_string TYPE string.
TYPES: BEGIN OF ty_data,
guid TYPE char32, "/bshm/api_reqid_de, " (32)
status(10),
END OF ty_data.
DATA: lv_guid TYPE /bshm/api_reqid_de.
DATA lw_message TYPE ty_data.
lv_string = message .
" BASE64 Decode
CALL FUNCTION 'SCMS_BASE64_DECODE_STR'
EXPORTING
input = lv_string
* UNESCAPE = 'X'
IMPORTING
output = lv_xstring
EXCEPTIONS
failed = 1
OTHERS = 2.
" Convert xstring to string
CALL FUNCTION 'HR_KR_XSTRING_TO_STRING'
EXPORTING
from_codepage = '4110'
in_xstring = lv_xstring
* OUT_LEN =
IMPORTING
out_string = lv_message.
/ui2/cl_json=>deserialize( EXPORTING json = lv_message CHANGING data = lw_message ).