Utiliza este trozo de código.
PARAMETERS: fichero LIKE rlgrap-filename.
*Funcion que ayuda a buscar un archivo en windows
AT SELECTION-SCREEN ON VALUE-REQUEST FOR fichero.
CALL FUNCTION 'WS_FILENAME_GET'
EXPORTING
* DEF_FILENAME = ' '
* DEF_PATH = ' '
mask = ',*.* ,*.*.'
mode = '0'
title = 'Datos de pedido'
IMPORTING
filename = fichero
* RC =
* EXCEPTIONS
* INV_WINSYS = 1
* NO_BATCH = 2
* SELECTION_CANCEL = 3
* SELECTION_ERROR = 4
* OTHERS = 5
.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
Un saludo.