From 34e3d902139abf9d24f42c8a67b291f46c115517 Mon Sep 17 00:00:00 2001
From: Francisco Milan <paco_milan@hotmail.com>
Date: Wed, 3 Jul 2024 04:51:27 +0000
Subject: [PATCH] Commit

---
 src/z2ui5_cl_demo_app_000.clas.abap |  9 +++-
 src/z2ui5_cl_demo_app_214.clas.abap | 75 +++++++++++++++++++++++++++++
 src/z2ui5_cl_demo_app_214.clas.xml  | 16 ++++++
 3 files changed, 99 insertions(+), 1 deletion(-)
 create mode 100644 src/z2ui5_cl_demo_app_214.clas.abap
 create mode 100644 src/z2ui5_cl_demo_app_214.clas.xml

diff --git a/src/z2ui5_cl_demo_app_000.clas.abap b/src/z2ui5_cl_demo_app_000.clas.abap
index 930efc23..1bc40141 100644
--- a/src/z2ui5_cl_demo_app_000.clas.abap
+++ b/src/z2ui5_cl_demo_app_000.clas.abap
@@ -28,7 +28,7 @@ ENDCLASS.
 
 
 
-CLASS z2ui5_cl_demo_app_000 IMPLEMENTATION.
+CLASS Z2UI5_CL_DEMO_APP_000 IMPLEMENTATION.
 
 
       METHOD z2ui5_if_app~main.
@@ -768,6 +768,13 @@ CLASS z2ui5_cl_demo_app_000 IMPLEMENTATION.
             class     = 'sapUiTinyMarginEnd sapUiTinyMarginBottom'
          ).
 
+        panel->generic_tile(
+            header    = 'Icon Tab Header'
+            subheader = 'Standalone Icon Tab Header'
+            press     =  client->_event( 'Z2UI5_CL_DEMO_APP_214' )
+            mode      = 'LineMode'
+            class     = 'sapUiTinyMarginEnd sapUiTinyMarginBottom'
+         ).
 
         panel = page->panel(
                    expandable = abap_false
diff --git a/src/z2ui5_cl_demo_app_214.clas.abap b/src/z2ui5_cl_demo_app_214.clas.abap
new file mode 100644
index 00000000..2a6ffa6a
--- /dev/null
+++ b/src/z2ui5_cl_demo_app_214.clas.abap
@@ -0,0 +1,75 @@
+class Z2UI5_CL_DEMO_APP_214 definition
+  public
+  create public .
+
+public section.
+
+  interfaces IF_SERIALIZABLE_OBJECT .
+  interfaces Z2UI5_IF_APP .
+
+  data:
+    BEGIN OF screen,
+        input1 TYPE string,
+        input2 TYPE string,
+        input3 TYPE string,
+      END OF screen .
+  data CHECK_INITIALIZED type ABAP_BOOL .
+  PROTECTED SECTION.
+
+    METHODS display_view
+      IMPORTING
+        client TYPE REF TO z2ui5_if_client.
+    METHODS on_event
+      IMPORTING
+        client TYPE REF TO z2ui5_if_client.
+
+  PRIVATE SECTION.
+ENDCLASS.
+
+
+
+CLASS Z2UI5_CL_DEMO_APP_214 IMPLEMENTATION.
+
+
+  METHOD DISPLAY_VIEW.
+
+    DATA(page) = z2ui5_cl_xml_view=>factory( )->shell(
+         )->page(
+            title          = 'abap2UI5 - Sample: Standalone Icon Tab Header'
+            navbuttonpress = client->_event( 'BACK' )
+            shownavbutton  = xsdbool( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ) ).
+
+    DATA(layout) = page->icon_tab_header( mode  = `Inline`
+                          )->items(
+                              )->icon_tab_filter( key = `info` text = `Info` )->get_parent(
+                              )->icon_tab_filter( key = `attachments` text = `Attachments` count = `3` )->get_parent(
+                              )->icon_tab_filter( key = `notes` text = `Notes` count = `12` )->get_parent(
+                              )->icon_tab_filter( key = `people` text = `People`
+                   ).
+
+    client->view_display( page->stringify( ) ).
+
+  ENDMETHOD.
+
+
+  METHOD ON_EVENT.
+
+    CASE client->get( )-event.
+      WHEN 'BACK'.
+        client->nav_app_leave( ).
+    ENDCASE.
+
+  ENDMETHOD.
+
+
+  METHOD Z2UI5_IF_APP~MAIN.
+
+    IF check_initialized = abap_false.
+      check_initialized = abap_true.
+      display_view( client ).
+    ENDIF.
+
+    on_event( client ).
+
+  ENDMETHOD.
+ENDCLASS.
diff --git a/src/z2ui5_cl_demo_app_214.clas.xml b/src/z2ui5_cl_demo_app_214.clas.xml
new file mode 100644
index 00000000..5fec27b0
--- /dev/null
+++ b/src/z2ui5_cl_demo_app_214.clas.xml
@@ -0,0 +1,16 @@
+<?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>
+   <VSEOCLASS>
+    <CLSNAME>Z2UI5_CL_DEMO_APP_214</CLSNAME>
+    <LANGU>E</LANGU>
+    <DESCRIPT>Input - Password</DESCRIPT>
+    <STATE>1</STATE>
+    <CLSCCINCL>X</CLSCCINCL>
+    <FIXPT>X</FIXPT>
+    <UNICODE>X</UNICODE>
+   </VSEOCLASS>
+  </asx:values>
+ </asx:abap>
+</abapGit>