利用以下的Function可達到其目的
CALL FUNCTION 'WS_FILENAME_GET'
EXPORTING
DEF_FILENAME = P_FILE "RLGRAP-FILENAME
DEF_PATH = '' "DEF_PATH
* MASK = ',*.*,*.*.'
MASK = TMP_MASK
MODE = 'O'
* TITLE = ' '
IMPORTING
FILENAME = TMP_FILENAME
* RC =
EXCEPTIONS
INV_WINSYS = 01
NO_BATCH = 02
SELECTION_CANCEL = 03
SELECTION_ERROR = 04.
IF SY-SUBRC = 0.
P_FILE = TMP_FILENAME.
ENDIF.
沒有留言:
張貼留言