From f1c15b1e958c66d22c6d7ff1f27c03582fa3bc42 Mon Sep 17 00:00:00 2001 From: Lars Hvam Date: Mon, 4 Jun 2018 15:11:23 +0200 Subject: [PATCH] fix TOBJ diffs, #1435 (#1437) --- src/objects/zcl_abapgit_object_tobj.clas.abap | 22 +++++++++++++++++++ 1 file changed, 22 insertions(+) diff --git a/src/objects/zcl_abapgit_object_tobj.clas.abap b/src/objects/zcl_abapgit_object_tobj.clas.abap index c0a68f2db..4c638c79f 100644 --- a/src/objects/zcl_abapgit_object_tobj.clas.abap +++ b/src/objects/zcl_abapgit_object_tobj.clas.abap @@ -193,6 +193,28 @@ CLASS zcl_abapgit_object_tobj IMPLEMENTATION. zcx_abapgit_exception=>raise( 'error from OBJ_GENERATE' ). ENDIF. + CALL FUNCTION 'OBJ_SET_IMPORTABLE' + EXPORTING + iv_objectname = ls_objh-objectname + iv_objecttype = ls_objh-objecttype + iv_importable = ls_objh-importable + EXCEPTIONS + object_not_defined = 1 + invalid = 2 + transport_error = 3 + object_enqueue_failed = 4 + OTHERS = 5. + IF sy-subrc <> 0. + zcx_abapgit_exception=>raise( 'error from OBJ_SET_IMPORTABLE' ). + ENDIF. + +* fm OBJ_GENERATE takes the defaults from the DDIC object +* set OBJTRANSP directly, should be okay looking at the code in OBJ_SET_IMPORTABLE +* locking has been done in OBJ_SET_IMPORTABLE plus recording of transport + UPDATE objh SET objtransp = ls_objh-objtransp + WHERE objectname = ls_objh-objectname + AND objecttype = ls_objh-objecttype. + io_xml->read( EXPORTING iv_name = 'TOBJ' CHANGING cg_data = ls_tobj ). ls_tobj-tvdir-gendate = sy-datum.