sap 服务器文件上传和下载

转载自 心情不错的猫

最终编辑 happyboy2616

data remote_file like rcgfiletr-ftappl."远程文件类型
data local_file like rcgfiletr-ftfront."下载文件类型
remote_file = '/usr/sap/trans/excel/Dawning_BS.xls'.
local_file = 'c:\dawning_sap_excel\Dawning_BS.xls'.

"从服务器上下载Excel文件到本地
call function 'C13Z_FILE_DOWNLOAD_BINARY'
    exporting
      i_file_front_end    = local_file
      i_file_appl         = remote_file
      i_file_overwrite    = 'X'
    exceptions
      fe_file_open_error = 1
      fe_file_exists      = 2
      fe_file_write_error = 3
      ap_no_authority     = 4
      ap_file_open_error = 5
      ap_file_empty       = 6
      others              = 7.

*上传
CALL FUNCTION 'C13Z_FILE_UPLOAD_BINARY'
EXPORTING
    i_file_front_end         = local_file
    i_file_appl              = remote_file
*   I_FILE_OVERWRITE         = ESP1_FALSE
* IMPORTING
*   E_FLG_OPEN_ERROR         =
*   E_OS_MESSAGE             =
* EXCEPTIONS
*   FE_FILE_NOT_EXISTS       = 1
*   FE_FILE_READ_ERROR       = 2
*   AP_NO_AUTHORITY          = 3
*   AP_FILE_OPEN_ERROR       = 4
*   AP_FILE_EXISTS           = 5
*   OTHERS                   = 6
          .
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

上传用下面这个 更保险：

report z_lijia_06 .

data: fname type rlgrap-filename,
      ftype type rlgrap-filetype,
      fsize type i.
data: fname_p type string,
      fname_n type string.
data: sfname_p type string .
data: sfname like rcgiedial-iefile.
      sfname_p = '/usr/sap/trans/excel/'."上传报表模板文件路径
data: r(1) type c.

data: data_tab like rcgrepfile occurs 10 with header line.
data: lines         type i.

call function 'UPLOAD'
     exporting
*          codepage            = 'IBM'
          filename            = 'C:\EXCEL_DATA'
          filetype            = 'BIN'
*          filemask_mask       = '*.XLS'
*          FILESMASK_TEXT      = 'XLS'
          filetype_no_change = 'X'
*          SILENT              = 'X'
*          item                = ''
     importing
          filesize            = fsize
          act_filename        = fname
          act_filetype        = ftype
     tables
          data_tab            = data_tab
     exceptions
          conversion_error    = 1
          invalid_table_width = 2
          invalid_type        = 3.

fname_n = fname.
do.
split fname_n at '\' into fname_p fname_n.
search fname_n for '\'.
if sy-subrc = 4.
exit.
endif.
enddo.
fname_p = fname.
shift fname_p right deleting trailing fname_n.
shift fname_p left deleting leading space.
*write:/,'fname_p=',fname_p,'|',
*      /,'fname_n=',fname_n,'|'.
concatenate sfname_p fname_n into sfname.
*write:/,'sfname=',sfname,'|'.
describe table data_tab lines lines.

call function 'C13Z_RAWDATA_WRITE'
       exporting
            i_file           = sfname
            i_file_size      = fsize
            i_lines          = lines
       tables
            i_rcgrepfile_tab = data_tab
       exceptions
            no_permission    = 1
            open_failed      = 2
            others           = 3.

*IF sy-subrc NE 0.
* MESSAGE s000 WITH 'UPLOAD SUCC'.
*ENDIF.

write: 'SY-SUBRC:', sy-subrc,
     / '上载的本地文件名:', (60) fname,
     / '上载的远程文件名:',(60) sfname,
     / '文件类型:', ftype,
     / '文件大小:', fsize.

本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/huang1998/archive/2008/03/24/2214839.aspx

sap 服务器文件上传和下载

1.       数据上载

将 EXCEL 上传到 SAP 服务器 , 方法调用流程 .
获取上传文件的路径 , 采用类 CL_GUI_FRONTEND_SERVICES 的 OPEN_FILE_DIALOG. 实现 .
读取上传文件 EXCEL 的内容到一个内表中 , 采用 FM: ALSM_EXCEL_TO_INTERNAL_TABLE
可选FM: KCD_EXCEL_OLE_TO_INT_CONVERT
注意 : 上传数据时 , 对应的内表中的字段最好定义为字符类型数据 .

2 .   数据下载到 EXCEL

将 EXCEL 可以下载到本地 , 调用 FM:   GUI_DOWNLOAD
对应 CLASS: CL_GUI_FRONTEND_SERVICES 的方法 GUI_DOWNLOAD
注意参数 FILENAME 以 xls 结尾
这样在保存时可以保存为 excel. 不过这种生成 EXCEL 方法没有表头 , 只有数据 .

有个FM: XXL_FULL_API,参考示例   XXLTTEST
EXCEL_OLE_STANDARD_DAT 代替 , 这个 FM 简单设定数据源 ITAB, 再设置一下对应的表头 名称内表即可.
注意 : 文件覆盖时如果原来 EXCEL 中的数据量超过要插入的数据量 , 则不会全部覆盖 , 所以用时需要删除掉原来的文件 . CL_GUI_FRONTEND_SERVICES 中有相应文件操作方法 .

可以看看function group ：SFTP

se78

OAAD

OPEN DATASET