TYPES: BEGIN OF xls_line,
data(256) TYPE x,
END OF xls_line.
DATA : lt_bin_data TYPE STANDARD TABLE OF xls_line.
SELECT * FROM sflight INTO TABLE @DATA(lt_flights).
IF sy-subrc EQ 0.
GET REFERENCE OF lt_flights INTO DATA(lr_data_ref).
DATA(lv_xstring) = zcl_itab_to_excel=>itab_to_excel_xstring( lr_data_ref ).
CALL FUNCTION 'SCMS_XSTRING_TO_BINARY'
EXPORTING
buffer = lv_xstring
TABLES
binary_tab = lt_bin_data.
cl_gui_frontend_services=>gui_download(
EXPORTING
filename = CONV #( iv_file )
filetype = 'BIN'
IMPORTING
filelength = DATA(lv_len)
CHANGING
data_tab = lt_bin_data
).
ENDIF.
Serkan AKKAVAK
Computer Engineer BSc
Head of SAP & Software Department
Contact : serkurumsal@yandex.com
0 Comments