Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
73 changes: 73 additions & 0 deletions src/z2ui5_cl_demo_app_352.clas.abap
Original file line number Diff line number Diff line change
@@ -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.
16 changes: 16 additions & 0 deletions src/z2ui5_cl_demo_app_352.clas.xml
Original file line number Diff line number Diff line change
@@ -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>