得到本地系統中需要開啟的excel檔案,程式摘錄如下:[@more@]

PARAMETERS: P_FILE LIKE RLGRAP-FILENAME OBLIGATORY. (screen 上給一個parameters)

AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE.
DATA: WA_FILETABLE TYPE FILE_TABLE,
IT_FILETABLE TYPE FILETABLE,
V_RC TYPE SY-SUBRC. " (定義好call method需要的引數)
CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG EXPORTING
WINDOW_TITLE = 'Select The Uploading Excel File' "(彈出window 視窗上的顯示提示)
DEFAULT_EXTENSION = 'XLS' "(預設開啟檔案的副檔名)
CHANGING
FILE_TABLE = IT_FILETABLE " (用於裝開啟的檔案絕對路徑及檔名)
RC = V_RC . " (系統返回值,如為0,操作成功,不為0,不成功)
IF SY-SUBRC <> 0.
MESSAGE 'Error in Getting the Excel File Name!' TYPE 'E'.
EXIT.
ELSE.
READ TABLE IT_FILETABLE INTO WA_FILETABLE INDEX 1.

* (使用read table 讀取it_filetable內表中的第一條記錄到wa_filetable 工作區,注意read table 的用法)
P_FILE = WA_FILETABLE-FILENAME.

ENDIF.

一段SAP開啟本地系統檔案的程式

相關文章