Skip to content
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
4 changes: 4 additions & 0 deletions changelog.txt
Original file line number Diff line number Diff line change
Expand Up @@ -12,6 +12,10 @@ Upgrade Note
------------------
Whenever you upgrade code pal for ABAP, it is highly recommended to execute the Y_CI_CHECK_REGISTRATION report to activate/reactivate the Checks (SE38 transaction) and regenerate the respective code inspector variant (SCI transaction)

2021-04-08 v.1.13.2
------------------
* Dump in Y_CHECK_DB_ACCESS_IN_UT (#363)

2021-04-05 v.1.13.1
------------------
* Y_CHECK_DB_ACCESS_IN_UT on INSERT INTO internal table (#348)
Expand Down
8 changes: 6 additions & 2 deletions src/checks/y_check_db_access_in_ut.clas.abap
Original file line number Diff line number Diff line change
Expand Up @@ -61,7 +61,7 @@ CLASS y_check_db_access_in_ut DEFINITION PUBLIC INHERITING FROM y_check_base CRE
METHODS is_part_of_framework IMPORTING structure TYPE sstruc
RETURNING VALUE(result) TYPE abap_bool.

METHODS is_persistent_object IMPORTING obj_name TYPE string
METHODS is_persistent_object IMPORTING obj_name TYPE tadir-obj_name
RETURNING VALUE(result) TYPE abap_bool.

METHODS is_internal_table IMPORTING statement TYPE sstmnt
Expand Down Expand Up @@ -140,7 +140,11 @@ CLASS Y_CHECK_DB_ACCESS_IN_UT IMPLEMENTATION.
WHEN third_token = keys-into THEN fourth_token
ELSE second_token ).

result = xsdbool( is_persistent_object( table_name ) = abap_false ).
IF strlen( table_name ) > 40.
RETURN.
ENDIF.

result = xsdbool( is_persistent_object( CONV #( table_name ) ) = abap_false ).
ENDMETHOD.


Expand Down
2 changes: 1 addition & 1 deletion src/y_code_pal_version.intf.abap
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
INTERFACE y_code_pal_version PUBLIC.
CONSTANTS abap TYPE string VALUE '1.13.1' ##NO_TEXT.
CONSTANTS abap TYPE string VALUE '1.13.2' ##NO_TEXT.
ENDINTERFACE.