Skip to content

Commit 02e30b3

Browse files
francisco-milanfrancisco-milan
authored
New Sample: Date Range Selection - Value States - 2 (#396)
1 parent 2fe5819 commit 02e30b3

File tree

4 files changed

+176
-10
lines changed

4 files changed

+176
-10
lines changed

‎src/z2ui5_cl_demo_app_000.clas.abap‎

Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -749,6 +749,14 @@ CLASS z2ui5_cl_demo_app_000 IMPLEMENTATION.
749749
class = 'sapUiTinyMarginEnd sapUiTinyMarginBottom'
750750
).
751751

752+
panel->generic_tile(
753+
header = 'Date Range Selection'
754+
subheader = 'Value States'
755+
press = client->_event( 'Z2UI5_CL_DEMO_APP_295' )
756+
mode = 'LineMode'
757+
class = 'sapUiTinyMarginEnd sapUiTinyMarginBottom'
758+
).
759+
752760
panel = page->panel(
753761
expandable = abap_false
754762
expanded = abap_true

‎src/z2ui5_cl_demo_app_294.clas.abap‎

Lines changed: 6 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,7 @@ CLASS z2ui5_cl_demo_app_294 DEFINITION
1111
label TYPE string,
1212
value_state TYPE string,
1313
value_state_text TYPE string,
14-
END OF ty_a_data .
14+
END OF ty_a_data.
1515

1616
DATA lt_a_data TYPE STANDARD TABLE OF ty_a_data.
1717
DATA s_text TYPE string.
@@ -44,7 +44,7 @@ CLASS z2ui5_cl_demo_app_294 IMPLEMENTATION.
4444

4545
DATA(page) = z2ui5_cl_xml_view=>factory( )->shell(
4646
)->page(
47-
title = 'abap2UI5 - Date Picker - Value States'
47+
title = 'abap2UI5 - Date Picker - Value States'
4848
navbuttonpress = client->_event( 'BACK' )
4949
shownavbutton = xsdbool( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ) ).
5050

@@ -128,24 +128,20 @@ CLASS z2ui5_cl_demo_app_294 IMPLEMENTATION.
128128

129129
" Append entries to the internal table
130130
APPEND VALUE #( label = s_text && 'None'
131-
value_state = 'None'
132-
value_state_text = '' ) TO lt_a_data.
131+
value_state = 'None' ) TO lt_a_data.
133132

134133
APPEND VALUE #( label = s_text && 'Information'
135-
value_state = 'Information'
136-
value_state_text = '' ) TO lt_a_data.
134+
value_state = 'Information' ) TO lt_a_data.
137135

138136
APPEND VALUE #( label = s_text && 'Success'
139-
value_state = 'Success'
140-
value_state_text = '' ) TO lt_a_data.
137+
value_state = 'Success' ) TO lt_a_data.
141138

142139
APPEND VALUE #( label = s_text && 'Warning and long valueStateText'
143140
value_state = 'Warning'
144141
value_state_text = 'Warning message. This is an extra long text used as a warning message. ' &&
145142
'It illustrates how the text wraps into two or more lines without truncation to show the full length of the message.' ) TO lt_a_data.
146143

147144
APPEND VALUE #( label = s_text && 'Error'
148-
value_state = 'Error'
149-
value_state_text = '' ) TO lt_a_data.
145+
value_state = 'Error' ) TO lt_a_data.
150146
ENDMETHOD.
151147
ENDCLASS.

‎src/z2ui5_cl_demo_app_295.clas.abap‎

Lines changed: 146 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,146 @@
1+
CLASS z2ui5_cl_demo_app_295 DEFINITION
2+
PUBLIC
3+
CREATE PUBLIC.
4+
5+
PUBLIC SECTION.
6+
7+
INTERFACES z2ui5_if_app.
8+
9+
TYPES:
10+
BEGIN OF ty_a_data,
11+
label TYPE string,
12+
value_state TYPE string,
13+
value_state_text TYPE string,
14+
END OF ty_a_data.
15+
16+
DATA lt_a_data TYPE STANDARD TABLE OF ty_a_data.
17+
DATA s_text TYPE string.
18+
DATA check_initialized TYPE abap_bool.
19+
20+
PROTECTED SECTION.
21+
22+
DATA client TYPE REF TO z2ui5_if_client.
23+
24+
METHODS z2ui5_set_data.
25+
METHODS display_view
26+
IMPORTING
27+
client TYPE REF TO z2ui5_if_client.
28+
METHODS on_event
29+
IMPORTING
30+
client TYPE REF TO z2ui5_if_client.
31+
METHODS z2ui5_display_popover
32+
IMPORTING
33+
id TYPE string.
34+
35+
PRIVATE SECTION.
36+
ENDCLASS.
37+
38+
39+
40+
CLASS z2ui5_cl_demo_app_295 IMPLEMENTATION.
41+
42+
43+
METHOD display_view.
44+
45+
DATA(page) = z2ui5_cl_xml_view=>factory( )->shell(
46+
)->page(
47+
title = 'abap2UI5 - Date Range Selection - Value States'
48+
navbuttonpress = client->_event( 'BACK' )
49+
shownavbutton = xsdbool( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ) ).
50+
51+
page->header_content(
52+
)->button( id = `button_hint_id`
53+
icon = `sap-icon://hint`
54+
tooltip = `Sample information`
55+
press = client->_event( 'CLICK_HINT_ICON' ) ).
56+
57+
page->header_content(
58+
)->link(
59+
text = 'UI5 Demo Kit'
60+
target = '_blank'
61+
href = 'https://sapui5.hana.ondemand.com/sdk/#/entity/sap.m.DateRangeSelection/sample/sap.m.sample.DateRangeSelectionValueState' ).
62+
63+
page->flex_box( items = client->_bind( lt_a_data ) direction = `Column`
64+
)->vbox( class = `sapUiTinyMargin`
65+
)->label( text = '{LABEL}'
66+
)->date_range_selection(
67+
width = `100%`
68+
valuestate = '{VALUE_STATE}'
69+
valuestatetext = '{VALUE_STATE_TEXT}' )->get_parent(
70+
)->get_parent(
71+
).
72+
73+
client->view_display( page->stringify( ) ).
74+
75+
ENDMETHOD.
76+
77+
78+
METHOD on_event.
79+
80+
CASE client->get( )-event.
81+
WHEN 'BACK'.
82+
client->nav_app_leave( ).
83+
WHEN 'CLICK_HINT_ICON'.
84+
z2ui5_display_popover( `button_hint_id` ).
85+
ENDCASE.
86+
87+
ENDMETHOD.
88+
89+
90+
METHOD z2ui5_display_popover.
91+
92+
DATA(view) = z2ui5_cl_xml_view=>factory_popup( ).
93+
view->quick_view( placement = `Bottom` width = `auto`
94+
)->quick_view_page( pageid = `sampleInformationId`
95+
header = `Sample information`
96+
description = `This example shows different DateRangeSelection value states.` ).
97+
98+
client->popover_display(
99+
xml = view->stringify( )
100+
by_id = id
101+
).
102+
103+
ENDMETHOD.
104+
105+
106+
METHOD z2ui5_if_app~main.
107+
108+
me->client = client.
109+
110+
IF check_initialized = abap_false.
111+
check_initialized = abap_true.
112+
display_view( client ).
113+
z2ui5_set_data( ).
114+
ENDIF.
115+
116+
on_event( client ).
117+
118+
ENDMETHOD.
119+
120+
121+
METHOD z2ui5_set_data.
122+
123+
CLEAR s_text.
124+
CLEAR lt_a_data.
125+
126+
s_text = 'DateRangeSelection with valueState '.
127+
128+
" Append entries to the internal table
129+
APPEND VALUE #( label = s_text && 'None'
130+
value_state = 'None' ) TO lt_a_data.
131+
132+
APPEND VALUE #( label = s_text && 'Information'
133+
value_state = 'Information' ) TO lt_a_data.
134+
135+
APPEND VALUE #( label = s_text && 'Success'
136+
value_state = 'Success' ) TO lt_a_data.
137+
138+
APPEND VALUE #( label = s_text && 'Warning and long valueStateText'
139+
value_state = 'Warning'
140+
value_state_text = 'Warning message. This is an extra long text used as a warning message. ' &&
141+
'It illustrates how the text wraps into two or more lines without truncation to show the full length of the message.' ) TO lt_a_data.
142+
143+
APPEND VALUE #( label = s_text && 'Error'
144+
value_state = 'Error' ) TO lt_a_data.
145+
ENDMETHOD.
146+
ENDCLASS.

‎src/z2ui5_cl_demo_app_295.clas.xml‎

Lines changed: 16 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,16 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<VSEOCLASS>
6+
<CLSNAME>Z2UI5_CL_DEMO_APP_295</CLSNAME>
7+
<LANGU>E</LANGU>
8+
<DESCRIPT>Date Range Selection - Value States</DESCRIPT>
9+
<STATE>1</STATE>
10+
<CLSCCINCL>X</CLSCCINCL>
11+
<FIXPT>X</FIXPT>
12+
<UNICODE>X</UNICODE>
13+
</VSEOCLASS>
14+
</asx:values>
15+
</asx:abap>
16+
</abapGit>

0 commit comments

Comments
 (0)