DATA: l_ruta(128) TYPE c.
CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
filename = p_path
filetype = 'DBF'
TABLES
data_tab = ti_descarga
EXCEPTIONS
file_open_error = 1
file_write_error = 2
invalid_filesize = 3
invalid_type = 4
no_batch = 5
unknown_error = 6
invalid_table_width = 7
gui_refuse_filetransfer = 8
customer_error = 9
no_authority = 10
OTHERS = 11.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ELSE.
MESSAGE s000 WITH 'El archivo se descargo correctamente en: ' p_path.
ENDIF.
__________________
Luis Lipa
|