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

Update zcl_excel_writer_2007.clas.abap -> table_style_none

Browse Source
This commit is contained in:
RixarSAP 2024-05-14 10:52:37 +02:00 committed by GitHub
parent 61482e2b30
commit e8bcec233a
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 32 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

63
src/zcl_excel_writer_2007.clas.abap
View File

@ -5785,38 +5785,39 @@ CLASS zcl_excel_writer_2007 IMPLEMENTATION.
lo_element->append_child( new_child = lo_element2 ).
ENDLOOP.
lo_element = lo_document->create_simple_element( name = 'tableStyleInfo'
parent = lo_element_root ).
lo_element->set_attribute_ns( name = 'name'
value = io_table->settings-table_style ).
lo_element->set_attribute_ns( name = 'showFirstColumn'
value = '0' ).
lo_element->set_attribute_ns( name = 'showLastColumn'
value = '0' ).
IF io_table->settings-show_row_stripes = abap_true.
lv_value = '1'.
ELSE.
lv_value = '0'.
IF io_table->settings-table_style NE zcl_excel_table=>table_style_none.
lo_element = lo_document->create_simple_element( name = 'tableStyleInfo'
parent = lo_element_root ).
lo_element->set_attribute_ns( name = 'name'
value = io_table->settings-table_style ).
lo_element->set_attribute_ns( name = 'showFirstColumn'
value = '0' ).
lo_element->set_attribute_ns( name = 'showLastColumn'
value = '0' ).
IF io_table->settings-show_row_stripes = abap_true.
lv_value = '1'.
ELSE.
lv_value = '0'.
ENDIF.
lo_element->set_attribute_ns( name = 'showRowStripes'
value = lv_value ).
IF io_table->settings-show_column_stripes = abap_true.
lv_value = '1'.
ELSE.
lv_value = '0'.
ENDIF.
lo_element->set_attribute_ns( name = 'showColumnStripes'
value = lv_value ).
lo_element_root->append_child( new_child = lo_element ).
ENDIF.
lo_element->set_attribute_ns( name = 'showRowStripes'
value = lv_value ).
IF io_table->settings-show_column_stripes = abap_true.
lv_value = '1'.
ELSE.
lv_value = '0'.
ENDIF.
lo_element->set_attribute_ns( name = 'showColumnStripes'
value = lv_value ).
lo_element_root->append_child( new_child = lo_element ).
**********************************************************************
* STEP 5: Create xstring stream
ep_content = render_xml_document( lo_document ).