Skip to content

Commit 1d33447

Browse files
Downport changes
1 parent 9fc606d commit 1d33447

File tree

337 files changed

+13781
-4651
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

337 files changed

+13781
-4651
lines changed

abaplint.jsonc

Lines changed: 36 additions & 36 deletions
Original file line numberDiff line numberDiff line change
@@ -1,36 +1,36 @@
1-
{
2-
"global": {
3-
"files": "/src/**/*.*"
4-
},
5-
"dependencies": [
6-
{
7-
"url": "https://github.com/abapedia/steampunk-2305-api-intersect-702",
8-
"folder": "/deps",
9-
"files": "/src/**/*.*"
10-
},
11-
{
12-
"url": "https://github.com/abap2UI5/abap2UI5",
13-
"folder": "/abap2UI5",
14-
"files": "/src/**/*.*"
15-
}
16-
],
17-
"syntax": {
18-
"version": "v750",
19-
"errorNamespace": "."
20-
},
21-
"rules": {
22-
"downport": true,
23-
"begin_end_names": true,
24-
"check_ddic": true,
25-
"check_include": true,
26-
"check_syntax": true,
27-
"global_class": true,
28-
"definitions_top": false,
29-
"implement_methods": true,
30-
"method_implemented_twice": true,
31-
"parser_error": true,
32-
"superclass_final": true,
33-
"unknown_types": true,
34-
"xml_consistency": true
35-
}
36-
}
1+
{
2+
"global": {
3+
"files": "/src/**/*.*"
4+
},
5+
"dependencies": [
6+
{
7+
"url": "https://github.com/open-abap/open-abap-core",
8+
"folder": "/deps",
9+
"files": "/src/**/*.*"
10+
},
11+
{
12+
"url": "https://github.com/abap2UI5/abap2UI5",
13+
"folder": "/abap2UI5",
14+
"branch": "702",
15+
"files": "/src/**/*.*"
16+
}
17+
],
18+
"syntax": {
19+
"version": "v702",
20+
"errorNamespace": "."
21+
},
22+
"rules": {
23+
"downport": true,
24+
"begin_end_names": true,
25+
"check_ddic": true,
26+
"check_include": true,
27+
"check_syntax": true,
28+
"global_class": true,
29+
"implement_methods": true,
30+
"method_implemented_twice": true,
31+
"parser_error": true,
32+
"superclass_final": true,
33+
"unknown_types": true,
34+
"xml_consistency": true
35+
}
36+
}

src/00/z2ui5_cl_demo_app_135.clas.abap

Lines changed: 15 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -45,21 +45,27 @@ CLASS z2ui5_cl_demo_app_135 IMPLEMENTATION.
4545
set_session_stateful( client = client
4646
stateful = abap_true ).
4747

48-
DATA(view) = z2ui5_cl_xml_view=>factory( ).
48+
DATA view TYPE REF TO z2ui5_cl_xml_view.
49+
view = z2ui5_cl_xml_view=>factory( ).
4950

50-
DATA(page) = view->shell( )->page(
51+
DATA page TYPE REF TO z2ui5_cl_xml_view.
52+
DATA temp1 TYPE xsdboolean.
53+
temp1 = boolc( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ).
54+
page = view->shell( )->page(
5155
title = `abap2UI5 - Sample: Sticky Session with locks - (ABAP Standard Only)`
5256
navbuttonpress = client->_event( 'BACK' )
53-
shownavbutton = xsdbool( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ) ).
57+
shownavbutton = temp1 ).
5458

5559
page->message_strip(
5660
text = client->_bind( error-text )
5761
type = 'Error'
5862
visible = client->_bind( error-flag ) ).
5963

60-
DATA(vbox) = page->vbox( ).
64+
DATA vbox TYPE REF TO z2ui5_cl_xml_view.
65+
vbox = page->vbox( ).
6166

62-
DATA(hbox) = vbox->hbox( alignitems = 'Center' ).
67+
DATA hbox TYPE REF TO z2ui5_cl_xml_view.
68+
hbox = vbox->hbox( alignitems = 'Center' ).
6369

6470
hbox->info_label( text = client->_bind( session_text ) ).
6571

@@ -146,13 +152,15 @@ CLASS z2ui5_cl_demo_app_135 IMPLEMENTATION.
146152

147153
TRY.
148154
on_event( client ).
149-
CATCH z2ui5_cx_util_error INTO DATA(x_error).
155+
DATA x_error TYPE REF TO z2ui5_cx_util_error.
156+
CATCH z2ui5_cx_util_error INTO x_error.
150157
error-text = x_error->get_text( ).
151158
error-flag = abap_true.
152159
client->view_model_update( ).
153160
ENDTRY.
154161

155-
CATCH cx_root INTO DATA(lx).
162+
DATA lx TYPE REF TO cx_root.
163+
CATCH cx_root INTO lx.
156164
client->message_box_display( lx->get_text( ) ).
157165
ENDTRY.
158166
ENDMETHOD.

src/00/z2ui5_cl_demo_app_135.clas.locals_imp.abap

Lines changed: 16 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -41,7 +41,8 @@ CLASS lcl_locking IMPLEMENTATION.
4141

4242
METHOD acquire_lock.
4343

44-
DATA(lv_fm) = 'ENQUEUE_E_TABLE'.
44+
DATA lv_fm TYPE c LENGTH 15.
45+
lv_fm = 'ENQUEUE_E_TABLE'.
4546
CALL FUNCTION lv_fm
4647
EXPORTING
4748
tabname = 'ZTEST'
@@ -51,7 +52,8 @@ CLASS lcl_locking IMPLEMENTATION.
5152
system_failure = 2
5253
OTHERS = 3.
5354
IF sy-subrc <> 0.
54-
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4 INTO DATA(error_text).
55+
DATA error_text TYPE string.
56+
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4 INTO error_text.
5557
RAISE EXCEPTION TYPE z2ui5_cx_util_error EXPORTING val = error_text.
5658
ENDIF.
5759

@@ -64,7 +66,8 @@ CLASS lcl_locking IMPLEMENTATION.
6466
DATA argument TYPE c LENGTH 150.
6567
argument = |ZTEST Z100*|.
6668

67-
DATA(lv_fm) = 'ENQUEUE_READ'.
69+
DATA lv_fm TYPE c LENGTH 12.
70+
lv_fm = 'ENQUEUE_READ'.
6871
CALL FUNCTION lv_fm
6972
EXPORTING
7073
garg = argument
@@ -76,11 +79,19 @@ CLASS lcl_locking IMPLEMENTATION.
7679
system_failure = 2
7780
OTHERS = 3.
7881
IF sy-subrc <> 0.
79-
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4 INTO DATA(error_text).
82+
DATA error_text TYPE string.
83+
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4 INTO error_text.
8084
RAISE EXCEPTION TYPE z2ui5_cx_util_error EXPORTING val = error_text.
8185
ENDIF.
8286

83-
result = VALUE #( enqueue_table[ 1 ]-gusevb OPTIONAL ).
87+
DATA temp1 TYPE i.
88+
CLEAR temp1.
89+
DATA temp2 TYPE lcl_locking=>ty_seqg3.
90+
READ TABLE enqueue_table INTO temp2 INDEX 1.
91+
IF sy-subrc = 0.
92+
temp1 = temp2-gusevb.
93+
ENDIF.
94+
result = temp1.
8495

8596
ENDMETHOD.
8697

src/00/z2ui5_cl_demo_app_137.clas.abap

Lines changed: 13 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -39,7 +39,8 @@ CLASS z2ui5_cl_demo_app_137 IMPLEMENTATION.
3939

4040
on_event( client ).
4141

42-
CATCH cx_root INTO DATA(lx).
42+
DATA lx TYPE REF TO cx_root.
43+
CATCH cx_root INTO lx.
4344
client->message_box_display( lx->get_text( ) ).
4445
ENDTRY.
4546
ENDMETHOD.
@@ -48,17 +49,23 @@ CLASS z2ui5_cl_demo_app_137 IMPLEMENTATION.
4849
set_session_stateful( client = client
4950
stateful = abap_true ).
5051

51-
DATA(view) = z2ui5_cl_xml_view=>factory( ).
52+
DATA view TYPE REF TO z2ui5_cl_xml_view.
53+
view = z2ui5_cl_xml_view=>factory( ).
5254

53-
DATA(page) = view->shell( )->page(
55+
DATA page TYPE REF TO z2ui5_cl_xml_view.
56+
DATA temp1 TYPE xsdboolean.
57+
temp1 = boolc( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ).
58+
page = view->shell( )->page(
5459
title = `abap2UI5 - Sample: Sticky Session`
5560
navbuttonpress = client->_event( 'BACK' )
56-
shownavbutton = xsdbool( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ) ).
61+
shownavbutton = temp1 ).
5762

58-
DATA(vbox) = page->vbox( ).
63+
DATA vbox TYPE REF TO z2ui5_cl_xml_view.
64+
vbox = page->vbox( ).
5965
vbox->info_label( text = client->_bind( session_text ) ).
6066

61-
DATA(hbox) = vbox->hbox( alignitems = 'Center' ).
67+
DATA hbox TYPE REF TO z2ui5_cl_xml_view.
68+
hbox = vbox->hbox( alignitems = 'Center' ).
6269
hbox->label( text = 'press button to increment counter in backend session'
6370
class = 'sapUiTinyMarginEnd' ).
6471
hbox->button(

src/00/z2ui5_cl_demo_app_304.clas.abap

Lines changed: 5 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -27,7 +27,7 @@ CLASS z2ui5_cl_demo_app_304 IMPLEMENTATION.
2727

2828
me->client = client.
2929

30-
IF client->check_on_init( ).
30+
IF client->check_on_init( ) IS NOT INITIAL.
3131
view_display( ).
3232
ENDIF.
3333

@@ -38,7 +38,8 @@ CLASS z2ui5_cl_demo_app_304 IMPLEMENTATION.
3838

3939
METHOD view_display.
4040

41-
DATA(view) = z2ui5_cl_xml_view=>factory( ).
41+
DATA view TYPE REF TO z2ui5_cl_xml_view.
42+
view = z2ui5_cl_xml_view=>factory( ).
4243

4344
" Note, these are demo sounds and are part of the abap2UI5 sample repo.
4445
" They are NOT meant to use in production.
@@ -47,7 +48,8 @@ CLASS z2ui5_cl_demo_app_304 IMPLEMENTATION.
4748
|function playSuccess() \{ new Audio("/SAP/PUBLIC/BC/ABAP/mime_demo/z2ui5_demo_success.mp3").play(); \}|
4849
&& |function playError() \{ new Audio("/SAP/PUBLIC/BC/ABAP/mime_demo/z2ui5_demo_error.mp3").play(); \}| ).
4950

50-
DATA(vbox) = view->page( title = `Play success and error sounds` )->vbox( class = `sapUiSmallMargin` ).
51+
DATA vbox TYPE REF TO z2ui5_cl_xml_view.
52+
vbox = view->page( title = `Play success and error sounds` )->vbox( class = `sapUiSmallMargin` ).
5153
vbox->message_strip(
5254
text = client->_bind( message-text )
5355
type = client->_bind( message-type )

src/00/z2ui5_cl_demo_app_326.clas.abap

Lines changed: 6 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -30,7 +30,7 @@ CLASS z2ui5_cl_demo_app_326 IMPLEMENTATION.
3030

3131
me->client = client.
3232

33-
IF client->check_on_init( ).
33+
IF client->check_on_init( ) IS NOT INITIAL.
3434
display_view( client ).
3535
z2ui5_set_data( ).
3636
ENDIF.
@@ -41,12 +41,15 @@ CLASS z2ui5_cl_demo_app_326 IMPLEMENTATION.
4141

4242
METHOD display_view.
4343

44-
DATA(view) = z2ui5_cl_xml_view=>factory( ).
44+
DATA view TYPE REF TO z2ui5_cl_xml_view.
45+
view = z2ui5_cl_xml_view=>factory( ).
4546

47+
DATA temp1 TYPE xsdboolean.
48+
temp1 = boolc( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ).
4649
client->view_display( val = view->shell(
4750
)->page( title = 'abap2UI5 - Conversion Exit'
4851
navbuttonpress = client->_event( 'BACK' )
49-
shownavbutton = xsdbool( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL )
52+
shownavbutton = temp1
5053
)->simple_form( title = 'Form Title'
5154
editable = abap_true
5255
)->content( 'form'

src/01/z2ui5_cl_demo_app_lp_01.clas.abap

Lines changed: 11 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -12,14 +12,16 @@ ENDCLASS.
1212

1313
CLASS z2ui5_cl_demo_app_lp_01 IMPLEMENTATION.
1414
METHOD z2ui5_if_app~main.
15-
IF client->check_on_init( ).
15+
IF client->check_on_init( ) IS NOT INITIAL.
1616

1717
IF client->get( )-check_launchpad_active = abap_false.
1818
client->message_box_display( `No Launchpad Active, Sample not working!` ).
1919
ENDIF.
2020

21-
DATA(view) = z2ui5_cl_xml_view=>factory( ).
22-
DATA(page) = view->shell( )->page( showheader = abap_false ).
21+
DATA view TYPE REF TO z2ui5_cl_xml_view.
22+
view = z2ui5_cl_xml_view=>factory( ).
23+
DATA page TYPE REF TO z2ui5_cl_xml_view.
24+
page = view->shell( )->page( showheader = abap_false ).
2325
client->view_display( page->simple_form( title = 'Laucnhpad I - Read Startup Parameters'
2426
editable = abap_true
2527
)->content( 'form'
@@ -35,9 +37,12 @@ CLASS z2ui5_cl_demo_app_lp_01 IMPLEMENTATION.
3537
CASE client->get( )-event.
3638

3739
WHEN 'READ_PARAMS'.
38-
DATA(lv_text) = `Start Parameter: `.
39-
DATA(lt_params) = client->get( )-t_comp_params.
40-
LOOP AT lt_params INTO DATA(ls_param).
40+
DATA lv_text TYPE string.
41+
lv_text = `Start Parameter: `.
42+
DATA lt_params TYPE z2ui5_if_types=>ty_t_name_value.
43+
lt_params = client->get( )-t_comp_params.
44+
DATA ls_param LIKE LINE OF lt_params.
45+
LOOP AT lt_params INTO ls_param.
4146
lv_text = |{ lv_text } / { ls_param-n } = { ls_param-v }|.
4247
ENDLOOP.
4348
client->message_box_display( lv_text ).

src/01/z2ui5_cl_demo_app_lp_02.clas.abap

Lines changed: 11 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -17,15 +17,17 @@ CLASS Z2UI5_CL_DEMO_APP_LP_02 IMPLEMENTATION.
1717

1818

1919
METHOD z2ui5_if_app~main.
20-
IF client->check_on_init( ).
20+
IF client->check_on_init( ) IS NOT INITIAL.
2121

2222
IF client->get( )-check_launchpad_active = abap_false.
2323
client->message_box_display( `No Launchpad Active, Sample not working!` ).
2424
ENDIF.
2525

26-
DATA(shell) = z2ui5_cl_xml_view=>factory( )->shell( ).
26+
DATA shell TYPE REF TO z2ui5_cl_xml_view.
27+
shell = z2ui5_cl_xml_view=>factory( )->shell( ).
2728
IF client->get( )-check_launchpad_active = abap_true.
28-
DATA(page) = shell->page( showheader = abap_false ).
29+
DATA page TYPE REF TO z2ui5_cl_xml_view.
30+
page = shell->page( showheader = abap_false ).
2931
page->_z2ui5( )->lp_title( client->_bind_edit( mv_title ) ).
3032
ELSE.
3133
page = shell->page( title = client->_bind_edit( mv_title ) ).
@@ -45,9 +47,12 @@ CLASS Z2UI5_CL_DEMO_APP_LP_02 IMPLEMENTATION.
4547
CASE client->get( )-event.
4648

4749
WHEN 'READ_PARAMS'.
48-
DATA(lv_text) = `Start Parameter: `.
49-
DATA(lt_params) = client->get( )-t_comp_params.
50-
LOOP AT lt_params INTO DATA(ls_param).
50+
DATA lv_text TYPE string.
51+
lv_text = `Start Parameter: `.
52+
DATA lt_params TYPE z2ui5_if_types=>ty_t_name_value.
53+
lt_params = client->get( )-t_comp_params.
54+
DATA ls_param LIKE LINE OF lt_params.
55+
LOOP AT lt_params INTO ls_param.
5156
lv_text = |{ lv_text } / { ls_param-n } = { ls_param-v }|.
5257
ENDLOOP.
5358
client->message_box_display( lv_text ).

src/01/z2ui5_cl_demo_app_lp_03.clas.abap

Lines changed: 18 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -25,23 +25,35 @@ CLASS z2ui5_cl_demo_app_lp_03 IMPLEMENTATION.
2525

2626
METHOD z2ui5_if_app~main.
2727

28-
DATA(lt_startup_params) = client->get( )-s_config-t_startup_params.
28+
DATA lt_startup_params TYPE z2ui5_if_types=>ty_t_name_value.
29+
lt_startup_params = client->get( )-s_config-t_startup_params.
2930

30-
IF client->check_on_init( ).
31+
IF client->check_on_init( ) IS NOT INITIAL.
3132

3233
nav_params-product = '102343333'.
3334

3435
IF client->get( )-check_launchpad_active = abap_false.
3536
client->message_box_display( `No Launchpad Active, Sample not working!` ).
3637
ENDIF.
3738

38-
DATA(view) = z2ui5_cl_xml_view=>factory( ).
39+
DATA view TYPE REF TO z2ui5_cl_xml_view.
40+
view = z2ui5_cl_xml_view=>factory( ).
41+
DATA temp1 TYPE string_table.
42+
CLEAR temp1.
43+
INSERT `{ semanticObject: "Z2UI5_CL_LP_SAMPLE_04", action: "display" }` INTO TABLE temp1.
44+
DATA temp2 LIKE LINE OF temp1.
45+
temp2 = `$` && client->_bind_edit( nav_params ).
46+
INSERT temp2 INTO TABLE temp1.
47+
DATA temp3 TYPE xsdboolean.
48+
temp3 = boolc( abap_false = client->get( )-check_launchpad_active ).
49+
DATA temp4 TYPE xsdboolean.
50+
temp4 = boolc( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL ).
3951
client->view_display( view->shell(
4052
)->page(
41-
showheader = xsdbool( abap_false = client->get( )-check_launchpad_active )
53+
showheader = temp3
4254
title = 'abap2UI5 - Cross App Navigation App 127 - This App only works when started via Launchpad'
4355
navbuttonpress = client->_event( val = 'BACK' )
44-
shownavbutton = xsdbool( client->get( )-s_draft-id_prev_app_stack IS NOT INITIAL )
56+
shownavbutton = temp4
4557
)->header_content(
4658
)->link(
4759
text = 'Source_Code'
@@ -59,11 +71,7 @@ CLASS z2ui5_cl_demo_app_lp_03 IMPLEMENTATION.
5971
text = 'go to app 128'
6072
press = client->_event_client(
6173
val = client->cs_event-cross_app_nav_to_ext
62-
t_arg = VALUE #(
63-
( `{ semanticObject: "Z2UI5_CL_LP_SAMPLE_04", action: "display" }` )
64-
* ( `{ "Product" : "102343333" }` )
65-
( `$` && client->_bind_edit( nav_params ) )
66-
)
74+
t_arg = temp1
6775
)
6876
)->stringify( ) ).
6977

0 commit comments

Comments
 (0)