fix creation of TR entries for uninstalled PROGs (#4343)

* fix creation of TR entries for uninstalled PROGs

Fixes creation of CTS Transport Request entries for PROG Objects uninstalled from transportable package.

* Abaplint Fixes

Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
Jānis B 2020-12-22 06:44:46 +01:00 committed by GitHub
parent d289439411
commit 6e4982f417
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -30,7 +30,7 @@ ENDCLASS.
CLASS zcl_abapgit_object_prog IMPLEMENTATION.
CLASS ZCL_ABAPGIT_OBJECT_PROG IMPLEMENTATION.
METHOD deserialize_texts.
@ -111,15 +111,21 @@ CLASS zcl_abapgit_object_prog IMPLEMENTATION.
METHOD zif_abapgit_object~delete.
DATA: lv_program LIKE sy-repid,
lv_obj_name TYPE e071-obj_name.
DATA:
lv_program LIKE sy-repid,
lv_obj_name TYPE e071-obj_name,
lv_corrnumber TYPE e071-trkorr.
lv_program = ms_item-obj_name.
lv_corrnumber = zcl_abapgit_default_transport=>get_instance( )->get( )-ordernum.
CALL FUNCTION 'RS_DELETE_PROGRAM'
EXPORTING
corrnumber = lv_corrnumber
program = lv_program
suppress_popup = abap_true
mass_delete_call = abap_true
tadir_devclass = iv_package
force_delete_used_includes = abap_true
EXCEPTIONS
enqueue_lock = 1