ABAP-获取未知内表转json数据的某个字段信息
TYPES:BEGIN OF gty_data1,
index TYPE i,
pernr TYPE pa0001-pernr,
name TYPE pa0002-nachn,
sex TYPE char2,
phone TYPE usrid,
END OF gty_data1,
BEGIN OF gty_data2,
index TYPE i,
pernr TYPE pa0001-pernr,
phone TYPE usrid,
END OF gty_data2,
BEGIN OF gty_data3,
index TYPE string,
pernr TYPE string,
name TYPE string,
sex TYPE string,
phone TYPE string,
END OF gty_data3.
DATA:gt_data1 TYPE TABLE OF gty_data1,
gt_data2 TYPE TABLE OF gty_data2,
gt_data3 TYPE TABLE OF gty_data3,
gt_fcat TYPE lvc_t_fcat.
DATA:gs_data1 TYPE gty_data1,
gs_data2 TYPE gty_data2,
gs_data3 TYPE gty_data3,
gs_fcat TYPE lvc_s_fcat.
DATA:serializer TYPE REF TO cl_trex_json_serializer,
deserializer TYPE REF TO cl_trex_json_deserializer,
ref_descr TYPE REF TO cl_abap_structdescr.
DATA:gv_json TYPE string.
FIELD-SYMBOLS:<dyn_tab> TYPE STANDARD TABLE.
START-OF-SELECTION.
PERFORM frm_sc_data."生产数据
PERFORM frm_sc_json."生产json数据
PERFORM frm_get_data."生成动态内表,
PERFORM frm_display_data."获取想要数据,显示数据
END-OF-SELECTION.
*&---------------------------------------------------------------------*
*& Form FRM_SC_DATA
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------