ABAP 读取EXCEL文件到内表

最新推荐文章于 2025-07-29 15:35:24 发布

转载最新推荐文章于 2025-07-29 15:35:24 发布 · 488 阅读

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/xher/p/5715614.html

本文介绍了如何在SAP系统中选择并导入Excel文件至内表的方法，包括使用PARAMETERS和ATSELECTION-SCREEN设置文件选择，通过调用'KD_GET_FILENAME_ON_F4'函数获取文件名，并利用'TEXT_CONVERT_XLS_TO_SAP'函数将Excel文件转换为SAP内部格式。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1、选择excel文件：

PARAMETERS: P_FILE  LIKE RLGRAP-FILENAME OBLIGATORY.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE.
  CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
   EXPORTING
     PROGRAM_NAME        = SYST-REPID
     DYNPRO_NUMBER       = SYST-DYNNR
*     FIELD_NAME          = ' '
     STATIC              = 'X'
     MASK                = ',*.XLS,*.XLS'
    CHANGING
      FILE_NAME           = P_FILE
   EXCEPTIONS
     MASK_TOO_LONG       = 1
     OTHERS              = 2
            .

2、导入到与excel文件字段一致的内表：

TYPE-POOLS TRUXS.
DATA  GT_RAW TYPE TRUXS_T_TEXT_DATA.
TYPES: BEGIN OF GTY_EXCEL,
    COL1    TYPE  STRING,
    COL2    TYPE  STRING,
END OF GTY_EXCEL.
DATA: GT_EXCEL TYPE TABLE OF GTY_EXCEL,
      GS_EXCEL TYPE GTY_EXCEL.
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
    EXPORTING
*   I_FIELD_SEPERATOR          =
     I_LINE_HEADER              = 'X'
     I_TAB_RAW_DATA             = GT_RAW
     I_FILENAME                 = P_FILE
    TABLES
     I_TAB_CONVERTED_DATA       = GT_EXCEL
 　 EXCEPTIONS
     CONVERSION_FAILED          = 1
     OTHERS                     = 2
            .