ABAP 读取EXCEL 到内表
本文实例演示
使用到的函数
WS_FILENAME_GET —显示文件路径
TEXT_CONVERT_XLS_TO_SAP —读取excl数据到内表
以公司工厂为例子
tables:t001,t001w.
types:begin of ty_exl,
bukrs like t001-bukrs, "公司代码
werks like t001w-werks, "工厂
end of ty_exl.
data gt_exl type STANDARD TABLE OF ty_exl WITH HEADER LINE.
*SCREEN
parameters p_path type c length 200.
at selection-screen on value-request for p_path."弹出对话框
perform get_path .
start-of-selection .
perform get_data . "取数
perform display.
end-of-selection .
WS_FILENAME_GET
form get_path.
call function 'WS_FILENAME_GET'
exporting
* DEF_FILENAME = ' '
* DEF_PATH = ' '
mask = ',EXCEL.XLS,*.XLS,TXT,*.TXT,EXCEL.XLSX,*.XLSX.'
mode = 'O'
* TITLE = ' '
importing
filename = p_path
* RC =
exceptions
inv_winsys = 1
no_b