ABAP Json数据的转换
Json数据的转换
前言
由于接口中所传输的数据都为json格式的字符串,所以我们需要把数据从结构或者表转换成json字符串的格式.一、/UI2/CL_JSON
二、示例
代码如下(示例):
REPORT ZTEST_ZJ001.
TYPES:BEGIN OF TY_DATA,
NAME TYPE STRING,
CODE TYPE STRING,
END OF TY_DATA.
DATA:LS_DATA TYPE TY_DATA,
LT_DATA TYPE TABLE OF TY_DATA,
lv_json type string.
types:begin of ty_data2,
type type string,
tab like lt_data,
end of ty_data2.
data:ls_data2 type ty_data2,
lt_data2 type table of ty_data2.
LS_DATA-NAME = 'ZJ'.
LS_DATA-CODE = '001'.
append LS_DATA to LT_DATA.
ls_data2-type = 'S'.
ls_data2-tab = lt_data.
lv_json = /ui2/cl_json=>serialize( data = ls_data2 compress = abap_true pretty_name = /ui2/cl_json=>pretty_mode-camel_case ).
clear:ls_data2.
/ui2/cl_json=>deserialize( EXPORTING json = lv_json pretty_name = /ui2/cl_json=>pretty_mode-camel_case CHANGING data = ls_data2 ).
write lv_json.
post SAP-Garson
原文链接:https://blog.csdn.net/weixin_46659407/article/details/109493754文章来自于网络,如果侵犯了您的权益,请联系站长删除!