|
| 1 | +CLASS z2ui5_cl_demo_app_071 DEFINITION PUBLIC. |
| 2 | + |
| 3 | + PUBLIC SECTION. |
| 4 | + |
| 5 | + INTERFACES z2ui5_if_app. |
| 6 | + |
| 7 | + TYPES: |
| 8 | + BEGIN OF s_combobox, |
| 9 | + key TYPE string, |
| 10 | + text TYPE string, |
| 11 | + END OF s_combobox. |
| 12 | + TYPES ty_t_combo TYPE STANDARD TABLE OF s_combobox WITH EMPTY KEY. |
| 13 | + |
| 14 | + DATA mv_set_size_limit TYPE i VALUE 100. |
| 15 | + DATA mv_combo_number TYPE i VALUE 105. |
| 16 | + DATA check_initialized TYPE abap_bool. |
| 17 | + |
| 18 | + PROTECTED SECTION. |
| 19 | + PRIVATE SECTION. |
| 20 | +ENDCLASS. |
| 21 | + |
| 22 | + |
| 23 | + |
| 24 | +CLASS z2ui5_cl_demo_app_071 IMPLEMENTATION. |
| 25 | + |
| 26 | + |
| 27 | + METHOD z2ui5_if_app~main. |
| 28 | + |
| 29 | + CASE client->get( )-event. |
| 30 | + WHEN 'BACK'. |
| 31 | + client->nav_app_leave( ). |
| 32 | + RETURN. |
| 33 | + ENDCASE. |
| 34 | + |
| 35 | + client->message_toast_display( `View updated` ). |
| 36 | + |
| 37 | + DATA(lt_combo) = VALUE ty_T_combo( ). |
| 38 | + DO mv_combo_number TIMES. |
| 39 | + INSERT VALUE #( key = sy-index text = sy-index ) INTO TABLE lt_combo. |
| 40 | + ENDDO. |
| 41 | + |
| 42 | + DATA(view) = z2ui5_cl_xml_view=>factory( ). |
| 43 | + client->view_display( val = view->shell( |
| 44 | + )->page( |
| 45 | + title = 'abap2UI5 - First Example' |
| 46 | + navbuttonpress = client->_event( val = 'BACK' s_ctrl = VALUE #( check_view_destroy = abap_true ) ) |
| 47 | + shownavbutton = xsdbool( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ) |
| 48 | + )->simple_form( title = 'Form Title' editable = abap_true |
| 49 | + )->content( 'form' |
| 50 | + )->title( 'Input' |
| 51 | + )->label( 'Link' |
| 52 | + )->label( 'setSizeLimit' |
| 53 | + )->input( value = client->_bind_edit( mv_set_size_limit ) |
| 54 | + )->label( 'Number of Entries' |
| 55 | + )->input( value = client->_bind_edit( mv_combo_number ) |
| 56 | + )->label( 'demo' |
| 57 | + )->combobox( items = client->_bind_local( lt_combo ) |
| 58 | + )->item( key = '{KEY}' text = '{TEXT}' |
| 59 | + )->get_parent( )->get_parent( |
| 60 | + )->button( |
| 61 | + text = 'update' |
| 62 | + press = client->_event( val = 'UPDATE' ) |
| 63 | + )->stringify( ) t_config = VALUE #( ( n = `setSizeLimit` v = mv_set_size_limit ) ) ). |
| 64 | + |
| 65 | + ENDMETHOD. |
| 66 | +ENDCLASS. |
0 commit comments