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

Fix #93 Read PROTECTION style

Browse Source 
git-svn-id: https://subversion.assembla.com/svn/abap2xlsx/trunk@181 b7d68dce-7c3c-4a99-8ce0-9ea847f5d049
This commit is contained in:
Tomek Mackowski 2011-05-13 21:49:35 +00:00
parent 0d952ea2ef
commit 3481c02f35
1 changed files with 28 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
ZA2X/CLAS/ZCL_EXCEL_READER_2007.slnk
View File

@ -371,6 +371,12 @@ ENDMETHOD.</source>
wraptext TYPE string, wraptext TYPE string,
END OF t_alignment. END OF t_alignment.
TYPES: BEGIN OF t_protection,
hidden TYPE string,
locked TYPE string,
END OF t_protection.
DATA: styles_xml TYPE REF TO if_ixml_document, DATA: styles_xml TYPE REF TO if_ixml_document,
iterator TYPE REF TO if_ixml_node_iterator, iterator TYPE REF TO if_ixml_node_iterator,
nodes TYPE REF TO if_ixml_node_collection, nodes TYPE REF TO if_ixml_node_collection,
@ -387,6 +393,7 @@ ENDMETHOD.</source>
style TYPE REF TO zcl_excel_style, style TYPE REF TO zcl_excel_style,
xf TYPE t_xf, xf TYPE t_xf,
alignment TYPE t_alignment, alignment TYPE t_alignment,
protection TYPE t_protection,
index TYPE i. index TYPE i.
styles_xml = me-&gt;get_ixml_from_zip_archive( ip_path ). styles_xml = me-&gt;get_ixml_from_zip_archive( ip_path ).
@ -472,6 +479,27 @@ ENDMETHOD.</source>
IF alignment-indent IS NOT INITIAL. IF alignment-indent IS NOT INITIAL.
style-&gt;alignment-&gt;indent = alignment-indent. style-&gt;alignment-&gt;indent = alignment-indent.
ENDIF. ENDIF.
ENDIF.
node2 ?= node-&gt;find_from_name( &apos;protection&apos; ).
IF node2 IS BOUND.
fill_struct_from_attributes(
EXPORTING
ip_element = node2
CHANGING
cp_structure = protection ).
IF protection-locked = &apos;1&apos; OR protection-locked = &apos;true&apos;.
style-&gt;protection-&gt;locked = zcl_excel_style_protection=&gt;c_protection_locked.
ELSE.
style-&gt;protection-&gt;locked = zcl_excel_style_protection=&gt;c_protection_unlocked.
ENDIF.
IF protection-hidden = &apos;1&apos; OR protection-hidden = &apos;true&apos;.
style-&gt;protection-&gt;hidden = zcl_excel_style_protection=&gt;c_protection_hidden.
ELSE.
style-&gt;protection-&gt;hidden = zcl_excel_style_protection=&gt;c_protection_unhidden.
ENDIF.
ENDIF. ENDIF.