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

Update zcl_excel_writer_2007.clas.abap - Size of comments

Browse Source 
Modified method CREATE_XL_DRAWING_FOR_COMMENTS to have the possibility to change the size of the comments
This commit is contained in:
RixarSAP 2024-05-02 11:15:01 +02:00 committed by GitHub
parent 618471e3e7
commit 92453b9b3d
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 31 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
src/zcl_excel_writer_2007.clas.abap
View File

@ -3297,7 +3297,37 @@ CLASS zcl_excel_writer_2007 IMPLEMENTATION.
lo_element_clientdata->append_child( new_child = lo_element_sizewithcells ). lo_element_clientdata->append_child( new_child = lo_element_sizewithcells ).
lo_element_anchor = lo_document->create_simple_element( name = lc_xml_node_anchor lo_element_anchor = lo_document->create_simple_element( name = lc_xml_node_anchor
parent = lo_document ). parent = lo_document ).
lo_element_anchor->set_value( '2, 15, 11, 10, 4, 31, 15, 9' ).
*--------------------------------------------------------------------*
* Ricardo R. - 2024.05.02
*--------------------------------------------------------------------*
DATA:
lv_anchor TYPE string,
lv_height type i,
lv_width TYPE i,
lv_height_str type string,
lv_width_str TYPE string.
CONSTANTS:
lc_anchor_init TYPE string VALUE '0, 1, 11, 10, &width&, 31, &height&, 9'.
CALL METHOD lo_comment->get_size
IMPORTING
ep_width = lv_width
ep_height = lv_height.
lv_width_str = lv_width.
lv_height_str = lv_height.
lv_anchor = lc_anchor_init.
REPLACE '&height&' WITH lv_height_str INTO lv_anchor.
REPLACE '&width&' WITH lv_width_str INTO lv_anchor.
lo_element_anchor->set_value( lv_anchor ).
* lo_element_anchor->set_value( '2, 15, 11, 10, 4, 31, 15, 9' ). "Original line
*--------------------------------------------------------------------*
lo_element_clientdata->append_child( new_child = lo_element_anchor ). lo_element_clientdata->append_child( new_child = lo_element_anchor ).
lo_element_autofill = lo_document->create_simple_element( name = lc_xml_node_autofill lo_element_autofill = lo_document->create_simple_element( name = lc_xml_node_autofill
parent = lo_document ). parent = lo_document ).