mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-02 04:36:49 +08:00
AFF: Fix exception handling (#5609)
Catch exceptions when calling `TADIR` deletion Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
parent
380f297bc7
commit
c88e1aba5d
|
@ -95,12 +95,14 @@ CLASS zcl_abapgit_object_common_aff IMPLEMENTATION.
|
||||||
|
|
||||||
CALL FUNCTION 'TR_TADIR_INTERFACE'
|
CALL FUNCTION 'TR_TADIR_INTERFACE'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
wi_delete_tadir_entry = abap_true
|
wi_delete_tadir_entry = abap_true
|
||||||
wi_tadir_pgmid = 'R3TR'
|
wi_tadir_pgmid = 'R3TR'
|
||||||
wi_tadir_object = ms_item-obj_type
|
wi_tadir_object = ms_item-obj_type
|
||||||
wi_tadir_obj_name = ms_item-obj_name
|
wi_tadir_obj_name = ms_item-obj_name
|
||||||
wi_tadir_devclass = ms_item-devclass
|
wi_tadir_devclass = ms_item-devclass
|
||||||
wi_test_modus = abap_false.
|
wi_test_modus = abap_false
|
||||||
|
EXCEPTIONS
|
||||||
|
OTHERS = 1.
|
||||||
IF sy-subrc <> 0.
|
IF sy-subrc <> 0.
|
||||||
zcx_abapgit_exception=>raise_t100( ).
|
zcx_abapgit_exception=>raise_t100( ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
Loading…
Reference in New Issue
Block a user