SAP/abap2xlsx
1
0
Fork 0
mirror of https://github.com/abap2xlsx/abap2xlsx.git synced 2025-05-05 11:26:14 +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-13 10:51:34 +02:00 committed by GitHub
parent a43fb179da
commit 6a233737dd
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/zcl_excel_writer_2007.clas.abap
View File

@ -4252,6 +4252,7 @@ CLASS zcl_excel_writer_2007 IMPLEMENTATION.
lo_row_iterator TYPE REF TO zcl_excel_collection_iterator,
lo_row TYPE REF TO zcl_excel_row,
lts_row_outlines TYPE zcl_excel_worksheet=>mty_ts_outlines_row,
ls_row_outline LIKE LINE OF lts_row_outlines,
ls_style_mapping TYPE zexcel_s_styles_mapping,
@ -4264,8 +4265,7 @@ CLASS zcl_excel_writer_2007 IMPLEMENTATION.
DATA: lt_column_formulas_used TYPE mty_column_formulas_used,
lv_si TYPE i.
FIELD-SYMBOLS: <ls_sheet_content> TYPE zexcel_s_cell_data,
<ls_row_outline> LIKE LINE OF lts_row_outlines.
FIELD-SYMBOLS: <ls_sheet_content> TYPE zexcel_s_cell_data.
" sheetData node
@ -4329,7 +4329,7 @@ CLASS zcl_excel_writer_2007 IMPLEMENTATION.
* Get every outline row to set outline level
lts_row_outlines = io_worksheet->get_row_outlines( ).
LOOP AT lts_row_outlines ASSIGNING <ls_row_outline>.
LOOP AT lts_row_outlines INTO ls_row_outline.
IF ls_row_outline-collapsed = abap_true.
* And include the line of the collapsed-status Symbol (+) shown below/above
IF io_worksheet->zif_excel_sheet_properties~summarybelow = zif_excel_sheet_properties=>c_below_on.
@ -4338,8 +4338,8 @@ CLASS zcl_excel_writer_2007 IMPLEMENTATION.
SUBTRACT 1 FROM ls_row_outline-row_from. " collapsed-status set on previous row
ENDIF.
ENDIF.
lv_current_row = <ls_row_outline>-row_from.
WHILE lv_current_row LE <ls_row_outline>-row_to.
lv_current_row = ls_row_outline-row_from.
WHILE lv_current_row <= ls_row_outline-row_to.
ls_row-num = lv_current_row.
INSERT ls_row INTO TABLE lt_sorted_rows.
ADD 1 TO lv_current_row.