refactoring and add to overview 131

Author: [email protected]

src/z2ui5_cl_demo_app_000.clas.abap

@@ -797,6 +797,15 @@ CLASS z2ui5_cl_demo_app_000 IMPLEMENTATION.
          class     = 'sapUiTinyMarginEnd sapUiTinyMarginBottom'
      ).
 
+
+    panel->generic_tile(
+         header    = 'Dynamic Objects'
+         subheader = 'Use S-RTTI to render different Subapps'
+         press     =  client->_event( 'Z2UI5_CL_DEMO_APP_131' )
+         mode      = 'LineMode'
+         class     = 'sapUiTinyMarginEnd sapUiTinyMarginBottom'
+     ).
+
     panel = page->panel(
             expandable = abap_false
             expanded   = abap_true

src/z2ui5_cl_demo_app_131.clas.abap

@@ -1,37 +1,33 @@
-"!
 CLASS z2ui5_cl_demo_app_131 DEFINITION
   PUBLIC
   CREATE PUBLIC.
 
   PUBLIC SECTION.
-    INTERFACES if_serializable_object.
     INTERFACES z2ui5_if_app.
 
-    TYPES  BEGIN OF ty_s_t002.
-
-    TYPES:   id    TYPE string,
-             count TYPE string,
-             class TYPE string,
-           END OF ty_s_t002,
-           ty_t_t002 TYPE STANDARD TABLE OF ty_s_t002 WITH DEFAULT KEY.
+    TYPES:
+      BEGIN OF ty_s_t002,
+        id    TYPE string,
+        count TYPE string,
+        class TYPE string,
+      END OF ty_s_t002.
+    TYPES ty_t_t002 TYPE STANDARD TABLE OF ty_s_t002 WITH DEFAULT KEY.
 
     DATA mv_selectedkey     TYPE string.
     DATA mv_selectedkey_tmp TYPE string.
     DATA mt_t002            TYPE ty_t_t002.
     DATA mo_app             TYPE REF TO object.
 
-
-
   PROTECTED SECTION.
     DATA client            TYPE REF TO z2ui5_if_client.
     DATA check_initialized TYPE abap_bool.
     DATA mo_main_page      TYPE REF TO z2ui5_cl_xml_view.
 
     METHODS on_init.
     METHODS on_event.
-    METHODS render_Main.
+    METHODS render_main.
 
-    METHODS Render_sub_app.
+    METHODS render_sub_app.
 
   PRIVATE SECTION.
 
@@ -40,7 +36,9 @@ ENDCLASS.
 CLASS z2ui5_cl_demo_app_131 IMPLEMENTATION.
 
   METHOD on_event.
+
     CASE client->get( )-event.
+
       WHEN 'ONSELECTICONTABBAR'.
 
         CASE mv_selectedkey.
@@ -54,62 +52,58 @@ CLASS z2ui5_cl_demo_app_131 IMPLEMENTATION.
       WHEN 'BACK'.
 
     ENDCASE.
+
   ENDMETHOD.
 
   METHOD on_init.
 
-    MT_t002 = VALUE #( ( id = '1' class = 'Z2UI5_CL_DEMO_APP_132'  count = '12' )
+    mt_t002 = VALUE #( ( id = '1' class = 'Z2UI5_CL_DEMO_APP_132'  count = '12' )
                        ( id = '2' class = 'Z2UI5_CL_DEMO_APP_132'  count = '80' ) ).
 
     mv_selectedkey = '1'.
 
   ENDMETHOD.
 
   METHOD render_main.
-    DATA(view) = z2ui5_cl_xml_view=>factory( )->shell( ).
 
+    DATA(view) = z2ui5_cl_xml_view=>factory( )->shell( ).
     DATA(page) = view->page( id             = `page_main`
-                             title          = 'Customizing'
+                             title          = 'Main App calling Subapps'
                              navbuttonpress = client->_event( 'BACK' )
-                             shownavbutton  = abap_true
+                             shownavbutton  = xsdbool( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL )
                              class          = 'sapUiContentPadding' ).
 
     DATA(lo_items) = page->icon_tab_bar( class       = 'sapUiResponsiveContentPadding'
-                                         selectedKey = client->_bind_edit( mv_selectedkey )
+                                         selectedkey = client->_bind_edit( mv_selectedkey )
                                          select      = client->_event( val = 'ONSELECTICONTABBAR' )
                                                        )->items( ).
 
     LOOP AT mt_t002 REFERENCE INTO DATA(line).
-
-      lo_items->icon_tab_filter( text  = line->class
-                                 count = line->count
-                                 key   = line->id ).
-
+      lo_items->icon_tab_filter( text = line->class count = line->count key = line->id ).
       lo_items->icon_tab_separator( ).
-
     ENDLOOP.
 
     mo_main_page = lo_items.
+
   ENDMETHOD.
 
   METHOD z2ui5_if_app~main.
+
     me->client = client.
 
     IF check_initialized = abap_false.
       check_initialized = abap_true.
 
       on_init( ).
-
-      render_Main( ).
-
+      render_main( ).
     ENDIF.
 
     on_event( ).
+    render_sub_app( ).
 
-    Render_sub_app( ).
   ENDMETHOD.
 
-  METHOD Render_sub_app.
+  METHOD render_sub_app.
 
 
     READ TABLE mt_t002 REFERENCE INTO DATA(t002)
@@ -129,24 +123,25 @@ CLASS z2ui5_cl_demo_app_131 IMPLEMENTATION.
               client->_bind_clear( `MO_APP` ).
             CATCH cx_root.
           ENDTRY.
-
           CREATE OBJECT mo_app TYPE (t002->class).
 
         ENDIF.
         TRY.
 
             CALL METHOD mo_app->('SET_APP_DATA')
-              EXPORTING data = t002->count.
+              EXPORTING
+                data = t002->count.
 
-            render_Main( ).
+            render_main( ).
 
             ASSIGN mo_app->('MO_PARENT_VIEW') TO FIELD-SYMBOL(<view>).
             IF <view> IS ASSIGNED.
               <view> = mo_main_page.
             ENDIF.
 
             CALL METHOD mo_app->('Z2UI5_IF_APP~MAIN')
-              EXPORTING client = client.
+              EXPORTING
+                client = client.
 
           CATCH cx_root.
             RETURN.
@@ -156,9 +151,8 @@ CLASS z2ui5_cl_demo_app_131 IMPLEMENTATION.
 
     client->view_model_update( ).
 
-  FIELD-SYMBOLS <view_display> type any.
-
-   ASSIGN mo_app->('MV_VIEW_DISPLAY') to <view_display>.
+    FIELD-SYMBOLS <view_display> TYPE any.
+    ASSIGN mo_app->('MV_VIEW_DISPLAY') TO <view_display>.
 
     IF <view_display> = abap_true.
       <view_display> = abap_false.
@@ -168,10 +162,9 @@ CLASS z2ui5_cl_demo_app_131 IMPLEMENTATION.
     IF mv_selectedkey <> mv_selectedkey_tmp.
 
       client->view_display( mo_main_page->stringify( ) ).
-
       mv_selectedkey_tmp = mv_selectedkey.
 
     ENDIF.
   ENDMETHOD.
 
-ENDCLASS.
+ENDCLASS.

src/z2ui5_cl_demo_app_131.clas.xml

@@ -1,4 +1,4 @@
-<?xml version="1.0" encoding="utf-8"?>
+<?xml version="1.0" encoding="utf-8"?>
 <abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
  <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
   <asx:values>

src/z2ui5_cl_demo_app_132.clas.abap

@@ -98,4 +98,4 @@ mv_perc = data.
 
   ENDMETHOD.
 
-ENDCLASS.
+ENDCLASS.

src/z2ui5_cl_demo_app_132.clas.xml

@@ -1,4 +1,4 @@
-<?xml version="1.0" encoding="utf-8"?>
+<?xml version="1.0" encoding="utf-8"?>
 <abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
  <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
   <asx:values>
@@ -13,4 +13,4 @@
    </VSEOCLASS>
   </asx:values>
  </asx:abap>
-</abapGit>
+</abapGit>