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

Add unit test (#1060)

Browse Source 
* add unit test

* lint fixes
This commit is contained in:
oblomov 2024-04-05 18:07:14 +02:00 committed by GitHub
parent d372eeab32
commit 26977a6214
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 135 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

135
src/01/02/01/z2ui5_cl_core_attri_srv.clas.testclasses.abap
View File

@ -22,6 +22,8 @@ CLASS ltcl_test_app2 IMPLEMENTATION.
ENDCLASS.
CLASS ltcl_test_search_attri DEFINITION FINAL FOR TESTING
DURATION SHORT
RISK LEVEL HARMLESS.
@ -104,5 +106,138 @@ CLASS ltcl_test_search_attri IMPLEMENTATION.
ENDMETHOD.
ENDCLASS.
CLASS ltcl_test_app_sub DEFINITION FINAL FOR TESTING
DURATION MEDIUM
RISK LEVEL HARMLESS.
PUBLIC SECTION.
DATA mv_value TYPE string ##NEEDED.
DATA mr_value TYPE REF TO string.
* DATA mr_value2 TYPE REF TO data.
METHODS constructor.
ENDCLASS.
CLASS ltcl_test_app_sub IMPLEMENTATION.
METHOD constructor.
ENDMETHOD.
ENDCLASS.
CLASS ltcl_test_app3 DEFINITION FINAL FOR TESTING
DURATION MEDIUM
RISK LEVEL HARMLESS.
PUBLIC SECTION.
DATA mv_value TYPE string ##NEEDED.
DATA mr_value TYPE REF TO string.
* DATA mr_value2 TYPE REF TO data.
DATA mo_app TYPE REF TO ltcl_test_app_sub.
METHODS constructor.
ENDCLASS.
CLASS ltcl_test_app3 IMPLEMENTATION.
METHOD constructor.
mo_app = NEW #( ).
ENDMETHOD.
ENDCLASS.
CLASS ltcl_test_get_attri DEFINITION FINAL FOR TESTING
DURATION SHORT
RISK LEVEL HARMLESS.
PRIVATE SECTION.
METHODS first_test FOR TESTING RAISING cx_static_check.
METHODS second_test FOR TESTING RAISING cx_static_check.
METHODS third_test FOR TESTING RAISING cx_static_check.
METHODS test4 FOR TESTING RAISING cx_static_check.
ENDCLASS.
CLASS ltcl_test_get_attri IMPLEMENTATION.
METHOD first_test.
DATA(lo_app_client) = NEW ltcl_test_app3( ).
DATA lr_value TYPE REF TO data.
GET REFERENCE OF lo_app_client->mv_value INTO lr_value.
DATA(lt_attri) = VALUE z2ui5_if_core_types=>ty_t_attri( ).
DATA(lo_model) = NEW z2ui5_cl_core_attri_srv(
attri = REF #( lt_attri )
app = lo_app_client ).
DATA(lr_attri) = lo_model->attri_get_val_ref( `MV_VALUE` ).
IF REF #( lo_app_client->mv_value ) <> lr_attri.
cl_abap_unit_assert=>abort( ).
ENDIF.
ENDMETHOD.
METHOD second_test.
DATA(lo_app_client) = NEW ltcl_test_app3( ).
CREATE DATA lo_app_client->mr_value.
DATA(lt_attri) = VALUE z2ui5_if_core_types=>ty_t_attri( ).
DATA(lo_model) = NEW z2ui5_cl_core_attri_srv(
attri = REF #( lt_attri )
app = lo_app_client ).
DATA(lr_attri) = lo_model->attri_get_val_ref( `MR_VALUE->*` ).
IF lr_attri <> lo_app_client->mr_value.
cl_abap_unit_assert=>abort( ).
ENDIF.
ENDMETHOD.
METHOD third_test.
DATA(lo_app_client) = NEW ltcl_test_app3( ).
DATA(lt_attri) = VALUE z2ui5_if_core_types=>ty_t_attri( ).
DATA(lo_model) = NEW z2ui5_cl_core_attri_srv(
attri = REF #( lt_attri )
app = lo_app_client ).
DATA(lr_attri) = lo_model->attri_get_val_ref( `MO_APP->MV_VALUE` ).
IF REF #( lo_app_client->mo_app->mv_value ) <> lr_attri.
cl_abap_unit_assert=>abort( ).
ENDIF.
ENDMETHOD.
METHOD test4.
DATA(lo_app_client) = NEW ltcl_test_app3( ).
CREATE DATA lo_app_client->mo_app->mr_value.
DATA(lt_attri) = VALUE z2ui5_if_core_types=>ty_t_attri( ).
DATA(lo_model) = NEW z2ui5_cl_core_attri_srv(
attri = REF #( lt_attri )
app = lo_app_client ).
DATA(lr_attri) = lo_model->attri_get_val_ref( `MO_APP->MR_VALUE->*` ).
IF lr_attri <> lo_app_client->mo_app->mr_value.
cl_abap_unit_assert=>abort( ).
ENDIF.
ENDMETHOD.
ENDCLASS.