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

Merge branch 'main' into patch-load-workbook-rework

Browse Source
This commit is contained in:
Bernd 2024-09-13 14:42:25 +02:00 committed by GitHub
commit 3cc39fafd6
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 4 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/zcl_excel_worksheet.clas.abap
View File

@ -3492,26 +3492,17 @@ CLASS zcl_excel_worksheet IMPLEMENTATION.
METHOD normalize_style_parameter. METHOD normalize_style_parameter.
DATA: lo_style_type TYPE REF TO cl_abap_typedescr. DATA lo_style_type TYPE REF TO cl_abap_typedescr.
FIELD-SYMBOLS: FIELD-SYMBOLS <style> TYPE REF TO zcl_excel_style.
<style> TYPE REF TO zcl_excel_style.
CHECK ip_style_or_guid IS NOT INITIAL. CHECK ip_style_or_guid IS NOT INITIAL.
lo_style_type = cl_abap_typedescr=>describe_by_data( ip_style_or_guid ). lo_style_type = cl_abap_typedescr=>describe_by_data( ip_style_or_guid ).
IF lo_style_type->type_kind = lo_style_type->typekind_oref. IF lo_style_type->type_kind = lo_style_type->typekind_oref.
lo_style_type = cl_abap_typedescr=>describe_by_object_ref( ip_style_or_guid ). ASSIGN ip_style_or_guid TO <style>.
IF lo_style_type->absolute_name = '\CLASS=ZCL_EXCEL_STYLE'. rv_guid = <style>->get_guid( ).
ASSIGN ip_style_or_guid TO <style>.
rv_guid = <style>->get_guid( ).
ENDIF.
ELSEIF lo_style_type->absolute_name = '\TYPE=ZEXCEL_CELL_STYLE'.
rv_guid = ip_style_or_guid.
ELSEIF lo_style_type->type_kind = lo_style_type->typekind_hex. ELSEIF lo_style_type->type_kind = lo_style_type->typekind_hex.
rv_guid = ip_style_or_guid. rv_guid = ip_style_or_guid.
ELSE. ELSE.
RAISE EXCEPTION TYPE zcx_excel EXPORTING error = 'IP_GUID type must be either REF TO zcl_excel_style or zexcel_cell_style'. RAISE EXCEPTION TYPE zcx_excel EXPORTING error = 'IP_GUID type must be either REF TO zcl_excel_style or zexcel_cell_style'.
ENDIF. ENDIF.