Skip to content

Commit

Permalink
tree state demo (#134)
Browse files Browse the repository at this point in the history
  • Loading branch information
@choper725
choper725 authored Mar 4, 2024
1 parent 4dc7bac commit 11f56a5
Show file tree
Hide file tree
Showing 2 changed files with 219 additions and 0 deletions.
203 changes: 203 additions & 0 deletions src/z2ui5_cl_demo_app_178.clas.abap
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,203 @@
class Z2UI5_CL_DEMO_APP_178 definition
public
final
create public .

public section.

interfaces IF_SERIALIZABLE_OBJECT .
interfaces Z2UI5_IF_APP .

types:
BEGIN OF ty_prodh_node_level3,
is_selected TYPE abap_bool,
text TYPE string,
prodh TYPE string,
END OF ty_prodh_node_level3 .
types:
BEGIN OF ty_prodh_node_level2,
is_selected TYPE abap_bool,
text TYPE string,
prodh TYPE string,
expanded TYPE abap_bool,
nodes TYPE STANDARD TABLE OF ty_prodh_node_level3 WITH DEFAULT KEY,
END OF ty_prodh_node_level2 .
types:
BEGIN OF ty_prodh_node_level1,
is_selected TYPE abap_bool,
text TYPE string,
prodh TYPE string,
expanded TYPE abap_bool,
nodes TYPE STANDARD TABLE OF ty_prodh_node_level2 WITH DEFAULT KEY,
END OF ty_prodh_node_level1 .
types:
ty_prodh_nodes TYPE STANDARD TABLE OF ty_prodh_node_level1 WITH DEFAULT KEY .
types:
BEGIN OF ty_prodh_node_level2_ex,
expanded TYPE abap_bool,
END OF ty_prodh_node_level2_ex .
types:
BEGIN OF ty_prodh_node_level1_ex,
expanded TYPE abap_bool,
nodes TYPE STANDARD TABLE OF ty_prodh_node_level2_ex WITH DEFAULT KEY,
END OF ty_prodh_node_level1_ex .
types:
ty_prodh_nodes_ex TYPE STANDARD TABLE OF ty_prodh_node_level1_ex WITH DEFAULT KEY .

data PRODH_NODES type TY_PRODH_NODES .
data PRODH_NODES_EX type TY_PRODH_NODES_EX .
data IS_INITIALIZED type ABAP_BOOL .

methods UI5_DISPLAY_VIEW .
PROTECTED SECTION.

DATA client TYPE REF TO z2ui5_if_client.
METHODS ui5_initialize.
METHODS ui5_display_popup_tree_select.

PRIVATE SECTION.
ENDCLASS.



CLASS Z2UI5_CL_DEMO_APP_178 IMPLEMENTATION.


METHOD UI5_DISPLAY_POPUP_TREE_SELECT.

DATA(dialog) = z2ui5_cl_xml_view=>factory_popup(
)->dialog( title = 'Choose Product here...' contentheight = '50%' contentwidth = '50%' ).

dialog->tree(
mode = 'SingleSelectMaster'
items = client->_bind_edit( val = prodh_nodes )
* toggleopenstate = client->_event( val = 'TOGGLE_STATE' t_arg = VALUE #( ( `${$parameters>/itemIndex}` ) ( `${$parameters>/expanded}` ) ) )
toggleopenstate = client->_event( val = 'TOGGLE_STATE' t_arg = VALUE #( ( `${$parameters>/itemContext/sPath}` ) ( `${$parameters>/expanded}` ) ) )
)->items(
)->standard_tree_item( selected = '{IS_SELECTED}' title = '{TEXT}' ).

dialog->buttons(
)->button( text = 'Continue'
icon = `sap-icon://accept`
type = `Accept`
press = client->_event( 'CONTINUE' )
)->button( text = 'Cancel'
icon = `sap-icon://decline`
type = `Reject`
press = client->_event( 'CANCEL' ) ).

client->popup_display( dialog->stringify( ) ).

ENDMETHOD.


METHOD UI5_DISPLAY_VIEW.

client->_bind_edit( prodh_nodes_ex ).

DATA(page) = z2ui5_cl_xml_view=>factory( )->shell(
)->page(
title = 'abap2UI5 - Popup Tree select Entry'
navbuttonpress = client->_event( 'BACK' )
shownavbutton = abap_true ).

page->header_content(
)->link( text = 'Demo' target = '_blank' href = `https://twitter.com/abap2UI5/status/1680261069535584259`
)->link( text = 'Source_Code' target = '_blank'
)->get_parent( ).

client->view_display( page->button( text = 'Open Popup here...' press = client->_event( 'POPUP_TREE' ) )->stringify( ) ).

ENDMETHOD.


METHOD UI5_INITIALIZE.
prodh_nodes =
VALUE #( ( text = 'Machines'
prodh = '00100'
nodes = VALUE #( ( text = 'Pumps'
prodh = '0010000100'
nodes = VALUE #( ( text = 'Pump 001'
prodh = '001000010000000100' )
( text = 'Pump 002'
prodh = '001000010000000105' )
)
) )
)
( text = 'Paints'
prodh = '00110'
nodes = VALUE #( ( text = 'Gloss paints'
prodh = '0011000105'
nodes = VALUE #( ( text = 'Paint 001'
prodh = '001100010500000100' )
( text = 'Paint 002'
prodh = '001100010500000105' )
)
) )
)
).
prodh_nodes_ex =
VALUE #( ( expanded = abap_false
nodes = VALUE #(
( expanded = abap_false )
)
)
( expanded = abap_false
nodes = VALUE #(
( expanded = abap_false )
)
)
).
ENDMETHOD.


METHOD Z2UI5_IF_APP~MAIN.

me->client = client.

IF is_initialized = abap_false.
is_initialized = abap_true.
ui5_initialize( ).
ui5_display_view( ).
ENDIF.

CASE client->get( )-event.

WHEN 'TOGGLE_STATE'.
DATA(lt_arg) = client->get( )-t_event_arg.
DATA(row) = lt_arg[ 1 ].
DATA(expanded) = lt_arg[ 2 ].

SPLIT row AT '/' INTO TABLE DATA(lt_indxs).

IF row CS '/NODES/'.
DATA(lv_node) = lt_indxs[ 4 ].
DATA(lv_child_node) = lt_indxs[ 6 ].
ASSIGN prodh_nodes_ex[ lv_node + 1 ]-nodes[ lv_child_node + 1 ]-expanded TO FIELD-SYMBOL(<fss>).
<fss> = expanded.
ELSE.
lv_node = lt_indxs[ 4 ].
ASSIGN prodh_nodes_ex[ lv_node + 1 ]-expanded TO FIELD-SYMBOL(<fss1>).
<fss1> = expanded.
ENDIF.

client->view_model_update( ).


WHEN 'BACK'.
client->nav_app_leave( client->get_app( client->get( )-s_draft-id_prev_app_stack ) ).

WHEN 'POPUP_TREE'.
ui5_display_popup_tree_select( ).

WHEN 'CONTINUE'.
client->popup_destroy( ).
client->message_box_display( `Selected entry is set in the backend` ).

WHEN 'CANCEL'.
client->popup_destroy( ).

ENDCASE.

ENDMETHOD.
ENDCLASS.
16 changes: 16 additions & 0 deletions src/z2ui5_cl_demo_app_178.clas.xml
View file
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_178</CLSNAME>
<LANGU>E</LANGU>
<DESCRIPT>tree - popup select - state</DESCRIPT>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>

0 comments on commit 11f56a5

Please sign in to comment.