From c88e1aba5d12b7a9e09573a582f72a852e2175c3 Mon Sep 17 00:00:00 2001
From: Marc Bernard <59966492+mbtools@users.noreply.github.com>
Date: Thu, 2 Jun 2022 10:06:01 +0200
Subject: [PATCH] AFF: Fix exception handling (#5609)

Catch exceptions when calling `TADIR` deletion

Co-authored-by: Lars Hvam <larshp@hotmail.com>
---
 .../aff/zcl_abapgit_object_common_aff.clas.abap    | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/src/objects/aff/zcl_abapgit_object_common_aff.clas.abap b/src/objects/aff/zcl_abapgit_object_common_aff.clas.abap
index 651aa39e4..c42dce768 100644
--- a/src/objects/aff/zcl_abapgit_object_common_aff.clas.abap
+++ b/src/objects/aff/zcl_abapgit_object_common_aff.clas.abap
@@ -95,12 +95,14 @@ CLASS zcl_abapgit_object_common_aff IMPLEMENTATION.
 
         CALL FUNCTION 'TR_TADIR_INTERFACE'
           EXPORTING
-            wi_delete_tadir_entry          = abap_true
-            wi_tadir_pgmid                 = 'R3TR'
-            wi_tadir_object                = ms_item-obj_type
-            wi_tadir_obj_name              = ms_item-obj_name
-            wi_tadir_devclass              = ms_item-devclass
-            wi_test_modus                  = abap_false.
+            wi_delete_tadir_entry = abap_true
+            wi_tadir_pgmid        = 'R3TR'
+            wi_tadir_object       = ms_item-obj_type
+            wi_tadir_obj_name     = ms_item-obj_name
+            wi_tadir_devclass     = ms_item-devclass
+            wi_test_modus         = abap_false
+          EXCEPTIONS
+            OTHERS                = 1.
         IF sy-subrc <> 0.
           zcx_abapgit_exception=>raise_t100( ).
         ENDIF.