Merge pull request #970 from christianguenter2/Issue_966

#966 PROG: force delete of used includes
This commit is contained in:
Lars Hvam 2017-10-10 17:26:09 +02:00 committed by GitHub
commit 27561e2884

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.