report z04ftp2.
data: begin of ig_ftp_result occurs 0,
line( 100),
end of ig_ftp_result.
data: l_path( 128) type c. "文件路径,必须以/结尾
data: l_filename( 128) type c value 'CH210276140222_likp.txt'. "文件名
data: l_ftpcommand( 100) type c. "FTP命令
data: l_handle type i. "HAND
"源路径,必须以/结尾
data: cons_source( 128) type c value '/usr/sap/AA2/D01/data/'.
data: cons_dens( 128) type c . "目标路径
constants cons_key type i value 26101957.
data pr_return( 1) type <
data: begin of ig_ftp_result occurs 0,
line( 100),
end of ig_ftp_result.
data: l_path( 128) type c. "文件路径,必须以/结尾
data: l_filename( 128) type c value 'CH210276140222_likp.txt'. "文件名
data: l_ftpcommand( 100) type c. "FTP命令
data: l_handle type i. "HAND
"源路径,必须以/结尾
data: cons_source( 128) type c value '/usr/sap/AA2/D01/data/'.
data: cons_dens( 128) type c . "目标路径
constants cons_key type i value 26101957.
data pr_return( 1) type <