Skip to content

Automatic Update #16

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 1 commit into from
Oct 14, 2024
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view

Large diffs are not rendered by default.

Large diffs are not rendered by default.

Large diffs are not rendered by default.

Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>Z2UI52409_CL_AJSON</CLSNAME>
<CLSNAME>Z2UI6_CL_AJSON</CLSNAME>
<LANGU>E</LANGU>
<DESCRIPT>AJSON</DESCRIPT>
<STATE>1</STATE>
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
CLASS z2ui52409_cl_ajson_filter_lib DEFINITION
CLASS z2ui6_cl_ajson_filter_lib DEFINITION
PUBLIC
FINAL
CREATE PUBLIC .
Expand All @@ -7,33 +7,33 @@ CLASS z2ui52409_cl_ajson_filter_lib DEFINITION

CLASS-METHODS create_empty_filter
RETURNING
VALUE(ri_filter) TYPE REF TO z2ui52409_if_ajson_filter
VALUE(ri_filter) TYPE REF TO z2ui6_if_ajson_filter
RAISING
z2ui52409_cx_ajson_error .
z2ui6_cx_ajson_error .
CLASS-METHODS create_path_filter
IMPORTING
!it_skip_paths TYPE string_table OPTIONAL
!iv_skip_paths TYPE string OPTIONAL
!iv_pattern_search TYPE abap_bool DEFAULT abap_false
RETURNING
VALUE(ri_filter) TYPE REF TO z2ui52409_if_ajson_filter
VALUE(ri_filter) TYPE REF TO z2ui6_if_ajson_filter
RAISING
z2ui52409_cx_ajson_error .
z2ui6_cx_ajson_error .
CLASS-METHODS create_and_filter
IMPORTING
!it_filters TYPE z2ui52409_if_ajson_filter=>ty_filter_tab
!it_filters TYPE z2ui6_if_ajson_filter=>ty_filter_tab
RETURNING
VALUE(ri_filter) TYPE REF TO z2ui52409_if_ajson_filter
VALUE(ri_filter) TYPE REF TO z2ui6_if_ajson_filter
RAISING
z2ui52409_cx_ajson_error .
z2ui6_cx_ajson_error .

PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.



CLASS z2ui52409_cl_ajson_filter_lib IMPLEMENTATION.
CLASS z2ui6_cl_ajson_filter_lib IMPLEMENTATION.


METHOD create_and_filter.
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -4,15 +4,15 @@

CLASS lcl_empty_filter DEFINITION FINAL.
PUBLIC SECTION.
INTERFACES z2ui52409_if_ajson_filter.
INTERFACES z2ui6_if_ajson_filter.
ENDCLASS.

CLASS lcl_empty_filter IMPLEMENTATION.
METHOD z2ui52409_if_ajson_filter~keep_node.
METHOD z2ui6_if_ajson_filter~keep_node.

rv_keep = boolc(
( iv_visit = z2ui52409_if_ajson_filter=>visit_type-value AND is_node-value IS NOT INITIAL ) OR
( iv_visit <> z2ui52409_if_ajson_filter=>visit_type-value AND is_node-children > 0 ) ).
( iv_visit = z2ui6_if_ajson_filter=>visit_type-value AND is_node-value IS NOT INITIAL ) OR
( iv_visit <> z2ui6_if_ajson_filter=>visit_type-value AND is_node-children > 0 ) ).
" children = 0 on open for initially empty nodes and on close for filtered ones

ENDMETHOD.
Expand All @@ -24,22 +24,22 @@ ENDCLASS.

CLASS lcl_paths_filter DEFINITION FINAL.
PUBLIC SECTION.
INTERFACES z2ui52409_if_ajson_filter.
INTERFACES z2ui6_if_ajson_filter.
METHODS constructor
IMPORTING
it_skip_paths TYPE string_table OPTIONAL
iv_skip_paths TYPE string OPTIONAL
iv_pattern_search TYPE abap_bool
RAISING
z2ui52409_cx_ajson_error.
z2ui6_cx_ajson_error.
PRIVATE SECTION.
DATA mt_skip_paths TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line.
DATA mv_pattern_search TYPE abap_bool.
ENDCLASS.

CLASS lcl_paths_filter IMPLEMENTATION.

METHOD z2ui52409_if_ajson_filter~keep_node.
METHOD z2ui6_if_ajson_filter~keep_node.

DATA lv_full_path TYPE string.
FIELD-SYMBOLS <p> LIKE LINE OF mt_skip_paths.
Expand Down Expand Up @@ -68,7 +68,7 @@ CLASS lcl_paths_filter IMPLEMENTATION.
FIELD-SYMBOLS <s> TYPE string.

IF boolc( iv_skip_paths IS INITIAL ) = boolc( it_skip_paths IS INITIAL ). " XOR
z2ui52409_cx_ajson_error=>raise( 'no filter path specified' ).
z2ui6_cx_ajson_error=>raise( 'no filter path specified' ).
ENDIF.

LOOP AT it_skip_paths INTO lv_s.
Expand Down Expand Up @@ -103,19 +103,19 @@ ENDCLASS.

CLASS lcl_and_filter DEFINITION FINAL.
PUBLIC SECTION.
INTERFACES z2ui52409_if_ajson_filter.
INTERFACES z2ui6_if_ajson_filter.
METHODS constructor
IMPORTING
it_filters TYPE z2ui52409_if_ajson_filter=>ty_filter_tab
it_filters TYPE z2ui6_if_ajson_filter=>ty_filter_tab
RAISING
z2ui52409_cx_ajson_error.
z2ui6_cx_ajson_error.
PRIVATE SECTION.
DATA mt_filters TYPE z2ui52409_if_ajson_filter=>ty_filter_tab.
DATA mt_filters TYPE z2ui6_if_ajson_filter=>ty_filter_tab.
ENDCLASS.

CLASS lcl_and_filter IMPLEMENTATION.

METHOD z2ui52409_if_ajson_filter~keep_node.
METHOD z2ui6_if_ajson_filter~keep_node.

DATA li_filter LIKE LINE OF mt_filters.

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -3,24 +3,24 @@ CLASS ltcl_filters_test DEFINITION FINAL
RISK LEVEL HARMLESS
DURATION SHORT.
PRIVATE SECTION.
METHODS empty_filter_simple FOR TESTING RAISING z2ui52409_cx_ajson_error.
METHODS empty_filter_deep FOR TESTING RAISING z2ui52409_cx_ajson_error.
METHODS path_filter FOR TESTING RAISING z2ui52409_cx_ajson_error.
METHODS path_filter_string FOR TESTING RAISING z2ui52409_cx_ajson_error.
METHODS path_filter_w_patterns FOR TESTING RAISING z2ui52409_cx_ajson_error.
METHODS path_filter_deep FOR TESTING RAISING z2ui52409_cx_ajson_error.
METHODS and_filter FOR TESTING RAISING z2ui52409_cx_ajson_error.
METHODS empty_filter_simple FOR TESTING RAISING z2ui6_cx_ajson_error.
METHODS empty_filter_deep FOR TESTING RAISING z2ui6_cx_ajson_error.
METHODS path_filter FOR TESTING RAISING z2ui6_cx_ajson_error.
METHODS path_filter_string FOR TESTING RAISING z2ui6_cx_ajson_error.
METHODS path_filter_w_patterns FOR TESTING RAISING z2ui6_cx_ajson_error.
METHODS path_filter_deep FOR TESTING RAISING z2ui6_cx_ajson_error.
METHODS and_filter FOR TESTING RAISING z2ui6_cx_ajson_error.
ENDCLASS.


CLASS ltcl_filters_test IMPLEMENTATION.

METHOD empty_filter_simple.

DATA li_json TYPE REF TO z2ui52409_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui52409_if_ajson.
DATA li_json TYPE REF TO z2ui6_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui6_if_ajson.

li_json = z2ui52409_cl_ajson=>create_empty( ).
li_json = z2ui6_cl_ajson=>create_empty( ).
li_json->set(
iv_path = '/a'
iv_val = '1' ).
Expand All @@ -34,9 +34,9 @@ CLASS ltcl_filters_test IMPLEMENTATION.
iv_path = '/d'
iv_val = 0 ).

li_json_filtered = z2ui52409_cl_ajson=>create_from(
li_json_filtered = z2ui6_cl_ajson=>create_from(
ii_source_json = li_json
ii_filter = z2ui52409_cl_ajson_filter_lib=>create_empty_filter( ) ).
ii_filter = z2ui6_cl_ajson_filter_lib=>create_empty_filter( ) ).

cl_abap_unit_assert=>assert_equals(
act = li_json_filtered->stringify( )
Expand All @@ -46,10 +46,10 @@ CLASS ltcl_filters_test IMPLEMENTATION.

METHOD empty_filter_deep.

DATA li_json TYPE REF TO z2ui52409_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui52409_if_ajson.
DATA li_json TYPE REF TO z2ui6_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui6_if_ajson.

li_json = z2ui52409_cl_ajson=>create_empty( ).
li_json = z2ui6_cl_ajson=>create_empty( ).
li_json->set(
iv_path = '/a'
iv_val = '1' ).
Expand All @@ -63,9 +63,9 @@ CLASS ltcl_filters_test IMPLEMENTATION.
iv_path = '/d/e'
iv_val = 0 ).

li_json_filtered = z2ui52409_cl_ajson=>create_from(
li_json_filtered = z2ui6_cl_ajson=>create_from(
ii_source_json = li_json
ii_filter = z2ui52409_cl_ajson_filter_lib=>create_empty_filter( ) ).
ii_filter = z2ui6_cl_ajson_filter_lib=>create_empty_filter( ) ).

cl_abap_unit_assert=>assert_equals(
act = li_json_filtered->stringify( )
Expand All @@ -75,13 +75,13 @@ CLASS ltcl_filters_test IMPLEMENTATION.

METHOD path_filter.

DATA li_json TYPE REF TO z2ui52409_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui52409_if_ajson.
DATA li_json TYPE REF TO z2ui6_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui6_if_ajson.
DATA lt_paths TYPE string_table.

APPEND '/b/c' TO lt_paths.

li_json = z2ui52409_cl_ajson=>create_empty( ).
li_json = z2ui6_cl_ajson=>create_empty( ).
li_json->set(
iv_path = '/a'
iv_val = '1' ).
Expand All @@ -92,9 +92,9 @@ CLASS ltcl_filters_test IMPLEMENTATION.
iv_path = '/c/d'
iv_val = '3' ).

li_json_filtered = z2ui52409_cl_ajson=>create_from(
li_json_filtered = z2ui6_cl_ajson=>create_from(
ii_source_json = li_json
ii_filter = z2ui52409_cl_ajson_filter_lib=>create_path_filter( it_skip_paths = lt_paths ) ).
ii_filter = z2ui6_cl_ajson_filter_lib=>create_path_filter( it_skip_paths = lt_paths ) ).

cl_abap_unit_assert=>assert_equals(
act = li_json_filtered->stringify( )
Expand All @@ -104,10 +104,10 @@ CLASS ltcl_filters_test IMPLEMENTATION.

METHOD path_filter_string.

DATA li_json TYPE REF TO z2ui52409_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui52409_if_ajson.
DATA li_json TYPE REF TO z2ui6_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui6_if_ajson.

li_json = z2ui52409_cl_ajson=>create_empty( ).
li_json = z2ui6_cl_ajson=>create_empty( ).
li_json->set(
iv_path = '/a'
iv_val = '1' ).
Expand All @@ -118,9 +118,9 @@ CLASS ltcl_filters_test IMPLEMENTATION.
iv_path = '/c/d'
iv_val = '3' ).

li_json_filtered = z2ui52409_cl_ajson=>create_from(
li_json_filtered = z2ui6_cl_ajson=>create_from(
ii_source_json = li_json
ii_filter = z2ui52409_cl_ajson_filter_lib=>create_path_filter( iv_skip_paths = '/b/c,/c/d' ) ).
ii_filter = z2ui6_cl_ajson_filter_lib=>create_path_filter( iv_skip_paths = '/b/c,/c/d' ) ).

cl_abap_unit_assert=>assert_equals(
act = li_json_filtered->stringify( )
Expand All @@ -130,10 +130,10 @@ CLASS ltcl_filters_test IMPLEMENTATION.

METHOD path_filter_w_patterns.

DATA li_json TYPE REF TO z2ui52409_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui52409_if_ajson.
DATA li_json TYPE REF TO z2ui6_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui6_if_ajson.

li_json = z2ui52409_cl_ajson=>create_empty( ).
li_json = z2ui6_cl_ajson=>create_empty( ).
li_json->set(
iv_path = '/@meta'
iv_val = 'meta' ).
Expand All @@ -150,9 +150,9 @@ CLASS ltcl_filters_test IMPLEMENTATION.
iv_path = '/c/@meta2'
iv_val = 'meta2' ).

li_json_filtered = z2ui52409_cl_ajson=>create_from(
li_json_filtered = z2ui6_cl_ajson=>create_from(
ii_source_json = li_json
ii_filter = z2ui52409_cl_ajson_filter_lib=>create_path_filter(
ii_filter = z2ui6_cl_ajson_filter_lib=>create_path_filter(
iv_skip_paths = '/*/c,*/@*'
iv_pattern_search = abap_true ) ).

Expand All @@ -164,13 +164,13 @@ CLASS ltcl_filters_test IMPLEMENTATION.

METHOD path_filter_deep.

DATA li_json TYPE REF TO z2ui52409_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui52409_if_ajson.
DATA li_json TYPE REF TO z2ui6_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui6_if_ajson.
DATA lt_paths TYPE string_table.

APPEND '/b' TO lt_paths.

li_json = z2ui52409_cl_ajson=>create_empty( ).
li_json = z2ui6_cl_ajson=>create_empty( ).
li_json->set(
iv_path = '/a'
iv_val = '1' ).
Expand All @@ -184,9 +184,9 @@ CLASS ltcl_filters_test IMPLEMENTATION.
iv_path = '/c/d'
iv_val = '3' ).

li_json_filtered = z2ui52409_cl_ajson=>create_from(
li_json_filtered = z2ui6_cl_ajson=>create_from(
ii_source_json = li_json
ii_filter = z2ui52409_cl_ajson_filter_lib=>create_path_filter( it_skip_paths = lt_paths ) ).
ii_filter = z2ui6_cl_ajson_filter_lib=>create_path_filter( it_skip_paths = lt_paths ) ).

cl_abap_unit_assert=>assert_equals(
act = li_json_filtered->stringify( )
Expand All @@ -196,14 +196,14 @@ CLASS ltcl_filters_test IMPLEMENTATION.

METHOD and_filter.

DATA li_json TYPE REF TO z2ui52409_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui52409_if_ajson.
DATA lt_filters TYPE z2ui52409_if_ajson_filter=>ty_filter_tab.
DATA li_json TYPE REF TO z2ui6_if_ajson.
DATA li_json_filtered TYPE REF TO z2ui6_if_ajson.
DATA lt_filters TYPE z2ui6_if_ajson_filter=>ty_filter_tab.

APPEND z2ui52409_cl_ajson_filter_lib=>create_empty_filter( ) TO lt_filters.
APPEND z2ui52409_cl_ajson_filter_lib=>create_path_filter( iv_skip_paths = '/c' ) TO lt_filters.
APPEND z2ui6_cl_ajson_filter_lib=>create_empty_filter( ) TO lt_filters.
APPEND z2ui6_cl_ajson_filter_lib=>create_path_filter( iv_skip_paths = '/c' ) TO lt_filters.

li_json = z2ui52409_cl_ajson=>create_empty( ).
li_json = z2ui6_cl_ajson=>create_empty( ).
li_json->set(
iv_path = '/a'
iv_val = '1' ).
Expand All @@ -217,9 +217,9 @@ CLASS ltcl_filters_test IMPLEMENTATION.
iv_path = '/d'
iv_val = 0 ).

li_json_filtered = z2ui52409_cl_ajson=>create_from(
li_json_filtered = z2ui6_cl_ajson=>create_from(
ii_source_json = li_json
ii_filter = z2ui52409_cl_ajson_filter_lib=>create_and_filter( lt_filters ) ).
ii_filter = z2ui6_cl_ajson_filter_lib=>create_and_filter( lt_filters ) ).

cl_abap_unit_assert=>assert_equals(
act = li_json_filtered->stringify( )
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>Z2UI52409_CL_AJSON_FILTER_LIB</CLSNAME>
<CLSNAME>Z2UI6_CL_AJSON_FILTER_LIB</CLSNAME>
<LANGU>E</LANGU>
<DESCRIPT>AJson common typical filters</DESCRIPT>
<STATE>1</STATE>
Expand Down
Loading