SAP/abap2UI5
1
0
Fork 0
mirror of https://github.com/abap2UI5/abap2UI5.git synced 2025-04-29 19:12:06 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

Ui2 json (#859)

Browse Source 
* ui2_json

* update

* Update abaplint.jsonc
This commit is contained in:
oblomov 2024-02-03 16:11:18 +01:00 committed by GitHub
parent 01a882ca8f
commit ed20d63c98
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
3 changed files with 3342 additions and 3333 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
abaplint.jsonc
View File

@ -281,7 +281,7 @@
"^cl_axt_dbtable$", "^cl_axt_dbtable$",
"^cl_blue_wb_utility$", "^cl_blue_wb_utility$",
"^cl_oo_source$", "^cl_oo_source$",
"^/ui2/cl_json$", "^/ui2/cl_$",
"^cl_saunit_internal_result$", "^cl_saunit_internal_result$",
"^cl_srvd_wb_object_data$", "^cl_srvd_wb_object_data$",
"^cl_wb_object_operator_factory$", "^cl_wb_object_operator_factory$",

6119
src/01/05/z2ui5_cl_cc_imagemapster.clas.abap
View File

File diff suppressed because it is too large Load Diff

554
src/01/90/z2ui5_cl_test_integration_test.clas.testclasses.abap
View File

@ -1,277 +1,277 @@
CLASS ltcl_integration_test DEFINITION FINAL FOR TESTING *CLASS ltcl_integration_test DEFINITION FINAL FOR TESTING
DURATION LONG * DURATION LONG
RISK LEVEL HARMLESS. * RISK LEVEL HARMLESS.
*
PUBLIC SECTION. * PUBLIC SECTION.
*
*
PRIVATE SECTION. * PRIVATE SECTION.
METHODS test_index_html FOR TESTING RAISING cx_static_check. * METHODS test_index_html FOR TESTING RAISING cx_static_check.
METHODS test_xml_view FOR TESTING RAISING cx_static_check. * METHODS test_xml_view FOR TESTING RAISING cx_static_check.
METHODS test_id FOR TESTING RAISING cx_static_check. * METHODS test_id FOR TESTING RAISING cx_static_check.
METHODS test_xml_popup FOR TESTING RAISING cx_static_check. * METHODS test_xml_popup FOR TESTING RAISING cx_static_check.
METHODS test_bind_one_way FOR TESTING RAISING cx_static_check. * METHODS test_bind_one_way FOR TESTING RAISING cx_static_check.
METHODS test_bind_two_way FOR TESTING RAISING cx_static_check. * METHODS test_bind_two_way FOR TESTING RAISING cx_static_check.
METHODS test_message_toast FOR TESTING RAISING cx_static_check. * METHODS test_message_toast FOR TESTING RAISING cx_static_check.
METHODS test_message_box FOR TESTING RAISING cx_static_check. * METHODS test_message_box FOR TESTING RAISING cx_static_check.
METHODS test_landing_page FOR TESTING RAISING cx_static_check. * METHODS test_landing_page FOR TESTING RAISING cx_static_check.
METHODS test_scroll_cursor FOR TESTING RAISING cx_static_check. * METHODS test_scroll_cursor FOR TESTING RAISING cx_static_check.
METHODS test_navigate FOR TESTING RAISING cx_static_check. * METHODS test_navigate FOR TESTING RAISING cx_static_check.
METHODS test_startup_path FOR TESTING RAISING cx_static_check. * METHODS test_startup_path FOR TESTING RAISING cx_static_check.
*
METHODS test_app_dump FOR TESTING RAISING cx_static_check. * METHODS test_app_dump FOR TESTING RAISING cx_static_check.
*
ENDCLASS. *ENDCLASS.
*
*
CLASS ltcl_integration_test IMPLEMENTATION. *CLASS ltcl_integration_test IMPLEMENTATION.
*
METHOD test_xml_view. * METHOD test_xml_view.
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
FIELD-SYMBOLS <val> TYPE any. * FIELD-SYMBOLS <val> TYPE any.
* "test
z2ui5_cl_test_integration_test=>sv_state = ``. * z2ui5_cl_test_integration_test=>sv_state = ``.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post(
`{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
/ui2/cl_json=>deserialize( EXPORTING json = lv_response * /ui2/cl_json=>deserialize( EXPORTING json = lv_response
CHANGING data = lo_data ). * CHANGING data = lo_data ).
*
*
UNASSIGN <val>. * UNASSIGN <val>.
DATA(lv_assign) = `PARAMS->S_VIEW->XML->*`. * DATA(lv_assign) = `PARAMS->S_VIEW->XML->*`.
ASSIGN lo_data->(lv_assign) TO <val>. * ASSIGN lo_data->(lv_assign) TO <val>.
<val> = shift_left( <val> ). * <val> = shift_left( <val> ).
IF <val>(9) <> `<mvc:View`. * IF <val>(9) <> `<mvc:View`.
cl_abap_unit_assert=>fail( 'xml view - intital view wrong' ). * cl_abap_unit_assert=>fail( 'xml view - intital view wrong' ).
ENDIF. * ENDIF.
*
ENDMETHOD. * ENDMETHOD.
*
METHOD test_index_html. * METHOD test_index_html.
*
DATA(lv_index_html) = z2ui5_cl_fw_http_handler=>http_get( ). * DATA(lv_index_html) = z2ui5_cl_fw_http_handler=>http_get( ).
IF lv_index_html IS INITIAL. * IF lv_index_html IS INITIAL.
cl_abap_unit_assert=>fail( 'HTTP GET - index html initial' ). * cl_abap_unit_assert=>fail( 'HTTP GET - index html initial' ).
ENDIF. * ENDIF.
*
ENDMETHOD. * ENDMETHOD.
*
*
METHOD test_id. * METHOD test_id.
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
FIELD-SYMBOLS <val> TYPE any. * FIELD-SYMBOLS <val> TYPE any.
*
z2ui5_cl_test_integration_test=>sv_state = ``. * z2ui5_cl_test_integration_test=>sv_state = ``.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post(
`{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
/ui2/cl_json=>deserialize( EXPORTING json = lv_response * /ui2/cl_json=>deserialize( EXPORTING json = lv_response
CHANGING data = lo_data ). * CHANGING data = lo_data ).
*
*
UNASSIGN <val>. * UNASSIGN <val>.
DATA(lv_assign) = `ID->*`. * DATA(lv_assign) = `ID->*`.
ASSIGN lo_data->(lv_assign) TO <val>. * ASSIGN lo_data->(lv_assign) TO <val>.
IF <val> IS INITIAL. * IF <val> IS INITIAL.
cl_abap_unit_assert=>fail( msg = 'id - initial value is initial' * cl_abap_unit_assert=>fail( msg = 'id - initial value is initial'
quit = 5 ). * quit = 5 ).
ENDIF. * ENDIF.
ENDMETHOD. * ENDMETHOD.
*
METHOD test_bind_one_way. * METHOD test_bind_one_way.
*
DATA(lo_test) = NEW z2ui5_cl_test_integration_test( ) ##NEEDED. * DATA(lo_test) = NEW z2ui5_cl_test_integration_test( ) ##NEEDED.
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
FIELD-SYMBOLS <val> TYPE any. * FIELD-SYMBOLS <val> TYPE any.
*
z2ui5_cl_test_integration_test=>sv_state = `TEST_ONE_WAY`. * z2ui5_cl_test_integration_test=>sv_state = `TEST_ONE_WAY`.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post(
`{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
*
/ui2/cl_json=>deserialize( EXPORTING json = lv_response * /ui2/cl_json=>deserialize( EXPORTING json = lv_response
CHANGING data = lo_data ). * CHANGING data = lo_data ).
*
*
UNASSIGN <val>. * UNASSIGN <val>.
DATA(lv_assign) = `OVIEWMODEL->QUANTITY->*`. * DATA(lv_assign) = `OVIEWMODEL->QUANTITY->*`.
ASSIGN lo_data->(lv_assign) TO <val>. * ASSIGN lo_data->(lv_assign) TO <val>.
IF <val> <> `500`. * IF <val> <> `500`.
cl_abap_unit_assert=>fail( msg = 'data binding - initial set EDIT wrong' * cl_abap_unit_assert=>fail( msg = 'data binding - initial set EDIT wrong'
quit = 5 ). * quit = 5 ).
ENDIF. * ENDIF.
ENDMETHOD. * ENDMETHOD.
*
METHOD test_bind_two_way. * METHOD test_bind_two_way.
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
FIELD-SYMBOLS <val> TYPE any. * FIELD-SYMBOLS <val> TYPE any.
*
z2ui5_cl_test_integration_test=>sv_state = ``. * z2ui5_cl_test_integration_test=>sv_state = ``.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post(
`{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
/ui2/cl_json=>deserialize( EXPORTING json = lv_response * /ui2/cl_json=>deserialize( EXPORTING json = lv_response
CHANGING data = lo_data ). * CHANGING data = lo_data ).
*
*
UNASSIGN <val>. * UNASSIGN <val>.
DATA(lv_assign) = `OVIEWMODEL->EDIT->QUANTITY->*`. * DATA(lv_assign) = `OVIEWMODEL->EDIT->QUANTITY->*`.
ASSIGN lo_data->(lv_assign) TO <val>. * ASSIGN lo_data->(lv_assign) TO <val>.
IF <val> <> `500`. * IF <val> <> `500`.
cl_abap_unit_assert=>fail( msg = 'data binding - initial set EDIT wrong' * cl_abap_unit_assert=>fail( msg = 'data binding - initial set EDIT wrong'
quit = 5 ). * quit = 5 ).
ENDIF. * ENDIF.
ENDMETHOD. * ENDMETHOD.
*
METHOD test_message_box. * METHOD test_message_box.
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
FIELD-SYMBOLS <val> TYPE any. * FIELD-SYMBOLS <val> TYPE any.
*
z2ui5_cl_test_integration_test=>sv_state = `TEST_MESSAGE_BOX`. * z2ui5_cl_test_integration_test=>sv_state = `TEST_MESSAGE_BOX`.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post(
`{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
/ui2/cl_json=>deserialize( EXPORTING json = lv_response * /ui2/cl_json=>deserialize( EXPORTING json = lv_response
CHANGING data = lo_data ). * CHANGING data = lo_data ).
*
*
*
UNASSIGN <val>. * UNASSIGN <val>.
DATA(lv_assign) = `PARAMS->S_MSG_BOX->TEXT->*`. * DATA(lv_assign) = `PARAMS->S_MSG_BOX->TEXT->*`.
ASSIGN lo_data->(lv_assign) TO <val>. * ASSIGN lo_data->(lv_assign) TO <val>.
IF <val> <> `test message box`. * IF <val> <> `test message box`.
cl_abap_unit_assert=>fail( msg = 'message box - text wrong' * cl_abap_unit_assert=>fail( msg = 'message box - text wrong'
quit = 5 ). * quit = 5 ).
ENDIF. * ENDIF.
*
UNASSIGN <val>. * UNASSIGN <val>.
lv_assign = `PARAMS->S_MSG_BOX->TYPE->*`. * lv_assign = `PARAMS->S_MSG_BOX->TYPE->*`.
ASSIGN lo_data->(lv_assign) TO <val>. * ASSIGN lo_data->(lv_assign) TO <val>.
IF <val> <> `information`. * IF <val> <> `information`.
cl_abap_unit_assert=>fail( msg = 'message box - type wrong' * cl_abap_unit_assert=>fail( msg = 'message box - type wrong'
quit = 5 ). * quit = 5 ).
ENDIF. * ENDIF.
ENDMETHOD. * ENDMETHOD.
*
METHOD test_message_toast. * METHOD test_message_toast.
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
FIELD-SYMBOLS <val> TYPE any. * FIELD-SYMBOLS <val> TYPE any.
*
z2ui5_cl_test_integration_test=>sv_state = `TEST_MESSAGE_TOAST`. * z2ui5_cl_test_integration_test=>sv_state = `TEST_MESSAGE_TOAST`.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post(
`{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
/ui2/cl_json=>deserialize( EXPORTING json = lv_response * /ui2/cl_json=>deserialize( EXPORTING json = lv_response
CHANGING data = lo_data ). * CHANGING data = lo_data ).
*
*
*
UNASSIGN <val>. * UNASSIGN <val>.
DATA(lv_assign) = `PARAMS->S_MSG_TOAST->TEXT->*`. * DATA(lv_assign) = `PARAMS->S_MSG_TOAST->TEXT->*`.
ASSIGN lo_data->(lv_assign) TO <val>. * ASSIGN lo_data->(lv_assign) TO <val>.
IF <val> <> `test message toast`. * IF <val> <> `test message toast`.
cl_abap_unit_assert=>fail( msg = 'message toast - text wrong' * cl_abap_unit_assert=>fail( msg = 'message toast - text wrong'
quit = 5 ). * quit = 5 ).
ENDIF. * ENDIF.
*
ENDMETHOD. * ENDMETHOD.
*
*
METHOD test_xml_popup. * METHOD test_xml_popup.
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
FIELD-SYMBOLS <val> TYPE any. * FIELD-SYMBOLS <val> TYPE any.
*
z2ui5_cl_test_integration_test=>sv_state = `TEST_POPUP`. * z2ui5_cl_test_integration_test=>sv_state = `TEST_POPUP`.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post(
`{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
/ui2/cl_json=>deserialize( EXPORTING json = lv_response * /ui2/cl_json=>deserialize( EXPORTING json = lv_response
CHANGING data = lo_data ). * CHANGING data = lo_data ).
*
*
UNASSIGN <val>. * UNASSIGN <val>.
DATA(lv_assign) = `PARAMS->S_POPUP->XML->*`. * DATA(lv_assign) = `PARAMS->S_POPUP->XML->*`.
ASSIGN lo_data->(lv_assign) TO <val>. * ASSIGN lo_data->(lv_assign) TO <val>.
<val> = shift_left( <val> ). * <val> = shift_left( <val> ).
IF <val>(9) <> `<mvc:View`. * IF <val>(9) <> `<mvc:View`.
cl_abap_unit_assert=>fail( msg = 'xml popup - intital popup wrong' * cl_abap_unit_assert=>fail( msg = 'xml popup - intital popup wrong'
quit = 5 ). * quit = 5 ).
ENDIF. * ENDIF.
ENDMETHOD. * ENDMETHOD.
*
METHOD test_landing_page. * METHOD test_landing_page.
*
*
ENDMETHOD. * ENDMETHOD.
*
METHOD test_scroll_cursor. * METHOD test_scroll_cursor.
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
*
z2ui5_cl_test_integration_test=>sv_state = `TEST_SCROLL_CURSOR`. * z2ui5_cl_test_integration_test=>sv_state = `TEST_SCROLL_CURSOR`.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post(
`{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
/ui2/cl_json=>deserialize( EXPORTING json = lv_response * /ui2/cl_json=>deserialize( EXPORTING json = lv_response
CHANGING data = lo_data ). * CHANGING data = lo_data ).
*
ENDMETHOD. * ENDMETHOD.
*
METHOD test_startup_path. * METHOD test_startup_path.
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
*
z2ui5_cl_test_integration_test=>sv_state = `TEST_NAVIGATE`. * z2ui5_cl_test_integration_test=>sv_state = `TEST_NAVIGATE`.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post(
`{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
/ui2/cl_json=>deserialize( EXPORTING json = lv_response * /ui2/cl_json=>deserialize( EXPORTING json = lv_response
CHANGING data = lo_data ). * CHANGING data = lo_data ).
*
ENDMETHOD. * ENDMETHOD.
*
METHOD test_navigate. * METHOD test_navigate.
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
*
z2ui5_cl_test_integration_test=>sv_state = `TEST_NAVIGATE`. * z2ui5_cl_test_integration_test=>sv_state = `TEST_NAVIGATE`.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post(
`{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
/ui2/cl_json=>deserialize( EXPORTING json = lv_response * /ui2/cl_json=>deserialize( EXPORTING json = lv_response
CHANGING data = lo_data ). * CHANGING data = lo_data ).
*
ENDMETHOD. * ENDMETHOD.
*
*
METHOD test_app_dump. * METHOD test_app_dump.
*
DATA lo_data TYPE REF TO data. * DATA lo_data TYPE REF TO data.
FIELD-SYMBOLS <val> TYPE any. * FIELD-SYMBOLS <val> TYPE any.
*
z2ui5_cl_test_integration_test=>sv_state = `ERROR`. * z2ui5_cl_test_integration_test=>sv_state = `ERROR`.
DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ). * DATA(lv_response) = z2ui5_cl_fw_http_handler=>http_post( `{ "OLOCATION" : { "SEARCH" : "app_start=z2ui5_cl_test_integration_test"}}` ).
*
*
/ui2/cl_json=>deserialize( * /ui2/cl_json=>deserialize(
EXPORTING * EXPORTING
json = lv_response * json = lv_response
CHANGING * CHANGING
data = lo_data ). * data = lo_data ).
*
UNASSIGN <val>. * UNASSIGN <val>.
ASSIGN (`LO_DATA->PARAMS->S_VIEW->XML->*`) TO <val>. * ASSIGN (`LO_DATA->PARAMS->S_VIEW->XML->*`) TO <val>.
cl_abap_unit_assert=>assert_not_initial( <val> ). * cl_abap_unit_assert=>assert_not_initial( <val> ).
*
ENDMETHOD. * ENDMETHOD.
*
*
ENDCLASS. *ENDCLASS.