SAP FUNCTION 'GUI_UPLOAD'

*&----------------------------------------------------------------------*
*&      FUNCTION: GUI_UPLOAD 对csv 文件操作   Excel
*&   CSV文件格式: CN,430514,bank,170,wuhan,wuchang1
*&                CN,430514,bank,170,wuhan,wuchang1
*&         此程序是正解.
*&      Line-cont 23(10) 括号里的头不能大于外面的数. 
*&      End-Of-Page 会正确执行    
*&----------------------------------------------------------------------*
REPORT  zdev00912 NO STANDARD PAGE HEADING
                  LINE-SIZE   170
                  LINE-COUNT  30(10).

DATA: BEGIN OF st_up,
record(500) TYPE c,
END OF st_up.

DATA: it LIKE TABLE OF st_up WITH HEADER LINE,
      st LIKE TABLE OF st_up WITH HEADER LINE.

DATA: country(10) TYPE c,
      key(10)     TYPE c,
      name(10)    TYPE c,
      region(10)  TYPE c,
      street(10)  TYPE c,
      city(10)    TYPE c.

CALL FUNCTION 'GUI_UPLOAD'
  EXPORTING
    filename = 'D:/1.CSV'
  TABLES
    data_tab = it.

LOOP AT it.
  SPLIT it AT ',' INTO   country key    name
                          region street city.
  WRITE: / country, key, name, region, street, city.
ENDLOOP.

RESERVE sy-linct LINES.
TOP-OF-PAGE.
  WRITE: /20 'REPORT HEADER' COLOR 6.

END-OF-PAGE.
  WRITE: /20 'REPORT END' COLOR 1. 

你可能感兴趣的:(SAP)