mirror of
https://github.com/abap2UI5/abap2UI5.git
synced 2025-04-29 21:06:16 +08:00
103 lines
3.9 KiB
ABAP
103 lines
3.9 KiB
ABAP
CLASS z2ui5_cl_app_demo_48 DEFINITION
|
|
PUBLIC
|
|
FINAL
|
|
CREATE PUBLIC .
|
|
|
|
PUBLIC SECTION.
|
|
INTERFACES z2ui5_if_app.
|
|
|
|
TYPES:
|
|
BEGIN OF ty_row,
|
|
title TYPE string,
|
|
value TYPE string,
|
|
descr TYPE string,
|
|
icon TYPE string,
|
|
info TYPE string,
|
|
highlight type string,
|
|
wrapCharLimit type i,
|
|
selected TYPE abap_bool,
|
|
checkbox TYPE abap_bool,
|
|
END OF ty_row.
|
|
|
|
DATA t_tab TYPE STANDARD TABLE OF ty_row WITH EMPTY KEY.
|
|
DATA check_initialized TYPE abap_bool.
|
|
|
|
PROTECTED SECTION.
|
|
PRIVATE SECTION.
|
|
ENDCLASS.
|
|
|
|
|
|
|
|
CLASS z2ui5_cl_app_demo_48 IMPLEMENTATION.
|
|
|
|
METHOD z2ui5_if_app~main.
|
|
|
|
IF check_initialized = abap_false.
|
|
check_initialized = abap_true.
|
|
|
|
t_tab = VALUE #(
|
|
( title = 'Peter' info = 'Information' descr = 'this is a description1 1234567890 1234567890' icon = 'sap-icon://badge' highlight = 'Information' wrapCharLimit = '100' )
|
|
( title = 'Peter1' info = 'Success' descr = 'this is a description2 1234567890 1234567890' icon = 'sap-icon://favorite' highlight = 'Success' wrapCharLimit = '10')
|
|
( title = 'Peter2' info = 'Warning' descr = 'this is a description3 1234567890 1234567890' icon = 'sap-icon://employee' highlight = 'Warning' wrapCharLimit = '100')
|
|
( title = 'Peter3' info = 'Error' descr = 'this is a description4 1234567890 1234567890' icon = 'sap-icon://accept' highlight = 'Error' wrapCharLimit = '10' )
|
|
( title = 'Peter4' info = 'None' descr = 'this is a description5 1234567890 1234567890' icon = 'sap-icon://activities' highlight = 'None' wrapCharLimit = '10')
|
|
( title = 'Peter5' info = 'Information' descr = 'this is a description6 1234567890 1234567890' icon = 'sap-icon://account' highlight = 'Information' wrapCharLimit = '100' )
|
|
).
|
|
|
|
ENDIF.
|
|
|
|
CASE client->get( )-event.
|
|
WHEN 'TEST'.
|
|
data(lv_row_title) = client->get( )-event_data.
|
|
client->popup_message_box( `event: test - ` && lv_row_title ).
|
|
|
|
WHEN 'SELCHANGE'.
|
|
DATA(lt_sel) = t_tab.
|
|
DELETE lt_sel WHERE selected = abap_false.
|
|
client->popup_message_box( `event: selection change -` && lt_sel[ 1 ]-title ).
|
|
|
|
|
|
WHEN 'BACK'.
|
|
client->nav_app_leave( client->get_app( client->get( )-id_prev_app_stack ) ).
|
|
ENDCASE.
|
|
|
|
DATA(page) = z2ui5_cl_xml_view=>factory( )->shell(
|
|
)->page(
|
|
title = 'abap2UI5 - List'
|
|
navbuttonpress = client->_event( 'BACK' )
|
|
shownavbutton = abap_true
|
|
)->header_content(
|
|
)->link(
|
|
text = 'Source_Code' target = '_blank'
|
|
href = z2ui5_cl_xml_view=>hlp_get_source_code_url( app = me get = client->get( ) )
|
|
)->get_parent( ).
|
|
|
|
page->list(
|
|
headertext = 'List Ouput'
|
|
items = client->_bind( t_tab )
|
|
mode = `SingleSelectMaster`
|
|
selectionchange = client->_event( 'SELCHANGE' )
|
|
)->_generic(
|
|
name = `StandardListItem`
|
|
t_prop = VALUE #(
|
|
( n = `title` v = '{TITLE}' )
|
|
( n = `description` v = '{DESCR}' )
|
|
( n = `icon` v = '{ICON}' )
|
|
( n = `iconInset` v = 'false' )
|
|
( n = `highlight` v = '{HIGHLIGHT}' )
|
|
( n = `info` v = '{INFO}' )
|
|
( n = `infoState` v = '{HIGHLIGHT}' )
|
|
( n = `infoStateInverted` v = 'true' )
|
|
( n = 'type' v = `Detail` )
|
|
( n = 'wrapping' v = `true` )
|
|
( n = 'wrapCharLimit' v = `{WRAPCHARLIMIT}` )
|
|
( n = 'selected' v = `{SELECTED}` )
|
|
( n = 'detailPress' v = client->_event( val = 'TEST' data = `${TITLE}` ) )
|
|
|
|
) ).
|
|
client->set_next( VALUE #( xml_main = page->get_root( )->xml_get( ) ) ).
|
|
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|