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

Merge branch 'main' into newObjectTypeCOTA

Browse Source
This commit is contained in:
Marc Bernard 2025-02-06 14:20:08 +01:00 committed by GitHub
commit c46d3629d7
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
2 changed files with 28 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/objects/sap/zif_abapgit_sap_package.intf.abap
View File

@ -41,14 +41,10 @@ INTERFACE zif_abapgit_sap_package
zcx_abapgit_exception . zcx_abapgit_exception .
METHODS read_description METHODS read_description
RETURNING RETURNING
VALUE(rv_description) TYPE string VALUE(rv_description) TYPE string.
RAISING
zcx_abapgit_exception .
METHODS read_responsible METHODS read_responsible
RETURNING RETURNING
VALUE(rv_responsible) TYPE usnam VALUE(rv_responsible) TYPE usnam.
RAISING
zcx_abapgit_exception .
METHODS create_child METHODS create_child
IMPORTING IMPORTING
!iv_child TYPE devclass !iv_child TYPE devclass

26
src/objects/zcl_abapgit_object_wdcc.clas.abap
View File

@ -8,6 +8,9 @@ CLASS zcl_abapgit_object_wdcc DEFINITION
INTERFACES zif_abapgit_object . INTERFACES zif_abapgit_object .
PROTECTED SECTION. PROTECTED SECTION.
METHODS after_import
RAISING
zcx_abapgit_exception .
PRIVATE SECTION. PRIVATE SECTION.
ENDCLASS. ENDCLASS.
@ -230,10 +233,33 @@ CLASS zcl_abapgit_object_wdcc IMPLEMENTATION.
tadir_insert( iv_package ). tadir_insert( iv_package ).
after_import( ).
corr_insert( iv_package ). corr_insert( iv_package ).
ENDMETHOD. ENDMETHOD.
METHOD after_import.
DATA: lt_cts_object_entry TYPE STANDARD TABLE OF e071 WITH DEFAULT KEY,
ls_cts_object_entry LIKE LINE OF lt_cts_object_entry,
lt_cts_key TYPE STANDARD TABLE OF e071k WITH DEFAULT KEY.
ls_cts_object_entry-pgmid = 'R3TR'.
ls_cts_object_entry-object = ms_item-obj_type.
ls_cts_object_entry-obj_name = ms_item-obj_name.
INSERT ls_cts_object_entry INTO TABLE lt_cts_object_entry.
CALL FUNCTION 'WDR_CFG_AFTER_IMPORT'
EXPORTING
iv_tarclient = sy-mandt
iv_is_upgrade = abap_false
TABLES
tt_e071 = lt_cts_object_entry
tt_e071k = lt_cts_key.
ENDMETHOD.
METHOD zif_abapgit_object~exists. METHOD zif_abapgit_object~exists.