REPORT  Z17_000.
DATA : L_FILE_TABLE TYPE FILETABLE,
       L_RC         TYPE I        ,
       L_USER_ACTIO TYPE I        ,
       FILE_NAME    TYPE STRING   .

CALL FUNCTION 'WS_FILENAME_GET'
* EXPORTING
*   DEF_FILENAME           = ' '
*   DEF_PATH               = ' '
*   MASK                   = ' '
*   MODE                   = ' '
*   TITLE                  = ' '
IMPORTING
   FILENAME               = FILE_NAME
*   RC                     =
* EXCEPTIONS
*   INV_WINSYS             = 1
*   NO_BATCH               = 2
*   SELECTION_CANCEL       = 3
*   SELECTION_ERROR        = 4
*   OTHERS                 = 5
    .
*CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
*  EXPORTING :
*    WINDOW_TITLE             = 'File Open'
*    DEFAULT_FILENAME         = SPACE
*    FILE_FILTER              = '*.xls'
*    INITIAL_DIRECTORY        = 'C:'
*    MULTISELECTION           = SPACE
*  CHANGING :
*    FILE_TABLE               = L_FILE_TABLE
*    RC                       = L_RC
*  EXCEPTIONS :
*    FILE_OPEN_DIALOG_FAILED  = 1
*    CNTL_ERROR               = 2
*    ERROR_NO_GUI             = 3
*    OTHERS                   = 5.
*
*READ TABLE L_FILE_TABLE INTO FILE_NAME INDEX 1.