SELECTION-SCREEN BEGIN OF BLOCK BL01 WITH FRAME.
PARAMETERS: P_FILE LIKE RLGRAP-FILENAME.
SELECTION-SCREEN END OF BLOCK BL01.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE.
CALL FUNCTION 'WS_FILENAME_GET'
EXPORTING
DEF_FILENAME = ' ' "Arquivo inicial que você deseja
DEF_PATH = 'C:\' "Caminho inicial que você deseja
MASK = ',*.*,*.*.'
MODE = 'O'
TITLE = 'Selecione' "Título da caixa de diálogo
IMPORTING
FILENAME = P_FILE "Variável de retorno do nome
* RC =
EXCEPTIONS
INV_WINSYS = 1
NO_BATCH = 2
SELECTION_CANCEL = 3
SELECTION_ERROR = 4
OTHERS = 5.