zoukankan      html  css  js  c++  java
  • 如何读取EXCEL文件到内表

    1 定义内表
    data: gt_data type alsmex_tabline occurs 0 with header line.

    2 定义文件参数
    parameters:
      p_file like rlgrap-filename. 

    3定义文件帮助
    at selection-screen on value-request for p_file.
      perform select_file. 
    form select_file .
      call function 'WS_FILENAME_GET'
        exporting
          mask             = ',Excel Files,*.xls,All Files,*.*.'(101)
          title            = '选择文件'(100)
        importing
          filename         = p_file
        exceptions
          inv_winsys       = 1
          no_batch         = 2
          selection_cancel = 3
          selection_error  = 4
          others           = 5.
      if sy-subrc <> 0 and sy-subrc <> 3.
        message e100(zdev) with '选择文件出错!'(007).
      endif.
    endform.          

    4 读取EXCEL 文件到内表         
    " SELECT_FILE  

    call function 'ALSM_EXCEL_TO_INTERNAL_TABLE'
    *倒入EXCEL数据到内表
        exporting
          filename    = p_file
          i_begin_col = '1'
          i_begin_row = '1'
          i_end_col   = '4'
          i_end_row   = '5000'
        tables
          intern      = gt_data.
      sort gt_data by row col value.
     
    5 数据转换
      loop at gt_data.
        if g_row <> gt_data-row and sy-tabix > 1 .
          append gt_zfi025.
          clear gt_zfi025.
        endif.
        gt_zfi025-mandt = sy-mandt.
        case gt_data-col.
          when 1.  gt_zfi025-bukrs = gt_data-value.
          when 2.  gt_zfi025-bzirk = gt_data-value.
          when 3.  gt_zfi025-vkbur = gt_data-value.
          when 4.  gt_zfi025-money = gt_data-value.
        endcase.
        g_row = gt_data-row.
        clear gt_data.
      endloop.

  • 相关阅读:
    pythonday06数据类型(四)
    pythonday05数据类型(三)
    pythonday04数据类型(二)
    pythonday03数据类型(一)
    Apollo自动驾驶实践——第0讲:导论
    图论学习:生成树的Matrix-tree定理
    2020杭电多校6 Expectation
    2020牛客暑期多校第九场 B Groundhog and Apple Tree
    图论:二分图最大权匹配KM算法
    第十章 百度Apollo实战
  • 原文地址:https://www.cnblogs.com/xiaomaohai/p/6157455.html
Copyright © 2011-2022 走看看