Fix sap2/sap1 for AFF experimental (#6993)
Some checks failed
main-build / build-merged (push) Has been cancelled
main-build / auto-tag (push) Has been cancelled
main-build / coverage (push) Has been cancelled
main-build / auto-tag-artifact (push) Has been cancelled

Co-authored-by: abaplint[bot] <24845621+abaplint[bot]@users.noreply.github.com>
This commit is contained in:
Albert Mink 2024-07-23 12:36:06 +02:00 committed by GitHub
parent a7e984151b
commit a120ce66b0
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
4 changed files with 33 additions and 3 deletions

View File

@ -42,7 +42,7 @@ CLASS zcl_abapgit_properties_file IMPLEMENTATION.
METHOD constructor.
mv_lang = to_lower( iv_lang ).
mv_lang = to_upper( iv_lang ).
ENDMETHOD.

View File

@ -0,0 +1,26 @@
CLASS ltcl_test DEFINITION FINAL FOR TESTING.
PUBLIC SECTION.
PROTECTED SECTION.
PRIVATE SECTION.
METHODS assert_lang FOR TESTING RAISING cx_static_check.
ENDCLASS.
CLASS ltcl_test IMPLEMENTATION.
METHOD assert_lang.
DATA: lo_cut TYPE REF TO zcl_abapgit_properties_file.
DATA: lv_act TYPE laiso.
CREATE OBJECT lo_cut
EXPORTING
iv_lang = 'DE'.
lv_act = lo_cut->zif_abapgit_i18n_file~lang( ).
cl_abap_unit_assert=>assert_equals(
exp = 'DE'
act = lv_act ).
ENDMETHOD.
ENDCLASS.

View File

@ -10,6 +10,7 @@
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
<WITH_UNIT_TESTS>X</WITH_UNIT_TESTS>
</VSEOCLASS>
</asx:values>
</asx:abap>

View File

@ -706,7 +706,8 @@ CLASS lcl_aff_metadata_handler IMPLEMENTATION.
li_translation_file LIKE LINE OF lt_translation_file,
ls_aff_data TYPE zif_abapgit_aff_intf_v1=>ty_main,
lo_type_mapper TYPE REF TO zif_abapgit_aff_type_mapping,
ls_ag_data TYPE zcl_abapgit_object_intf=>ty_intf.
ls_ag_data TYPE zcl_abapgit_object_intf=>ty_intf,
lv_sap1 TYPE syst_langu.
lt_translation_file = io_files->read_i18n_files( ).
@ -717,7 +718,9 @@ CLASS lcl_aff_metadata_handler IMPLEMENTATION.
lo_properties_file ?= li_translation_file.
lo_properties_file->get_translations( IMPORTING ev_data = ls_aff_data ).
ls_aff_data-header-original_language = to_upper( li_translation_file->lang( ) ). " is target language
lv_sap1 = zcl_abapgit_convert=>language_sap2_to_sap1( li_translation_file->lang( ) ).
ls_aff_data-header-original_language = lv_sap1.
CREATE OBJECT lo_type_mapper TYPE lcl_aff_type_mapping.
lo_type_mapper->to_abapgit(