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

Prepare serializing of ABAP Language Version (#6525)

Browse Source 
Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
Marc Bernard 2023-10-03 10:13:29 -04:00 committed by GitHub
parent 2babd63e8b
commit 796d645a3a
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 16 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
src/objects/core/zcl_abapgit_serialize.clas.abap
View File

@ -54,6 +54,7 @@ CLASS zcl_abapgit_serialize DEFINITION
DATA mo_dot_abapgit TYPE REF TO zcl_abapgit_dot_abapgit. DATA mo_dot_abapgit TYPE REF TO zcl_abapgit_dot_abapgit.
DATA ms_local_settings TYPE zif_abapgit_persistence=>ty_repo-local_settings. DATA ms_local_settings TYPE zif_abapgit_persistence=>ty_repo-local_settings.
DATA ms_i18n_params TYPE zif_abapgit_definitions=>ty_i18n_params. DATA ms_i18n_params TYPE zif_abapgit_definitions=>ty_i18n_params.
DATA mo_abap_language_version TYPE REF TO zcl_abapgit_abap_language_vers.
METHODS add_apack METHODS add_apack
IMPORTING IMPORTING
@ -275,6 +276,10 @@ CLASS zcl_abapgit_serialize IMPLEMENTATION.
io_dot = io_dot_abapgit io_dot = io_dot_abapgit
iv_main_language_only = is_local_settings-main_language_only ). iv_main_language_only = is_local_settings-main_language_only ).
CREATE OBJECT mo_abap_language_version
EXPORTING
io_dot_abapgit = mo_dot_abapgit.
ENDMETHOD. ENDMETHOD.
@ -443,7 +448,7 @@ CLASS zcl_abapgit_serialize IMPLEMENTATION.
CLEAR: <ls_ignored_count>-obj_name. CLEAR: <ls_ignored_count>-obj_name.
<ls_ignored_count>-count = <ls_ignored_count>-count + 1. <ls_ignored_count>-count = <ls_ignored_count>-count + 1.
ENDIF. ENDIF.
" init object so we can remove these entries afterwards " init object so we can remove these entries afterward
CLEAR <ls_tadir>-object. CLEAR <ls_tadir>-object.
ENDLOOP. ENDLOOP.
IF lt_ignored_count IS INITIAL. IF lt_ignored_count IS INITIAL.
@ -455,11 +460,10 @@ CLASS zcl_abapgit_serialize IMPLEMENTATION.
LOOP AT lt_ignored_count ASSIGNING <ls_ignored_count>. LOOP AT lt_ignored_count ASSIGNING <ls_ignored_count>.
IF <ls_ignored_count>-count = 1. IF <ls_ignored_count>-count = 1.
mi_log->add_warning( iv_msg = |Object { <ls_ignored_count>-obj_type } { mi_log->add_warning( |Object { <ls_ignored_count>-obj_type } { <ls_ignored_count>-obj_name } ignored| ).
<ls_ignored_count>-obj_name } ignored| ).
ELSE. ELSE.
mi_log->add_warning( iv_msg = |Object type { <ls_ignored_count>-obj_type } with { mi_log->add_warning( |Object type { <ls_ignored_count>-obj_type } with | &&
<ls_ignored_count>-count } objects ignored| ). |{ <ls_ignored_count>-count } objects ignored| ).
ENDIF. ENDIF.
ENDLOOP. ENDLOOP.
@ -504,11 +508,11 @@ CLASS zcl_abapgit_serialize IMPLEMENTATION.
IF mi_log IS BOUND. IF mi_log IS BOUND.
LOOP AT lt_unsupported_count ASSIGNING <ls_unsupported_count>. LOOP AT lt_unsupported_count ASSIGNING <ls_unsupported_count>.
IF <ls_unsupported_count>-count = 1. IF <ls_unsupported_count>-count = 1.
mi_log->add_error( iv_msg = |Object type { <ls_unsupported_count>-obj_type } not supported, { mi_log->add_error( |Object type { <ls_unsupported_count>-obj_type } not supported, | &&
<ls_unsupported_count>-obj_name } ignored| ). |<ls_unsupported_count>-obj_name } ignored| ).
ELSE. ELSE.
mi_log->add_error( iv_msg = |Object type { <ls_unsupported_count>-obj_type } not supported, { mi_log->add_error( |Object type { <ls_unsupported_count>-obj_type } not supported, | &&
<ls_unsupported_count>-count } objects ignored| ). |<ls_unsupported_count>-count } objects ignored| ).
ENDIF. ENDIF.
ENDLOOP. ENDLOOP.
ENDIF. ENDIF.
@ -564,6 +568,8 @@ CLASS zcl_abapgit_serialize IMPLEMENTATION.
ASSERT mv_free > 0. ASSERT mv_free > 0.
lv_abap_language_version = mo_abap_language_version->get_repo_abap_language_version( ).
DO. DO.
lv_task = |{ iv_task }-{ sy-index }|. lv_task = |{ iv_task }-{ sy-index }|.
CALL FUNCTION 'Z_ABAPGIT_SERIALIZE_PARALLEL' CALL FUNCTION 'Z_ABAPGIT_SERIALIZE_PARALLEL'
@ -610,6 +616,7 @@ CLASS zcl_abapgit_serialize IMPLEMENTATION.
ls_file_item-item-obj_name = is_tadir-obj_name. ls_file_item-item-obj_name = is_tadir-obj_name.
ls_file_item-item-devclass = is_tadir-devclass. ls_file_item-item-devclass = is_tadir-devclass.
ls_file_item-item-srcsystem = is_tadir-srcsystem. ls_file_item-item-srcsystem = is_tadir-srcsystem.
ls_file_item-item-abap_language_version = mo_abap_language_version->get_repo_abap_language_version( ).
TRY. TRY.
ls_file_item = zcl_abapgit_objects=>serialize( ls_file_item = zcl_abapgit_objects=>serialize(