REPORT ZCSDN_LION_ALV02.
*定义变量
DATA IT_TAB TYPE FILETABLE.
DATA FILE_QTY TYPE I."返回的文件数量
DATA I_WA TYPE STRING.
*文件选择框
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-003.
PARAMETERS:P_FILE TYPE STRING.
SELECTION-SCREEN END OF BLOCK B1.
LOAD-OF-PROGRAM."程序运行开始
INITIALIZATION."初始化
AT SELECTION-SCREEN OUTPUT."调用屏幕时,假如没有屏幕时这里不会执行
*AT SELECTION-SCREEN."屏幕输入后点执行后,假如没有屏幕时这里不会执行
*文件选择
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE.
REFRESH IT_TAB.
CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
EXPORTING
WINDOW_TITLE = '选择文件' "窗口标题
DEFAULT_FILENAME = '' "默认文件名
MULTISELECTION = '' "是否多选,X=一次性可多选,空=单选
FILE_FILTER = 'Excel表格| *.xls;*.xlsx;*.xlsm'
CHANGING
FILE_TABLE = IT_TAB "返回的文件结果