SAP download 表格信息到本地（五）

最新推荐文章于 2023-09-15 14:15:38 发布

SAP小白kenny

最新推荐文章于 2023-09-15 14:15:38 发布

阅读量258

点赞数

分类专栏： ABAP 文章标签： abap

本文链接：https://blog.csdn.net/weixin_42646630/article/details/106956234

版权

ABAP 专栏收录该内容

123 篇文章 34 订阅

订阅专栏

5、由内表+表头直接download到本体

这个更多的是一些function，比较简单方便，但是局限性很多，我用的不多。

REPORT ztestlian8.
DATA: BEGIN OF ls_itab,
  field_1(10) TYPE c,
  field_2(10) TYPE c,
  field_3(10) TYPE c,
  END OF ls_itab,
  lt_itab LIKE TABLE OF ls_itab.
DATA: i_contents_hex       LIKE solix   OCCURS 0 WITH HEADER LINE,
      filename TYPE string VALUE 'C:\Users\Lian.zhao\Desktop\TEST1.xlsx'.
ls_itab-field_1 = 'test1'.
ls_itab-field_2 = 'test2'.
ls_itab-field_3 = 'test3'.
APPEND ls_itab TO lt_itab.

DATA: BEGIN OF itab_field OCCURS 0,
        fname(40) TYPE c ,
      END OF itab_field.

itab_field-fname = 'Fieldname1'.
APPEND itab_field.
itab_field-fname = 'Fieldname2'.
APPEND itab_field.
itab_field-fname = 'Fieldname3'. "针对非C、N、D、T类型列的列名，函数可能有Bug
APPEND itab_field.

CALL FUNCTION 'MS_EXCEL_OLE_STANDARD_DAT'
  EXPORTING
    file_name                 = 'C:\Users\Lian.zhao\Desktop\TEST1.xlsx'
    data_sheet_name           = 'TEST 1'
  TABLES
    data_tab                  = lt_itab
    fieldnames                = itab_field
  EXCEPTIONS
    file_not_exist            = 1
    filename_expected         = 2
    communication_error       = 3
    ole_object_method_error   = 4
    ole_object_property_error = 5
    invalid_filename          = 6
    invalid_pivot_fields      = 7
    download_problem          = 8
    OTHERS                    = 9.