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-06-15 10:03:24 +02:00 committed by GitHub
parent 4331660726
commit e829d70889
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/zcl_excel_common.clas.abap
View File

@ -1120,9 +1120,18 @@ CLASS zcl_excel_common IMPLEMENTATION.
DESCRIBE FIELD e_target TYPE type_kind. DESCRIBE FIELD e_target TYPE type_kind.
flag_class = boolc( type_kind = cl_abap_typedescr=>typekind_oref ). flag_class = boolc( type_kind = cl_abap_typedescr=>typekind_oref ).
IF flag_class = abap_true AND e_target IS INITIAL. IF flag_class = abap_true AND e_target IS INITIAL.
* TRY.
* lo_refdescr ?= cl_abap_typedescr=>describe_by_data( e_target ).
* CASE lo_refdescr->get_referenced_type( )->get_relative_name( ).
* WHEN 'ZCL_EXCEL_STYLE_BORDER'.
* 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.
** WHEN 'ZCL_EXCEL_...'. " todo, if necessary
* WHEN OTHERS. " should not happen
* ENDCASE.
* CATCH cx_sy_move_cast_error. " should not happen
* ENDTRY.
ENDIF. ENDIF.
descr ?= cl_abap_structdescr=>describe_by_data( i_source ). descr ?= cl_abap_structdescr=>describe_by_data( i_source ).