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

SRVB: Clear fields and fix deserialize order (#7085)
Some checks failed
main-build / build-merged (push) Has been cancelled
Details
main-build / auto-tag (push) Has been cancelled
Details
main-build / coverage (push) Has been cancelled
Details
main-build / auto-tag-artifact (push) Has been cancelled
Details
ajson mirror / pr_ajson_changes (push) Has been cancelled
Details

Browse Source 
Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
Marc Bernard 2024-11-29 07:13:19 -05:00 committed by GitHub
parent d9a2fc8fdf
commit 65d08de249
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
3 changed files with 27 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/objects/core/zcl_abapgit_dependencies.clas.abap
View File

@ -119,7 +119,7 @@ CLASS zcl_abapgit_dependencies IMPLEMENTATION.
" AUTH after DCLS " AUTH after DCLS
<ls_tadir>-korrnum = '715000'. <ls_tadir>-korrnum = '715000'.
WHEN 'SUSH'. WHEN 'SUSH'.
" SUSH after SUSC " SUSH after SUSC and SRVB
<ls_tadir>-korrnum = '712000'. <ls_tadir>-korrnum = '712000'.
WHEN 'SUSC'. WHEN 'SUSC'.
" SUSC after SUSO " SUSC after SUSO
@ -130,6 +130,14 @@ CLASS zcl_abapgit_dependencies IMPLEMENTATION.
WHEN 'DCLS'. WHEN 'DCLS'.
" AUTH and SUSO after DCLS " AUTH and SUSO after DCLS
<ls_tadir>-korrnum = '705000'. <ls_tadir>-korrnum = '705000'.
WHEN 'G4BA' OR 'G4BS' OR 'IWMO' OR 'IWSV' OR 'IWVB'.
" after SRVB
<ls_tadir>-korrnum = '610000'.
WHEN 'SRVB'.
" after SRVD
<ls_tadir>-korrnum = '600500'.
WHEN 'SRVD'.
<ls_tadir>-korrnum = '600000'.
WHEN 'IASP'. WHEN 'IASP'.
<ls_tadir>-korrnum = '552000'. <ls_tadir>-korrnum = '552000'.
WHEN 'IARP'. WHEN 'IARP'.

6
src/objects/core/zcl_abapgit_file_deserialize.clas.abap
View File

@ -245,6 +245,12 @@ CLASS zcl_abapgit_file_deserialize IMPLEMENTATION.
WHEN 'ENSC'. WHEN 'ENSC'.
lt_requires = lt_items. lt_requires = lt_items.
DELETE lt_requires WHERE obj_type <> 'ENHS'. DELETE lt_requires WHERE obj_type <> 'ENHS'.
WHEN 'IWMO' OR 'IWSV' OR 'IWVB' OR 'SUSH'.
lt_requires = lt_items.
DELETE lt_requires WHERE obj_type <> 'SRVB'.
WHEN 'SRVB'.
lt_requires = lt_items.
DELETE lt_requires WHERE obj_type <> 'SRVD'.
ENDCASE. ENDCASE.
* TODO: END extract to object handler method * TODO: END extract to object handler method

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

@ -129,6 +129,18 @@ CLASS zcl_abapgit_object_srvb IMPLEMENTATION.
CHANGING CHANGING
cs_service_binding = cs_service_binding ). cs_service_binding = cs_service_binding ).
clear_field(
EXPORTING
iv_fieldname = 'METADATA-RESPONSIBLE'
CHANGING
cs_service_binding = cs_service_binding ).
clear_field(
EXPORTING
iv_fieldname = 'METADATA-MASTER_LANGUAGE'
CHANGING
cs_service_binding = cs_service_binding ).
ENDMETHOD. ENDMETHOD.