SAP/abap2xlsx
1
0
Fork 0
mirror of https://github.com/abap2xlsx/abap2xlsx.git synced 2025-05-05 22:07:30 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

Update zcl_excel_writer_2007.clas.abap

Browse Source
This commit is contained in:
Bernd 2024-05-01 10:24:41 +02:00 committed by GitHub
parent aee2811b5d
commit 4aad2f57fb
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/zcl_excel_writer_2007.clas.abap
View File

@ -4339,10 +4339,7 @@ CLASS zcl_excel_writer_2007 IMPLEMENTATION.
WHILE lv_next_row <= ls_sheet_content-cell_row. WHILE lv_next_row <= ls_sheet_content-cell_row.
lv_current_row = lv_next_row. lv_current_row = lv_next_row.
lv_next_row = lv_current_row + 1. lv_next_row = lv_current_row + 1.
IF lv_current_row = ls_sheet_content-cell_row. " cell value found in this row IF lv_current_row <> ls_sheet_content-cell_row OR " if true it is always less here
ASSIGN ls_sheet_content TO <ls_sheet_content>.
ENDIF.
IF lv_current_row <> ls_sheet_content-cell_row OR " greater doesn't occur here
ls_sheet_content-cell_value = lc_dummy_cell_content. ls_sheet_content-cell_value = lc_dummy_cell_content.
*Check if empty row is really necessary - this is basically the case when we have information in row_dimension *Check if empty row is really necessary - this is basically the case when we have information in row_dimension
lo_row_empty = io_worksheet->get_row( lv_current_row ). lo_row_empty = io_worksheet->get_row( lv_current_row ).
@ -4351,7 +4348,9 @@ CLASS zcl_excel_writer_2007 IMPLEMENTATION.
lo_row_empty->get_outline_level( io_worksheet ) > 0 OR lo_row_empty->get_outline_level( io_worksheet ) > 0 OR
lo_row_empty->get_xf_index( ) <> 0. lo_row_empty->get_xf_index( ) <> 0.
ENDIF. ENDIF.
IF lv_current_row <> ls_sheet_content-cell_row. " greater doesn't occur here IF lv_current_row = ls_sheet_content-cell_row. " cell value found in this row
ASSIGN ls_sheet_content TO <ls_sheet_content>.
ELSE.
" Dummyentry in column A " Dummyentry in column A
ls_sheet_content_empty-cell_row = lv_current_row. ls_sheet_content_empty-cell_row = lv_current_row.
ls_sheet_content_empty-cell_column = 1. ls_sheet_content_empty-cell_column = 1.
@ -4427,7 +4426,7 @@ CLASS zcl_excel_writer_2007 IMPLEMENTATION.
ls_last_row = <ls_sheet_content>. ls_last_row = <ls_sheet_content>.
ENDWHILE. ENDWHILE.
CHECK <ls_sheet_content>-cell_value <> lc_dummy_cell_content. CHECK ls_sheet_content-cell_value <> lc_dummy_cell_content.
*---> According to the other dummy lines from the WHILE loop above the start and end lines *---> According to the other dummy lines from the WHILE loop above the start and end lines
* contain dummy content without cell_coords in column A only, which don't need a 'C' node. * contain dummy content without cell_coords in column A only, which don't need a 'C' node.