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_common.clas.abap

Browse Source
This commit is contained in:
Bernd 2024-07-16 12:14:16 +02:00 committed by GitHub
parent f66a4d23eb
commit 636de5e2e1
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/zcl_excel_common.clas.abap
View File

@ -1111,6 +1111,8 @@ CLASS zcl_excel_common IMPLEMENTATION.
type_kind TYPE abap_typekind, type_kind TYPE abap_typekind,
flag_class TYPE abap_bool, flag_class TYPE abap_bool,
o_border TYPE REF TO zcl_excel_style_border. o_border TYPE REF TO zcl_excel_style_border.
* lo_refdescr TYPE REF TO cl_abap_refdescr,
* lv_clsname TYPE seoclsname.
FIELD-SYMBOLS: <field> TYPE any, FIELD-SYMBOLS: <field> TYPE any,
<fieldx> TYPE any, <fieldx> TYPE any,
@ -1123,6 +1125,9 @@ CLASS zcl_excel_common IMPLEMENTATION.
* Only borders will be passed as unbound references. But since we want to set a value we have to create an instance * Only borders will be passed as unbound references. But since we want to set a value we have to create an instance
CREATE OBJECT o_border. CREATE OBJECT o_border.
e_target = o_border. e_target = o_border.
* lo_refdescr ?= cl_abap_typedescr=>describe_by_data( e_target ).
* lv_clsname = lo_refdescr->get_referenced_type( )->get_relative_name( ).
* CREATE OBJECT e_target TYPE (lv_clsname).
ENDIF. ENDIF.
descr ?= cl_abap_structdescr=>describe_by_data( i_source ). descr ?= cl_abap_structdescr=>describe_by_data( i_source ).