REPORT demo_data_ext_download. DATA: name TYPE rlgrap-filename, typ TYPE rlgrap-filetype, fname TYPE rlgrap-filename, ftype TYPE rlgrap-filetype, fsize TYPE i. TYPES: BEGIN OF line, col1 TYPE i, col2 TYPE i, END OF line. DATA: lin TYPE line, tab TYPE TABLE OF line. DO 5 TIMES. lin-col1 = sy-index. lin-col2 = sy-index ** 2. APPEND lin TO tab. ENDDO. name = 'C:\temp\saptest.xls'. typ = 'DAT'. CALL FUNCTION 'DOWNLOAD' EXPORTING codepage = 'IBM' filename = name filetype = typ item = 'Test Excel File'(005) IMPORTING act_filename = fname act_filetype = ftype filesize = fsize TABLES data_tab = tab EXCEPTIONS invalid_filesize = 1 invalid_table_width = 2 invalid_type = 3. IF sy-subrc NE 0. MESSAGE e888(sabapdocu) WITH text-006. ENDIF. WRITE: 'SY-SUBRC:'(001), sy-subrc, / 'Name :'(002), (60) fname, / 'Type :'(003), ftype, / 'Size :'(004), fsize.
今天给大家一个新的例子,如有什么不懂的可以发贴,大家一起讨论一下
-----------------
mara,SAPCLUB TEAM
---------------------
You ok,so we ok
---------------------------
msn:jiangyong_120@hotmail.com
|