diff --git a/src/zabapgit_object_suso.prog.abap b/src/zabapgit_object_suso.prog.abap
index ebd09188b..c17f5251d 100644
--- a/src/zabapgit_object_suso.prog.abap
+++ b/src/zabapgit_object_suso.prog.abap
@@ -127,6 +127,8 @@ CLASS lcl_object_suso IMPLEMENTATION.
     io_xml->read( EXPORTING iv_name = 'TOBJVOR'
                   CHANGING  cg_data = lt_tobjvor ).
 
+    tadir_insert( iv_package ).
+
     lv_objectname = ms_item-obj_name.
     CALL FUNCTION 'SUSR_COMMEDITCHECK'
       EXPORTING
diff --git a/src/zabapgit_object_wdya.prog.abap b/src/zabapgit_object_wdya.prog.abap
index 578d901cc..074a30ffa 100644
--- a/src/zabapgit_object_wdya.prog.abap
+++ b/src/zabapgit_object_wdya.prog.abap
@@ -140,6 +140,8 @@ CLASS lcl_object_wdya IMPLEMENTATION.
           li_prop->set_value( <ls_property>-value ).
         ENDLOOP.
 
+        tadir_insert( iv_package ).
+
         lo_app->if_wdy_md_lockable_object~save_to_database( ).
       CATCH cx_wdy_md_exception.
         lcx_exception=>raise( 'error saving WDYA' ).