diff --git a/src/z2ui5_cl_demo_app_192.clas.abap b/src/z2ui5_cl_demo_app_192.clas.abap index da2601ad..bdf98564 100644 --- a/src/z2ui5_cl_demo_app_192.clas.abap +++ b/src/z2ui5_cl_demo_app_192.clas.abap @@ -10,17 +10,19 @@ CLASS z2ui5_cl_demo_app_192 DEFINITION PUBLIC. value TYPE string, tabname TYPE char30, comp TYPE abap_componentdescr, - END OF ty_S_key_value, + END OF ty_s_key_value, ty_t_key_values TYPE STANDARD TABLE OF ty_s_key_value WITH EMPTY KEY. - TYPES: BEGIN OF ty_s_merged_Data, + TYPES: BEGIN OF ty_s_merged_data, t_kopf TYPE REF TO data, t_pos TYPE REF TO data, - t_keyva TYPE ty_T_KEY_VALUEs, - END OF ty_S_merged_Data, - ty_t_merged_Data TYPE STANDARD TABLE OF ty_s_merged_Data WITH EMPTY KEY. + t_keyva TYPE ty_t_key_values, + END OF ty_s_merged_data, + ty_t_merged_data TYPE STANDARD TABLE OF ty_s_merged_data WITH EMPTY KEY. - DATA mt_new_data TYPE ty_t_merged_data. +* DATA mt_new_data TYPE ty_t_merged_data. + + DATA mt_new_data2 TYPE STANDARD TABLE OF REF TO z2ui5_cl_demo_app_193 WITH EMPTY KEY. TYPES: BEGIN OF ty_s_out, @@ -70,10 +72,12 @@ CLASS z2ui5_cl_demo_app_192 IMPLEMENTATION. METHOD z2ui5_if_app~main. me->client = client. + get_data( ). + ui5_display( ). - get_DATA( ). +* DATA(lv_stringify) = z2ui5_cl_util_api=>xml_srtti_stringify( data = mt_new_data2 ). - ui5_display( ). +* DATA(lr_result) = z2ui5_cl_util_api=>xml_srtti_parse( rtti_data = lv_stringify ). ENDMETHOD. @@ -93,16 +97,19 @@ CLASS z2ui5_cl_demo_app_192 IMPLEMENTATION. LOOP AT kopf->* ASSIGNING . - APPEND INITIAL LINE TO mt_new_data ASSIGNING FIELD-SYMBOL(). +* APPEND INITIAL LINE TO mt_new_data ASSIGNING FIELD-SYMBOL(). + DATA(lo_new_data) = NEW z2ui5_cl_demo_app_193( ). + INSERT lo_new_data INTO TABLE mt_new_data2. lr_structdescr ?= cl_abap_structdescr=>describe_by_data( ). lr_tabdescr ?= cl_abap_tabledescr=>create( p_line_type = lr_structdescr ). - CREATE DATA -t_kopf TYPE HANDLE lr_tabdescr. - ASSIGN -t_kopf->* TO . + CREATE DATA lo_new_data->mt_kopf TYPE HANDLE lr_tabdescr. + ASSIGN lo_new_data->mt_kopf->* TO . APPEND INITIAL LINE TO ASSIGNING . - = CORRESPONDING #( ). + = CORRESPONDING #( ). +* = CORRESPONDING #( ). ENDLOOP. diff --git a/src/z2ui5_cl_demo_app_192.clas.locals_imp.abap b/src/z2ui5_cl_demo_app_192.clas.locals_imp.abap new file mode 100644 index 00000000..6ba7b134 --- /dev/null +++ b/src/z2ui5_cl_demo_app_192.clas.locals_imp.abap @@ -0,0 +1,23 @@ +*"* use this source file for the definition and implementation of +*"* local helper classes, interface definitions and type +*"* declarations +class lcl_merged_data DEFINITION. + +PUBLIC SECTION. + + TYPES: BEGIN OF ty_s_key_value, + fname TYPE char30, + value TYPE string, + tabname TYPE char30, + comp TYPE abap_componentdescr, + END OF ty_s_key_value, + ty_t_key_values TYPE STANDARD TABLE OF ty_s_key_value WITH EMPTY KEY. + + TYPES: BEGIN OF ty_s_merged_data, + t_kopf TYPE REF TO data, + t_pos TYPE REF TO data, + t_keyva TYPE ty_t_key_values, + END OF ty_s_merged_data. + + +endclass. diff --git a/src/z2ui5_cl_demo_app_193.clas.abap b/src/z2ui5_cl_demo_app_193.clas.abap new file mode 100644 index 00000000..9484f399 --- /dev/null +++ b/src/z2ui5_cl_demo_app_193.clas.abap @@ -0,0 +1,26 @@ +CLASS z2ui5_cl_demo_app_193 DEFINITION PUBLIC. + + PUBLIC SECTION. + + TYPES: + BEGIN OF ty_s_key_value, + fname TYPE char30, + value TYPE string, + tabname TYPE char30, + comp TYPE abap_componentdescr, + END OF ty_s_key_value, + ty_t_key_values TYPE STANDARD TABLE OF ty_s_key_value WITH EMPTY KEY. + + DATA: + mt_kopf TYPE REF TO data, + mt_pos TYPE REF TO data, + mt_keyva TYPE ty_t_key_values. + + PROTECTED SECTION. + PRIVATE SECTION. +ENDCLASS. + +CLASS z2ui5_cl_demo_app_193 IMPLEMENTATION. + + +ENDCLASS. diff --git a/src/z2ui5_cl_demo_app_193.clas.locals_imp.abap b/src/z2ui5_cl_demo_app_193.clas.locals_imp.abap new file mode 100644 index 00000000..6ba7b134 --- /dev/null +++ b/src/z2ui5_cl_demo_app_193.clas.locals_imp.abap @@ -0,0 +1,23 @@ +*"* use this source file for the definition and implementation of +*"* local helper classes, interface definitions and type +*"* declarations +class lcl_merged_data DEFINITION. + +PUBLIC SECTION. + + TYPES: BEGIN OF ty_s_key_value, + fname TYPE char30, + value TYPE string, + tabname TYPE char30, + comp TYPE abap_componentdescr, + END OF ty_s_key_value, + ty_t_key_values TYPE STANDARD TABLE OF ty_s_key_value WITH EMPTY KEY. + + TYPES: BEGIN OF ty_s_merged_data, + t_kopf TYPE REF TO data, + t_pos TYPE REF TO data, + t_keyva TYPE ty_t_key_values, + END OF ty_s_merged_data. + + +endclass. diff --git a/src/z2ui5_cl_demo_app_193.clas.xml b/src/z2ui5_cl_demo_app_193.clas.xml new file mode 100644 index 00000000..96f32cd0 --- /dev/null +++ b/src/z2ui5_cl_demo_app_193.clas.xml @@ -0,0 +1,16 @@ + + + + + + Z2UI5_CL_DEMO_APP_193 + E + data container + 1 + X + X + X + + + +