#966 PROG: force delete of used includes

This commit is contained in:
Christian Günter 2017-10-08 08:17:59 +00:00
parent bcb5a52abb
commit 91a1608635

View File

@ -84,19 +84,20 @@ CLASS lcl_object_prog IMPLEMENTATION.
DATA: lv_program LIKE sy-repid.
lv_program = ms_item-obj_name.
CALL FUNCTION 'RS_DELETE_PROGRAM'
EXPORTING
program = lv_program
suppress_popup = abap_true
program = lv_program
suppress_popup = abap_true
force_delete_used_includes = abap_true
EXCEPTIONS
enqueue_lock = 1
object_not_found = 2
permission_failure = 3
reject_deletion = 4
OTHERS = 5.
enqueue_lock = 1
object_not_found = 2
permission_failure = 3
reject_deletion = 4
OTHERS = 5.
IF sy-subrc <> 0.
zcx_abapgit_exception=>raise( |Error from RS_DELETE_PROGRAM: { sy-subrc }| ).
ENDIF.