SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-04-30 11:46:38 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

PROG: Support dynpros with splitter control (2) (#7038)
Some checks are pending
main-build / build-merged (push) Waiting to run
Details
main-build / auto-tag (push) Waiting to run
Details
main-build / auto-tag-artifact (push) Blocked by required conditions
Details
main-build / coverage (push) Waiting to run
Details

Browse Source
This commit is contained in:
Marc Bernard 2024-09-04 15:36:35 -04:00 committed by GitHub
parent 019cfe8152
commit fd673dac68
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/objects/zcl_abapgit_objects_program.clas.abap
View File

@ -375,7 +375,7 @@ CLASS zcl_abapgit_objects_program IMPLEMENTATION.
ENDLOOP.
IF ls_dynpro-header-type = 'N'.
IF ls_dynpro-header-type = 'N' AND ls_dynpro-nat_header IS NOT INITIAL.
DELETE FROM d021t WHERE prog = ls_dynpro-header-program AND dynr = ls_dynpro-header-screen ##SUBRC_OK.
INSERT d021t FROM TABLE ls_dynpro-nat_texts ##SUBRC_OK.
@ -853,7 +853,8 @@ CLASS zcl_abapgit_objects_program IMPLEMENTATION.
<ls_dynpro>-header = ls_header.
<ls_dynpro>-flow_logic = lt_flow_logic.
IF ls_header-type = 'N'.
READ TABLE lt_fieldlist_int TRANSPORTING NO FIELDS WITH KEY fill = 'X'.
IF ls_header-type = 'N' AND sy-subrc = 0.
" In particular for dynpros with splitter
<ls_dynpro>-nat_header = <ls_d020s>.
CLEAR: <ls_dynpro>-nat_header-dgen, <ls_dynpro>-nat_header-tgen.