John Doe написал:
Код в студию.
Code:
DATA: itab TYPE TABLE OF sflight,
filename TYPE string,
number(3).
DO 3 TIMES.
SELECT * FROM sflight INTO TABLE itab UP TO 20 ROWS.
WRITE sy-index TO number NO-GAP.
CONCATENATE 'C:\Data\zjdtest' number '.txt' INTO filename.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
filename = filename
TABLES
data_tab = itab.
ENDDO.
В моей системе ECC6.0 - молча создает файлы и даже не спрашивает о перезаписи.
чудеса да и только. у меня не хочет делать это молча вот код, сокращенный.
Code:
LOOP AT t_t7ru INTO l_t7ru.
...
CONCATENATE 'c:\temp\200_' l_t7ru-juper '_kv_' kvartal '.xml' INTO flmn.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
* BIN_FILESIZE =
filename = flmn
filetype = 'ASC'
codepage = '4110'
NO_AUTH_CHECK = 'X'
TABLES
data_tab = outtab
EXCEPTIONS
file_write_error = 1
no_batch = 2
gui_refuse_filetransfer = 3
invalid_type = 4
no_authority = 5
unknown_error = 6
header_not_allowed = 7
separator_not_allowed = 8
filesize_not_allowed = 9
header_too_long = 10
dp_error_create = 11
dp_error_send = 12
dp_error_write = 13
unknown_dp_error = 14
access_denied = 15
dp_out_of_memory = 16
disk_full = 17
dp_timeout = 18
file_not_found = 19
dataprovider_exception = 20
control_flush_error = 21
OTHERS = 22.
IF sy-SUBRC EQ 0.
* MESSAGE 'Выгрузка файлов в XML прошел успешно !!!' &
* 'Файлы лежат тут --> c:\temp\' TYPE 'I'.
endif.
ENDLOOP.
Сколько юрлиц будет стока и файлов, столько же раз и жмакать приходиться.
Вход
Регистрация
FAQ пользователя
Поиск
