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

ZABAPGIT table activation, #583

Browse Source
This commit is contained in:
larshp 2017-01-29 09:59:52 +00:00
parent fbcffd8142
commit 0f653bf15f
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/zabapgit_persistence.prog.abap
View File

@ -1349,7 +1349,8 @@ CLASS lcl_persistence_migrate IMPLEMENTATION.
METHOD table_create. METHOD table_create.
DATA: lv_obj_name TYPE tadir-obj_name, DATA: lv_rc LIKE sy-subrc,
lv_obj_name TYPE tadir-obj_name,
ls_dd02v TYPE dd02v, ls_dd02v TYPE dd02v,
ls_dd09l TYPE dd09l, ls_dd09l TYPE dd09l,
lt_dd03p TYPE STANDARD TABLE OF dd03p WITH DEFAULT KEY. lt_dd03p TYPE STANDARD TABLE OF dd03p WITH DEFAULT KEY.
@ -1427,11 +1428,14 @@ CLASS lcl_persistence_migrate IMPLEMENTATION.
CALL FUNCTION 'DDIF_TABL_ACTIVATE' CALL FUNCTION 'DDIF_TABL_ACTIVATE'
EXPORTING EXPORTING
name = lcl_persistence_db=>c_tabname name = lcl_persistence_db=>c_tabname
auth_chk = abap_false
IMPORTING
rc = lv_rc
EXCEPTIONS EXCEPTIONS
not_found = 1 not_found = 1
put_failure = 2 put_failure = 2
OTHERS = 3. OTHERS = 3.
IF sy-subrc <> 0. IF sy-subrc <> 0 OR lv_rc <> 0.
lcx_exception=>raise( 'migrate, error from DDIF_TABL_ACTIVATE' ). lcx_exception=>raise( 'migrate, error from DDIF_TABL_ACTIVATE' ).
ENDIF. ENDIF.