mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 04:08:27 +08:00
#966 PROG: force delete of used includes
This commit is contained in:
parent
bcb5a52abb
commit
91a1608635
|
@ -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.
|
||||
|
|
Loading…
Reference in New Issue
Block a user