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

serialization, FORM fixes (#2950)

Browse Source 
* FORM, tdlines duplicated, closes #2949

* FORM, set TDVERSION to constant, closes #2935
This commit is contained in:
Lars Hvam 2019-10-07 22:44:50 -07:00 committed by GitHub
parent 90e012a1ae
commit 28e052dbce
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/objects/zcl_abapgit_object_form.clas.abap
View File

@ -423,7 +423,7 @@ CLASS ZCL_ABAPGIT_OBJECT_FORM IMPLEMENTATION.
_clear_changed_fields( CHANGING cs_form_data = ls_form_data ). _clear_changed_fields( CHANGING cs_form_data = ls_form_data ).
compress_lines( is_form_data = ls_form_data compress_lines( is_form_data = ls_form_data
it_lines = lt_lines ). it_lines = lt_lines ).
INSERT ls_form_data INTO TABLE lt_form_data. INSERT ls_form_data INTO TABLE lt_form_data.
@ -488,6 +488,10 @@ CLASS ZCL_ABAPGIT_OBJECT_FORM IMPLEMENTATION.
_sort_tdlines_by_windows( CHANGING ct_form_windows = es_form_data-windows _sort_tdlines_by_windows( CHANGING ct_form_windows = es_form_data-windows
ct_lines = et_lines ). ct_lines = et_lines ).
es_form_data-form_header-tdversion = '00001'.
es_form_data-text_header-tdversion = '00001'.
ENDMETHOD. ENDMETHOD.
@ -534,6 +538,9 @@ CLASS ZCL_ABAPGIT_OBJECT_FORM IMPLEMENTATION.
lv_firstloop = abap_true. lv_firstloop = abap_true.
READ TABLE lt_lines INTO ls_lines WITH KEY tdformat = lv_elt_windows READ TABLE lt_lines INTO ls_lines WITH KEY tdformat = lv_elt_windows
tdline = ls_form_windows-tdwindow. tdline = ls_form_windows-tdwindow.
IF sy-subrc <> 0.
CONTINUE. " current loop
ENDIF.
LOOP AT lt_lines INTO ls_lines FROM sy-tabix. LOOP AT lt_lines INTO ls_lines FROM sy-tabix.
IF lv_firstloop = abap_false AND IF lv_firstloop = abap_false AND
ls_lines-tdformat = lv_elt_windows. ls_lines-tdformat = lv_elt_windows.