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

Fix #547 autofilter messed up if several sheets (#821)

Browse Source 
Fix #547

Co-authored-by: sandraros <sandra.rossi@gmail.com>
Co-authored-by: Abo <andrea@borgia.bo.it>
Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
sandraros 2021-10-04 16:50:50 +02:00 committed by GitHub
parent b9a248dcb4
commit 1076b86547
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
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/zcl_excel_reader_2007.clas.abap
View File

@ -26,6 +26,7 @@ CLASS zcl_excel_reader_2007 DEFINITION
targetmode TYPE string, targetmode TYPE string,
worksheet TYPE REF TO zcl_excel_worksheet, worksheet TYPE REF TO zcl_excel_worksheet,
sheetid TYPE string, "ins #235 - repeat rows/cols - needed to identify correct sheet sheetid TYPE string, "ins #235 - repeat rows/cols - needed to identify correct sheet
localsheetid TYPE string,
END OF t_relationship . END OF t_relationship .
TYPES: TYPES:
BEGIN OF t_fileversion, BEGIN OF t_fileversion,
@ -1935,6 +1936,7 @@ CLASS zcl_excel_reader_2007 IMPLEMENTATION.
READ TABLE lt_worksheets ASSIGNING <worksheet> WITH KEY id = ls_sheet-id. READ TABLE lt_worksheets ASSIGNING <worksheet> WITH KEY id = ls_sheet-id.
IF sy-subrc = 0. IF sy-subrc = 0.
<worksheet>-sheetid = ls_sheet-sheetid. "ins #235 - repeat rows/cols - needed to identify correct sheet <worksheet>-sheetid = ls_sheet-sheetid. "ins #235 - repeat rows/cols - needed to identify correct sheet
<worksheet>-localsheetid = |{ lv_workbook_index - 1 }|.
CONCATENATE lv_path <worksheet>-target CONCATENATE lv_path <worksheet>-target
INTO lv_worksheet_path. INTO lv_worksheet_path.
me->load_worksheet( ip_path = lv_worksheet_path me->load_worksheet( ip_path = lv_worksheet_path
@ -1998,8 +2000,7 @@ CLASS zcl_excel_reader_2007 IMPLEMENTATION.
*--------------------------------------------------------------------* *--------------------------------------------------------------------*
* issue#235 - repeat rows/columns - begin * issue#235 - repeat rows/columns - begin
*--------------------------------------------------------------------* *--------------------------------------------------------------------*
lv_tabix = ls_range-localsheetid + 1. READ TABLE lt_worksheets ASSIGNING <worksheet> WITH KEY localsheetid = ls_range-localsheetid.
READ TABLE lt_worksheets ASSIGNING <worksheet> INDEX lv_tabix.
IF sy-subrc = 0. IF sy-subrc = 0.
CASE ls_range-name. CASE ls_range-name.