SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 12:20:51 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Ignore XTI includes in FUGR

Browse Source 
Do not serialize XTI includes (simple transformations) for function groups. In case they exist in the remote repositiory, do not import them.
This commit is contained in:
Martin Fuchs 2019-04-04 14:54:10 +00:00 committed by Lars Hvam
parent 860896abd2
commit 4029cab9f6
1 changed files with 13 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/objects/zcl_abapgit_object_fugr.clas.abap
View File

@ -261,6 +261,11 @@ CLASS ZCL_ABAPGIT_OBJECT_FUGR IMPLEMENTATION.
LOOP AT lt_includes ASSIGNING <lv_include>. LOOP AT lt_includes ASSIGNING <lv_include>.
"ignore simple transformation includes (as long as they remain in existing repositories)
IF strlen( <lv_include> ) = 33 AND <lv_include>+30(3) = 'XTI'.
CONTINUE.
ENDIF.
lt_source = mo_files->read_abap( iv_extra = <lv_include> ). lt_source = mo_files->read_abap( iv_extra = <lv_include> ).
lo_xml = mo_files->read_xml( <lv_include> ). lo_xml = mo_files->read_xml( <lv_include> ).
@ -479,6 +484,7 @@ CLASS ZCL_ABAPGIT_OBJECT_FUGR IMPLEMENTATION.
" these includes might reside in a different package or might be shared between multiple function groups " these includes might reside in a different package or might be shared between multiple function groups
" or other programs and are hence no part of the to serialized FUGR object " or other programs and are hence no part of the to serialized FUGR object
" they will be handled as individual objects when serializing their package " they will be handled as individual objects when serializing their package
" in addition, referenced XTI includes referencing (simple) transformations must be ignored
SELECT obj_name SELECT obj_name
INTO TABLE lt_tadir_includes INTO TABLE lt_tadir_includes
FROM tadir FROM tadir
@ -490,6 +496,12 @@ CLASS ZCL_ABAPGIT_OBJECT_FUGR IMPLEMENTATION.
READ TABLE lt_tadir_includes WITH KEY table_line = <lv_include> TRANSPORTING NO FIELDS. READ TABLE lt_tadir_includes WITH KEY table_line = <lv_include> TRANSPORTING NO FIELDS.
IF sy-subrc = 0. IF sy-subrc = 0.
DELETE rt_includes. DELETE rt_includes.
CONTINUE.
ENDIF.
IF strlen( <lv_include> ) = 33 AND <lv_include>+30(3) = 'XTI'.
"ignore referenced (simple) transformation includes
DELETE rt_includes.
CONTINUE.
ENDIF. ENDIF.
ENDLOOP. ENDLOOP.