diff --git a/src/z2ui5_cl_demo_app_000.clas.abap b/src/z2ui5_cl_demo_app_000.clas.abap index c51560e5..8134ba11 100644 --- a/src/z2ui5_cl_demo_app_000.clas.abap +++ b/src/z2ui5_cl_demo_app_000.clas.abap @@ -1958,7 +1958,12 @@ CLASS z2ui5_cl_demo_app_000 IMPLEMENTATION. mode = 'LineMode' class = 'sapUiTinyMarginEnd sapUiTinyMarginBottom' ). - + panel->generic_tile( header = 'Model VIIII' + subheader = 'RTTI Data - Struc/Table and Class Data and Popup' + press = client->_event( 'Z2UI5_CL_DEMO_APP_337' ) + mode = 'LineMode' + class = 'sapUiTinyMarginEnd sapUiTinyMarginBottom' + ). panel->generic_tile( header = 'Date Format Error in internal table' subheader = '' diff --git a/src/z2ui5_cl_demo_app_337.clas.abap b/src/z2ui5_cl_demo_app_337.clas.abap index 8d924f0d..68b35000 100644 --- a/src/z2ui5_cl_demo_app_337.clas.abap +++ b/src/z2ui5_cl_demo_app_337.clas.abap @@ -17,8 +17,6 @@ CLASS z2ui5_cl_demo_app_337 DEFINITION PUBLIC. PROTECTED SECTION. PRIVATE SECTION. - METHODS get_data_2. - METHODS xml_table IMPORTING i_page TYPE REF TO z2ui5_cl_xml_view @@ -37,52 +35,57 @@ CLASS z2ui5_cl_demo_app_337 IMPLEMENTATION. METHOD z2ui5_if_app~main. IF client->check_on_init( ). - - get_data( ). - mo_layout_obj = z2ui5_cl_demo_app_333=>factory( i_data = REF #( mt_data ) vis_cols = 5 ). - mo_layout_obj_2 = z2ui5_cl_demo_app_333=>factory( i_data = REF #( ms_data ) vis_cols = 3 ). - ui5_view_display( client ). - ENDIF. - CASE client->get( )-event. - WHEN 'BACK'. - client->nav_app_leave( ). + CASE client->get( )-event. + WHEN 'BACK'. + client->nav_app_leave( ). WHEN 'GO'. - DATA(app) = z2ui5_cl_demo_app_336=>factory( ). client->nav_app_call( app ). + ENDCASE. - WHEN 'CHANGE'. + " Kommen wir aus einer anderen APP + IF client->get( )-check_on_navigated = abap_true. + TRY. + " Kommen wir aus einer anderen APP + DATA(obj) = CAST z2ui5_cl_demo_app_336( client->get_app( client->get( )-s_draft-id_prev_app ) ). + get_data( ). + CATCH cx_root. + ENDTRY. + ENDIF. - get_data_2( ). - ENDCASE. IF client->get( )-check_on_navigated = abap_true AND client->check_on_init( ) = abap_false. ui5_view_display( client ). ENDIF. - IF mt_data IS INITIAL. - client->message_toast_display( 'ERROR - MT_DATA is initial!' ). - ENDIF. + + IF mo_layout_obj->mr_data IS NOT BOUND. client->message_toast_display( 'ERROR - mo_layout_obj->mr_data is not bound!' ). ENDIF. - IF mo_layout_obj_2->mr_data IS NOT BOUND. client->message_toast_display( 'ERROR - mo_layout_obj_2->mr_data is not bound!' ). ENDIF. + IF mo_layout_obj->mr_data->* <> mt_data. + client->message_toast_display( 'ERROR - mo_layout_obj_2->mr_data <> mt_data!' ). + ENDIF. + IF mo_layout_obj_2->mr_data->* <> ms_data. + client->message_toast_display( 'ERROR - mo_layout_obj_2->mr_data <> ms_data!' ). + ENDIF. + @@ -101,10 +104,6 @@ CLASS z2ui5_cl_demo_app_337 IMPLEMENTATION. press = client->_event( 'GO' ) type = 'Success' ). - page->button( text = 'Change Data' - press = client->_event( 'CHANGE' ) - type = 'Success' ). - xml_table( i_page = page i_client = client ). @@ -163,22 +162,6 @@ CLASS z2ui5_cl_demo_app_337 IMPLEMENTATION. ENDMETHOD. - METHOD get_data_2. - - SELECT id, - id_prev, - id_prev_app, - id_prev_app_stack, - timestampl - FROM z2ui5_t_01 - WHERE id <> @ms_data-id - INTO CORRESPONDING FIELDS OF TABLE @mt_data - UP TO 10 ROWS. - - ms_data = VALUE #( mt_data[ 1 ] OPTIONAL ). - - ENDMETHOD. - METHOD xml_form. DATA(form) = i_page->simple_form( editable = abap_true