ABAP操作应用服务器文件的方式

来源:互联网 发布:多益网络ceo徐宥箴 编辑:程序博客网 时间:2024/05/19 01:06

通过abap,可以在应用服务器上写文件或者从应用服务器上读取文件(除数据库文件)

1,往应用服务器上写文件。

      DATA:log_file(40VALUE 'mail_send_record___',
     log_line(255).

 

    OPEN DATASET log_file  FOR APPENDING IN TEXT MODE ENCODING DEFAULT.
  CONCATENATE sy-datum sy-uzeit p_name INTO log_line
  SEPARATED BY '/'.
  TRANSFER log_line TO log_file.
  CLOSE DATASET log_file.
  CLEAR:log_line.

 

2,从应用服务器读取文件

        data:begin of it_data OCCURS 0,
         record(1024),
       end   of it_data,
       line_con(1024) .
  BREAK-POINT.
open DATASET 'mail_send_record___' for input in TEXT MODE ENCODING DEFAULT.
  do.
    READ DATASET 'mail_send_record___' into line_con.
    if line_con is initial.
        exit.
    else.
      it_data-record = line_con.
      collect it_data.
    endif.
  enddo.