From 67216cc4a3f7a839f57f2531ec7452c5bc67aacc Mon Sep 17 00:00:00 2001
From: Fabian Lupa <f.lupa@flaiker.com>
Date: Mon, 2 Oct 2017 18:26:30 +0200
Subject: [PATCH] Fix object overwrite missing objects (fixes #949)

---
 src/zabapgit_objects_impl.prog.abap | 18 ++++++++++++++----
 1 file changed, 14 insertions(+), 4 deletions(-)

diff --git a/src/zabapgit_objects_impl.prog.abap b/src/zabapgit_objects_impl.prog.abap
index bcf41cbf8..5f98c62a7 100644
--- a/src/zabapgit_objects_impl.prog.abap
+++ b/src/zabapgit_objects_impl.prog.abap
@@ -11,7 +11,8 @@ CLASS lcl_objects IMPLEMENTATION.
 
   METHOD warning_overwrite.
 
-    DATA: lt_results_overwrite LIKE ct_results.
+    DATA: lt_results_overwrite   LIKE ct_results,
+          lt_confirmed_overwrite LIKE ct_results.
 
     FIELD-SYMBOLS: <ls_result>  LIKE LINE OF ct_results.
 
@@ -29,10 +30,19 @@ CLASS lcl_objects IMPLEMENTATION.
 
     ENDLOOP.
 
-    if lines( lt_results_overwrite ) > 0.
+    IF lines( lt_results_overwrite ) > 0.
       "all returned objects will be overwritten
-      ct_results = lcl_popups=>popup_select_obj_overwrite( lt_results_overwrite ).
-    endif.
+      lt_confirmed_overwrite = lcl_popups=>popup_select_obj_overwrite( lt_results_overwrite ).
+
+      LOOP AT lt_results_overwrite ASSIGNING <ls_result>.
+        READ TABLE lt_confirmed_overwrite TRANSPORTING NO FIELDS
+             WITH KEY obj_type = <ls_result>-obj_type
+                      obj_name = <ls_result>-obj_name.
+        IF sy-subrc <> 0.
+          DELETE TABLE ct_results FROM <ls_result>.
+        ENDIF.
+      ENDLOOP.
+    ENDIF.
 
   ENDMETHOD.