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

Merge branch 'main' into main

Browse Source
This commit is contained in:
sandraros 2025-01-05 13:12:43 +01:00 committed by GitHub
commit b3726122ee
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 16 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
src/not_cloud/zcl_excel_converter.clas.abap
View File

@ -1664,26 +1664,19 @@ CLASS zcl_excel_converter IMPLEMENTATION.
cl_gui_frontend_services=>gui_download( EXPORTING bin_filesize = l_bytecount cl_gui_frontend_services=>gui_download( EXPORTING bin_filesize = l_bytecount
filename = l_dir filename = l_dir
filetype = 'BIN' filetype = 'BIN'
CHANGING data_tab = lt_file ). CHANGING data_tab = lt_file
cl_gui_frontend_services=>execute( EXCEPTIONS OTHERS = 1 ).
EXPORTING IF sy-subrc <> 0.
document = l_dir MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
EXCEPTIONS WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
cntl_error = 1 ELSE.
error_no_gui = 2 cl_gui_frontend_services=>execute( EXPORTING document = l_dir
bad_parameter = 3 EXCEPTIONS OTHERS = 1 ).
file_not_found = 4
path_not_found = 5
file_extension_unknown = 6
error_execute_failed = 7
synchronous_failed = 8
not_supported_by_gui = 9
).
IF sy-subrc <> 0. IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF. ENDIF.
ENDIF.
ENDIF. ENDIF.
@ -1812,7 +1805,12 @@ CLASS zcl_excel_converter IMPLEMENTATION.
cl_gui_frontend_services=>gui_download( EXPORTING bin_filesize = l_bytecount cl_gui_frontend_services=>gui_download( EXPORTING bin_filesize = l_bytecount
filename = l_dir filename = l_dir
filetype = 'BIN' filetype = 'BIN'
CHANGING data_tab = lt_file ). CHANGING data_tab = lt_file
EXCEPTIONS OTHERS = 1 ).
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDIF. ENDIF.
ENDMETHOD. ENDMETHOD.
ENDCLASS. ENDCLASS.