Code: Alles auswählen.
FORM ada_pc_file_in_itab_stellen
TABLES ft_itab TYPE STANDARD TABLE
USING value(fw_filename) TYPE c
value(fw_filetype) TYPE c
value(fw_popup) TYPE c
value(fw_ausgabe_art) TYPE c
CHANGING fw_subrc LIKE sy-subrc
fw_lines LIKE w_lines.
DATA: lw_filename TYPE string.
DATA: lw_filetype TYPE char10.
DATA: lt_itab LIKE any table.
lw_filename = fw_filename.
lw_filetype = fw_filetype.
lt_itab = ft_itab.
CALL METHOD cl_gui_frontend_services=>gui_upload
EXPORTING
filename = lw_filename
filetype = lw_filetype
CHANGING
data_tab = ft_itab
EXCEPTIONS
file_open_error = 1
file_read_error = 2
no_batch = 3
gui_refuse_filetransfer = 4
invalid_type = 5
no_authority = 6
unknown_error = 7
bad_data_format = 8
header_not_allowed = 9
separator_not_allowed = 10
header_too_long = 11
unknown_dp_error = 12
access_denied = 13
dp_out_of_memory = 14
disk_full = 15
dp_timeout = 16
not_supported_by_gui = 17
error_no_gui = 18
OTHERS = 19.
ENDFORM.
Code: Alles auswählen.
FORM ada_pc_file_in_itab_stellen
TABLES ft_itab TYPE STANDARD TABLE
USING value(fw_filename) TYPE c
value(fw_filetype) TYPE c
value(fw_popup) TYPE c
value(fw_ausgabe_art) TYPE c
CHANGING fw_subrc LIKE sy-subrc
fw_lines LIKE w_lines.
*{insert
FIELD-SYMBOLS: <lt_itab> TYPE ANY TABLE.
*insert}
DATA: lw_filename TYPE string.
DATA: lw_filetype TYPE char10.
*{delete
* DATA: lt_itab LIKE any table.
*delete}
lw_filename = fw_filename.
lw_filetype = fw_filetype.
*{delete
* lt_itab = ft_itab.
*delete}
*{insert
ASSIGN ft_itab[] TO <lt_itab>.
*insert}
CALL METHOD cl_gui_frontend_services=>gui_upload
EXPORTING
filename = lw_filename
filetype = lw_filetype
CHANGING
* data_tab = ft_itab
data_tab = <lt_itab>
EXCEPTIONS
file_open_error = 1
file_read_error = 2
no_batch = 3
gui_refuse_filetransfe = 4
invalid_type = 5
no_authority = 6
unknown_error = 7
bad_data_format = 8
header_not_allowed = 9
separator_not_allowed = 10
header_too_long = 11
unknown_dp_error = 12
access_denied = 13
dp_out_of_memory = 14
disk_full = 15
dp_timeout = 16
not_supported_by_gui = 17
error_no_gui = 18
OTHERS = 19.
ENDFORM.