Keyboard on/off Sample (#565)

* Keyboard Sample

* Update

* Update

---------

Co-authored-by: Viktor Hoffmann <viktor.hoffmann@swisskrono.com>

Author: abapsheep

src/z2ui5_cl_demo_app_352.clas.abap

@@ -0,0 +1,73 @@
+CLASS z2ui5_cl_demo_app_352 DEFINITION PUBLIC CREATE PUBLIC.
+
+  PUBLIC SECTION.
+    INTERFACES z2ui5_if_app.
+
+    DATA input TYPE string.
+
+  PROTECTED SECTION.
+    DATA client TYPE REF TO z2ui5_if_client.
+
+    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_352 IMPLEMENTATION.
+
+  METHOD z2ui5_if_app~main.
+
+    me->client = client.
+
+    IF client->check_on_init( ).
+      display_view( client ).
+    ENDIF.
+
+    on_event( client ).
+
+  ENDMETHOD.
+
+  METHOD display_view.
+
+    DATA(view) = z2ui5_cl_xml_view=>factory( ).
+    DATA(page) =   view->shell(
+             )->page( title          = 'abap2UI5 - Softkeyboard on/off'
+                      navbuttonpress = client->_event( 'BACK' )
+                      shownavbutton  = client->check_app_prev_stack( ) ).
+
+    page->_z2ui5( )->focus( focusid = `ZINPUT`
+
+      )->simple_form( editable = abap_true
+
+                 )->content( 'form'
+                     )->title( 'Keyboard on/off'
+                     )->label( 'Input'
+                     )->input( id               = `ZINPUT`
+                               value            = client->_bind_edit( input )
+                               showvaluehelp    = abap_true
+                               valuehelprequest = client->_event( 'CALL_KEYBOARD' )
+                               valuehelpiconsrc = 'sap-icon://keyboard-and-mouse' ).
+
+    client->view_display( page->stringify( ) ).
+
+  ENDMETHOD.
+
+  METHOD on_event.
+
+    CASE client->get( )-event.
+      WHEN 'CALL_KEYBOARD'.
+
+      WHEN 'BACK'.
+        client->nav_app_leave( ).
+    ENDCASE.
+
+  ENDMETHOD.
+
+ENDCLASS.

src/z2ui5_cl_demo_app_352.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_352</CLSNAME>
+    <LANGU>E</LANGU>
+    <DESCRIPT>Softkeyboard on/off</DESCRIPT>
+    <STATE>1</STATE>
+    <CLSCCINCL>X</CLSCCINCL>
+    <FIXPT>X</FIXPT>
+    <UNICODE>X</UNICODE>
+   </VSEOCLASS>
+  </asx:values>
+ </asx:abap>
+</abapGit>