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

Update zcl_excel_reader_2007.clas.abap

Browse Source
This commit is contained in:
Bernd 2024-01-31 14:52:39 +01:00 committed by GitHub
parent 11a372ba1b
commit 063dc41ad1
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 31 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
src/zcl_excel_reader_2007.clas.abap
View File

@ -232,6 +232,10 @@ CLASS zcl_excel_reader_2007 DEFINITION
IMPORTING
!io_ixml_rule TYPE REF TO if_ixml_element
!io_style_cond TYPE REF TO zcl_excel_style_cond .
METHODS load_worksheet_cond_format_tf
IMPORTING
!io_ixml_rule TYPE REF TO if_ixml_element
!io_style_cond TYPE REF TO zcl_excel_style_cond .
METHODS load_worksheet_drawing
IMPORTING
!ip_path TYPE string
@ -3208,6 +3212,16 @@ CLASS zcl_excel_reader_2007 IMPLEMENTATION.
lo_style_cond = io_worksheet->add_new_style_cond( '' ).
load_worksheet_cond_format_aa( io_ixml_rule = lo_ixml_rule
io_style_cond = lo_style_cond ).
WHEN zcl_excel_style_cond=>c_textfunction_beginswith OR
zcl_excel_style_cond=>c_textfunction_containstext OR
zcl_excel_style_cond=>c_textfunction_endswith OR
zcl_excel_style_cond=>c_textfunction_notcontains.
lo_style_cond = io_worksheet->add_new_style_cond( '' ).
load_worksheet_cond_format_tf( io_ixml_rule = lo_ixml_rule
io_style_cond = lo_style_cond ).
lv_rule = zcl_excel_style_cond=>c_rule_textfunction. "internal rule
WHEN OTHERS.
ENDCASE.
@ -3539,6 +3553,23 @@ CLASS zcl_excel_reader_2007 IMPLEMENTATION.
ENDMETHOD.
METHOD load_worksheet_cond_format_tf.
DATA lv_dxf_style_index TYPE i.
FIELD-SYMBOLS <ls_dxf_style> LIKE LINE OF me->mt_dxf_styles.
io_style_cond->mode_textfunction-textfunction = io_ixml_rule->get_attribute_ns( 'type' ).
io_style_cond->mode_textfunction-text = io_ixml_rule->get_attribute_ns( 'text' ).
lv_dxf_style_index = io_ixml_rule->get_attribute_ns( 'dxfId' ).
READ TABLE me->mt_dxf_styles ASSIGNING <ls_dxf_style> WITH KEY dxf = lv_dxf_style_index.
IF sy-subrc = 0.
io_style_cond->mode_textfunction-cell_style = <ls_dxf_style>-guid.
ENDIF.
ENDMETHOD.
METHOD load_worksheet_drawing.
TYPES: BEGIN OF t_c_nv_pr,