From 2b63a8d96fc23d58cb25174e381dfa336a3cbffd Mon Sep 17 00:00:00 2001 From: Thomas Ploski Date: Wed, 16 Apr 2025 10:27:05 +0000 Subject: [PATCH] Enable ABAP Language Version for TABL --- src/objects/tabl/zcl_abapgit_object_tabl.clas.abap | 14 +++++++++++--- 1 file changed, 11 insertions(+), 3 deletions(-) diff --git a/src/objects/tabl/zcl_abapgit_object_tabl.clas.abap b/src/objects/tabl/zcl_abapgit_object_tabl.clas.abap index b5b099665..46c06bf9f 100644 --- a/src/objects/tabl/zcl_abapgit_object_tabl.clas.abap +++ b/src/objects/tabl/zcl_abapgit_object_tabl.clas.abap @@ -84,7 +84,7 @@ ENDCLASS. -CLASS zcl_abapgit_object_tabl IMPLEMENTATION. +CLASS ZCL_ABAPGIT_OBJECT_TABL IMPLEMENTATION. METHOD clear_dd03p_fields. @@ -715,14 +715,16 @@ CLASS zcl_abapgit_object_tabl IMPLEMENTATION. METHOD zif_abapgit_object~deserialize. DATA: lv_name TYPE ddobjname, - ls_internal TYPE zif_abapgit_object_tabl=>ty_internal. + ls_internal TYPE zif_abapgit_object_tabl=>ty_internal, + ls_wa TYPE dd02l. FIELD-SYMBOLS: TYPE dd03p, TYPE dd05m, TYPE dd08v, TYPE dd35v, TYPE dd36m, - TYPE any. + TYPE any, + TYPE any. lv_name = ms_item-obj_name. " type conversion @@ -799,6 +801,12 @@ CLASS zcl_abapgit_object_tabl IMPLEMENTATION. zcx_abapgit_exception=>raise_t100( ). ENDIF. + ASSIGN COMPONENT 'ABAP_LANGUAGE_VERSION' OF STRUCTURE ls_wa TO . + IF sy-subrc = 0. + set_abap_language_version( CHANGING cv_abap_language_version = ms_item-abap_language_version ). + UPDATE dd02l SET abap_language_version = ms_item-abap_language_version WHERE tabname = lv_name. + ENDIF. + zcl_abapgit_objects_activation=>add_item( ms_item ). deserialize_indexes( ls_internal ).