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

VARCL fix

Browse Source
This commit is contained in:
larshp 2016-11-23 17:41:51 +00:00
parent f7c08c0d10
commit 5b12359538
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/zabapgit_objects.prog.abap
View File

@ -1194,7 +1194,10 @@ CLASS lcl_objects_program IMPLEMENTATION.
lcx_exception=>raise( 'PROG, error inserting' ). lcx_exception=>raise( 'PROG, error inserting' ).
ENDIF. ENDIF.
IF is_progdir-varcl = space AND ls_progdir_new = abap_true. SELECT SINGLE * FROM progdir INTO ls_progdir_new
WHERE name = ls_progdir_new-name
AND state = ls_progdir_new-state.
IF sy-subrc = 0 AND is_progdir-varcl = space AND ls_progdir_new-varcl = abap_true.
* function module UPDATE_PROGDIR does not update VARCL * function module UPDATE_PROGDIR does not update VARCL
UPDATE progdir SET varcl = is_progdir-varcl UPDATE progdir SET varcl = is_progdir-varcl
WHERE name = ls_progdir_new-name WHERE name = ls_progdir_new-name