Downport zcl_abapgit_object_tabl_ddl (#6751)

Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
Christian Günter 2024-01-15 10:38:42 +01:00 committed by GitHub
parent 29898d2aba
commit 3c33e4c636
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -713,6 +713,7 @@ CLASS ZCL_ABAPGIT_OBJECT_TABL_DDL IMPLEMENTATION.
METHOD serialize_top.
FIELD-SYMBOLS: <lv_pk_is_invhash> TYPE c. " ddpk_is_invhash
rv_ddl = rv_ddl && |@EndUserText.label : { escape_string( is_data-dd02v-ddtext ) }\n|.
@ -760,7 +761,12 @@ CLASS ZCL_ABAPGIT_OBJECT_TABL_DDL IMPLEMENTATION.
rv_ddl = rv_ddl && |@AbapCatalog.dataMaintenance : \n|.
ENDIF.
IF is_data-dd02v-pk_is_invhash = abap_true.
" doesn't exist on NW <= 750
ASSIGN
COMPONENT 'PK_IS_INVHASH'
OF STRUCTURE is_data-dd02v
TO <lv_pk_is_invhash>.
IF sy-subrc = 0 AND <lv_pk_is_invhash> = abap_true.
rv_ddl = rv_ddl && |@AbapCatalog.primaryKey.invertedHashIndex : true\n|.
ENDIF.