SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 12:20:51 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Merge pull request #970 from christianguenter2/Issue_966

Browse Source 
#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
1 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/zabapgit_object_prog.prog.abap
View File

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