diff --git a/src/01/00/03/z2ui5_cl_util.clas.abap b/src/01/00/03/z2ui5_cl_util.clas.abap index b511fc9c..e7bd30fa 100644 --- a/src/01/00/03/z2ui5_cl_util.clas.abap +++ b/src/01/00/03/z2ui5_cl_util.clas.abap @@ -365,6 +365,12 @@ CLASS z2ui5_cl_util DEFINITION CHANGING tab TYPE STANDARD TABLE. + CLASS-METHODS itab_filter_by_t_range + IMPORTING + val TYPE ty_t_filter_multi + CHANGING + tab TYPE STANDARD TABLE. + CLASS-METHODS time_get_time_by_stampl IMPORTING val TYPE timestampl @@ -766,7 +772,7 @@ CLASS z2ui5_cl_util IMPLEMENTATION. itab_corresponding( EXPORTING - val = lt_tab + val = val CHANGING tab = lt_tab ). @@ -1440,4 +1446,10 @@ CLASS z2ui5_cl_util IMPLEMENTATION. ENDLOOP. ENDMETHOD. + + + METHOD itab_filter_by_t_range. + + ENDMETHOD. + ENDCLASS. diff --git a/src/01/00/03/z2ui5_cl_util.clas.testclasses.abap b/src/01/00/03/z2ui5_cl_util.clas.testclasses.abap index e89dadfb..73c3d1a1 100644 --- a/src/01/00/03/z2ui5_cl_util.clas.testclasses.abap +++ b/src/01/00/03/z2ui5_cl_util.clas.testclasses.abap @@ -220,6 +220,7 @@ CLASS ltcl_unit_test DEFINITION FINAL FOR TESTING METHODS rtti_check_ref_data FOR TESTING RAISING cx_static_check. METHODS test_check_bound_a_not_inital FOR TESTING RAISING cx_static_check. METHODS test_sql_get_by_string FOR TESTING RAISING cx_static_check. + METHODS test_get_token_t_by_r_t FOR TESTING RAISING cx_static_check. ENDCLASS. @@ -863,6 +864,25 @@ CLASS ltcl_unit_test IMPLEMENTATION. ENDMETHOD. + METHOD test_get_token_t_by_r_t. + + DATA(lt_range) = VALUE z2ui5_cl_util=>ty_t_range( + ( sign = 'I' option = 'EQ' low = `table` high = `` ) + ). + + DATA(lt_result) = z2ui5_cl_util=>filter_get_token_t_by_range_t( lt_range ). + + DATA(lt_exp) = VALUE z2ui5_cl_util=>ty_t_token( + ( key = `=table` text = `=table` visible = 'X' selkz = '' editable = 'X' ) + ). + + cl_abap_unit_assert=>assert_equals( + act = lt_result + exp = lt_exp + ). + + ENDMETHOD. + METHOD test_rtti_get_t_attri_by_incl. IF sy-sysid = 'ABC'.