Skip to content

Refactor samples 011-020 to app guidelines #597

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
oblomov-dev merged 1 commit into from
Apr 8, 2026
Merged

Refactor samples 011-020 to app guidelines #597

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
1 commit
Select commit
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
141 changes: 68 additions & 73 deletions src/z2ui5_cl_demo_app_011.clas.abap
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,11 +1,10 @@
CLASS z2ui5_cl_demo_app_011 DEFINITION PUBLIC.

PUBLIC SECTION.

INTERFACES z2ui5_if_app.

TYPES:
BEGIN OF ty_row,
BEGIN OF ty_s_row,
selkz TYPE abap_bool,
title TYPE string,
value TYPE string,
Expand All @@ -14,83 +13,85 @@ CLASS z2ui5_cl_demo_app_011 DEFINITION PUBLIC.
info TYPE string,
editable TYPE abap_bool,
checkbox TYPE abap_bool,
END OF ty_row.

DATA t_tab TYPE STANDARD TABLE OF ty_row WITH EMPTY KEY.
END OF ty_s_row.
DATA t_tab TYPE STANDARD TABLE OF ty_s_row WITH EMPTY KEY.
DATA check_editable_active TYPE abap_bool.


PROTECTED SECTION.
DATA client TYPE REF TO z2ui5_if_client.

METHODS set_view.
METHODS view_display.

PRIVATE SECTION.
ENDCLASS.



CLASS z2ui5_cl_demo_app_011 IMPLEMENTATION.


METHOD set_view.
METHOD view_display.

DATA(view) = z2ui5_cl_xml_view=>factory( ).
DATA(page) = view->shell(
)->page(
title = 'abap2UI5 - Tables and editable'
navbuttonpress = client->_event_nav_app_leave( )
shownavbutton = abap_true
id = `test2` ).
title = `abap2UI5 - Tables and editable`
navbuttonpress = client->_event_nav_app_leave( )
shownavbutton = client->check_app_prev_stack( )
id = `test2` ).

DATA(tab) = page->table(
items = `{path: '` && client->_bind_edit( val = t_tab path = abap_true ) && `' , templateShareable: false }`
mode = 'MultiSelect'
items = |\{path: '{ client->_bind_edit( val = t_tab path = abap_true ) }', templateShareable: false\}|
mode = `MultiSelect`
)->header_toolbar(
)->overflow_toolbar(
)->title( 'title of the table'
)->title( `title of the table`
)->button(
text = 'test'
press = client->_event( 'BUTTON_TEST' )
text = `test`
press = client->_event( `BUTTON_TEST` )
)->toolbar_spacer(
)->button(
icon = 'sap-icon://delete'
text = 'delete selected row'
press = client->_event( 'BUTTON_DELETE' )
icon = `sap-icon://delete`
text = `delete selected row`
press = client->_event( `BUTTON_DELETE` )
)->button(
icon = 'sap-icon://add'
text = 'add'
press = client->_event( 'BUTTON_ADD' )
icon = `sap-icon://add`
text = `add`
press = client->_event( `BUTTON_ADD` )
)->button(
icon = 'sap-icon://edit'
text = SWITCH #( check_editable_active WHEN abap_true THEN |display| ELSE |edit| )
press = client->_event( 'BUTTON_EDIT' )
icon = `sap-icon://edit`
text = SWITCH #( check_editable_active WHEN abap_true THEN `display` ELSE `edit` )
press = client->_event( `BUTTON_EDIT` )
)->get_parent( )->get_parent( ).

tab->columns(
)->column(
)->text( 'Title' )->get_parent(
)->text( `Title` )->get_parent(
)->column(
)->text( 'Color' )->get_parent(
)->text( `Color` )->get_parent(
)->column(
)->text( 'Info' )->get_parent(
)->text( `Info` )->get_parent(
)->column(
)->text( 'Description' )->get_parent(
)->text( `Description` )->get_parent(
)->column(
)->text( 'Checkbox' ).

tab->items( )->column_list_item( selected = '{SELKZ}'
)->cells(
)->input( value = '{TITLE}'
enabled = `{EDITABLE}`
id = `test`
)->input( value = '{VALUE}'
enabled = `{EDITABLE}`
)->input( value = '{INFO}'
enabled = `{EDITABLE}`
)->input( value = '{DESCR}'
enabled = `{EDITABLE}`
)->checkbox( selected = '{CHECKBOX}'
enabled = `{EDITABLE}` ).
)->text( `Checkbox` ).

tab->items( )->column_list_item( selected = `{SELKZ}`
)->cells(
)->input(
value = `{TITLE}`
enabled = `{EDITABLE}`
id = `test`
)->input(
value = `{VALUE}`
enabled = `{EDITABLE}`
)->input(
value = `{INFO}`
enabled = `{EDITABLE}`
)->input(
value = `{DESCR}`
enabled = `{EDITABLE}`
)->checkbox(
selected = `{CHECKBOX}`
enabled = `{EDITABLE}` ).

client->view_display( view->stringify( ) ).

Expand All @@ -100,39 +101,33 @@ CLASS z2ui5_cl_demo_app_011 IMPLEMENTATION.
METHOD z2ui5_if_app~main.

me->client = client.

IF client->check_on_init( ).

check_editable_active = abap_false.
t_tab = VALUE #(
( title = 'entry 01' value = 'red' info = 'completed' descr = 'this is a description' checkbox = abap_true )
( title = 'entry 02' value = 'blue' info = 'completed' descr = 'this is a description' checkbox = abap_true )
( title = 'entry 03' value = 'green' info = 'completed' descr = 'this is a description' checkbox = abap_true )
( title = 'entry 04' value = 'orange' info = 'completed' descr = '' checkbox = abap_true )
( title = 'entry 05' value = 'grey' info = 'completed' descr = 'this is a description' checkbox = abap_true )
( title = `entry 01` value = `red` info = `completed` descr = `this is a description` checkbox = abap_true )
( title = `entry 02` value = `blue` info = `completed` descr = `this is a description` checkbox = abap_true )
( title = `entry 03` value = `green` info = `completed` descr = `this is a description` checkbox = abap_true )
( title = `entry 04` value = `orange` info = `completed` descr = `` checkbox = abap_true )
( title = `entry 05` value = `grey` info = `completed` descr = `this is a description` checkbox = abap_true )
( ) ).

set_view( ).
RETURN.

view_display( ).

ELSEIF client->check_on_event( `BUTTON_EDIT` ).
check_editable_active = xsdbool( check_editable_active = abap_false ).
LOOP AT t_tab REFERENCE INTO DATA(lr_tab).
lr_tab->editable = check_editable_active.
ENDLOOP.
client->view_model_update( ).
ELSEIF client->check_on_event( `BUTTON_DELETE` ).
DELETE t_tab WHERE selkz = abap_true.
client->view_model_update( ).
ELSEIF client->check_on_event( `BUTTON_ADD` ).
INSERT VALUE #( ) INTO TABLE t_tab.
client->view_model_update( ).
ENDIF.


CASE client->get( )-event.

WHEN 'BUTTON_EDIT'.
check_editable_active = xsdbool( check_editable_active = abap_false ).
LOOP AT t_tab REFERENCE INTO DATA(lr_tab).
lr_tab->editable = check_editable_active.
ENDLOOP.
client->view_model_update( ).
WHEN 'BUTTON_DELETE'.
DELETE t_tab WHERE selkz = abap_true.
client->view_model_update( ).
WHEN 'BUTTON_ADD'.
INSERT VALUE #( ) INTO TABLE t_tab.
client->view_model_update( ).
ENDCASE.

ENDMETHOD.

ENDCLASS.
Loading
Loading