santaclaus 发表于 2015-9-22 07:36:40

SAP 读取本地文件

DATA: BEGIN OF ITAB_TXT OCCURS 0,
      LINE(256),
      END OF ITAB_TXT.
DATA:PCSVF LIKE RLGRAP-FILENAME.

DATA:P_VFNR(60) TYPE C .

P_VFNR = 'C:\DATA\ZXL200506280001'.

PCSVF = P_VFNR.


    CALL FUNCTION 'WS_UPLOAD'
      EXPORTING
               FILENAME= PCSVF
               FILETYPE= 'ASC'
      TABLES
               DATA_TAB= ITAB_TXT
      EXCEPTIONS
      CONVERSION_ERROR = 1
      FILE_OPEN_ERROR = 2
      FILE_READ_ERROR = 3
      INVALID_TYPE = 4
      NO_BATCH = 5
      UNKNOWN_ERROR = 6
      INVALID_TABLE_WIDTH = 7
      GUI_REFUSE_FILETRANSFER = 8
      CUSTOMER_ERROR = 9.

    IF SY-SUBRC NE 0.
      MESSAGE E001 WITH CNS_V P_VFNR.
      STOP.
    ENDIF.
    LOOP AT ITAB_TXT.

       .......

    ENDLOOP.
页: [1]
查看完整版本: SAP 读取本地文件