
前言部分
大家可以关注我的公众号,公众号里的排版更好,阅读更舒适。
正文部分
在SAP的实际应用中,经常会需要将生成的文件上传到FTP,或从FTP下载相关文档数据。本例实现将本地指定文件上传到FTP,及从FTP下载文件到本地的功能。
从FTP复制文件共有两种方式,一种是直接复制文件,另一种方式是先从FTP读取文件数据到内表,拷贝再写入指定位置文件,不过该功能仅支持文本格式文件(*.TXT,*.DAT),一般不予推荐。
相关函数:
1)FTP_CONNECT:通过账号连接FTP。
2)FTP_COMMAND:执行FTP操作命令(注意,程序中所有命令必须为小写)。
1cd:指定本地文件夹路径;
cd:指定FTP文件夹路径;
put <filename>:上传文件;
get <filename>:下载文件;
3)FTP_SERVER_TO_R3:将FTP上的指定文本文件数据读取到内表。
4)FTP_DISCONNECT:关闭FTP连接。
REPORT ZR_EXAMPLE_07 . DATA: KEY TYPE I VALUE 26101957, TRFCDEST LIKE RFCDES-RFCDEST, THANDLE TYPE I. INCLUDE:<ICON>. *定义输入界面 SELECTION-SCREEN:BEGIN OF BLOCK FTPLOGIN WITH FRAME TITLE TEXT-001. PARAMETERS: P_USER(45) LOWER CASE OBLIGATORY MEMORY ID USR, P_PWD(45) MODIF ID PWD LOWER CASE OBLIGATORY MEMORY ID PWD, P_HOST(15) MEMORY ID HOS OBLIGATORY, FTP_PATH(30) MEMORY ID FPOS OBLIGATORY. SELECTION-SCREEN:END OF BLOCK FTPLOGIN. SELECTION-SCREEN:BEGIN OF BLOCK UPLOAD WITH FRAME TITLE TEXT-002. PARAMETERS: P_UPPATH(45), P_FILE(20) . SELECTION-SCREEN: BEGIN OF LINE. SELECTION-SCREEN: PUSHBUTTON 1(20) PUBU USER-COMMAND UPLOAD. SELECTION-SCREEN: END OF LINE. SELECTION-SCREEN:END OF BLOCK UPLOAD. SELECTION-SCREEN:BEGIN OF BLOCK DOWNLOAD WITH FRAME TITLE TEXT-003. PARAMETERS: DL_PATH(45), DL_FILE(20) . SELECTION-SCREEN: BEGIN OF LINE. SELECTION-SCREEN: PUSHBUTTON 1(20) GEBU USER-COMMAND DOWNLOAD. SELECTION-SCREEN: PUSHBUTTON 24(30) SHBU USER-COMMAND ITAB_DL. SELECTION-SCREEN: END OF LINE. SELECTION-SCREEN:END OF BLOCK DOWNLOAD. AT
661




被折叠的 条评论
为什么被折叠?



