从文件读取数据到SAP

从文件读取数据到SAP 

 

REPORT Z_READ_FILE_NEIL .
DATA: BEGIN OF MAN,
      NAME(20) TYPE C,
      HIGH TYPE P DECIMALS 2,
      WEIGHT TYPE P DECIMALS 2,
      END OF MAN.

DATA: MAN1 LIKE TABLE OF MAN.
*CALL FUNCTION 'UPLOAD'
*不带提示
CALL FUNCTION 'WS_UPLOAD'
  EXPORTING
      CODEPAGE          = 'TEST'
      FILENAME          = 'D:/TESTA.TXT'
      FILETYPE          = 'DAT'
      ITEM              ='读入文件'
  TABLES
      DATA_TAB          = MAN1
  EXCEPTIONS
      CONVERSION_ERROR  =1
      INVALID_TABLE_WIDTH = 2
      INVALID_TYPE      = 3.
LOOP AT MAN1 INTO MAN.
  WRITE: / MAN-NAME,MAN-HIGH,MAN-WEIGHT.
ENDLOOP.