Skip to content

Commit 94a27a4

Browse files
authored
Util updates (abap2UI5#1841)
* util updates * update * fixes * update downport fix * Delete src/01/00/02 directory * Delete src/01/00 directory * update
1 parent 0dac51f commit 94a27a4

File tree

4 files changed

+1012
-24
lines changed

4 files changed

+1012
-24
lines changed

src/00/03/z2ui5_cl_util.clas.abap

Lines changed: 62 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -85,6 +85,12 @@ CLASS z2ui5_cl_util DEFINITION
8585
RETURNING
8686
VALUE(result) TYPE ty_t_msg.
8787

88+
CLASS-METHODS rtti_get_data_element_text_l
89+
IMPORTING
90+
VALUE(val) TYPE any
91+
RETURNING
92+
VALUE(result) TYPE string.
93+
8894
CLASS-METHODS msg_get
8995
IMPORTING
9096
VALUE(val) TYPE any
@@ -147,6 +153,14 @@ CLASS z2ui5_cl_util DEFINITION
147153
RETURNING
148154
VALUE(result) TYPE string.
149155

156+
CLASS-METHODS tab_get_where_by_dfies
157+
IMPORTING
158+
mv_check_tab_field TYPE string
159+
ms_data_row TYPE REF TO data
160+
it_dfies TYPE z2ui5_cl_util=>ty_t_dfies
161+
RETURNING
162+
VALUE(result) TYPE string.
163+
150164
CLASS-METHODS itab_get_itab_by_csv
151165
IMPORTING
152166
val TYPE string
@@ -795,6 +809,48 @@ CLASS z2ui5_cl_util IMPLEMENTATION.
795809

796810
ENDMETHOD.
797811

812+
METHOD tab_get_where_by_dfies.
813+
814+
DATA val TYPE string.
815+
816+
LOOP AT it_dfies REFERENCE INTO DATA(dfies).
817+
818+
IF NOT ( dfies->keyflag = abap_true OR dfies->fieldname = mv_check_tab_field ).
819+
CONTINUE.
820+
ENDIF.
821+
822+
ASSIGN ms_data_row->* TO FIELD-SYMBOL(<row>).
823+
824+
ASSIGN COMPONENT dfies->fieldname OF STRUCTURE <row> TO FIELD-SYMBOL(<value>).
825+
IF <value> IS NOT ASSIGNED.
826+
CONTINUE.
827+
ENDIF.
828+
IF <value> IS INITIAL.
829+
CONTINUE.
830+
ENDIF.
831+
832+
IF result IS NOT INITIAL.
833+
DATA(and) = ` AND `.
834+
ENDIF.
835+
836+
IF <value> CA `_`.
837+
DATA(escape) = `ESCAPE '#'`.
838+
ELSE.
839+
CLEAR escape.
840+
ENDIF.
841+
842+
val = <value>.
843+
844+
IF val CA `_`.
845+
REPLACE ALL OCCURRENCES OF `_` IN val WITH `#_`.
846+
ENDIF.
847+
848+
result = |{ result }{ and } ( { dfies->fieldname } LIKE '%{ val }%' { escape } )|.
849+
850+
ENDLOOP.
851+
852+
ENDMETHOD.
853+
798854
METHOD itab_get_itab_by_csv.
799855

800856
DATA lt_comp TYPE cl_abap_structdescr=>component_table.
@@ -1467,4 +1523,10 @@ CLASS z2ui5_cl_util IMPLEMENTATION.
14671523

14681524
ENDMETHOD.
14691525

1526+
METHOD rtti_get_data_element_text_l.
1527+
1528+
result = z2ui5_cl_util=>rtti_get_data_element_texts( val )-long.
1529+
1530+
ENDMETHOD.
1531+
14701532
ENDCLASS.

0 commit comments

Comments
 (0)