REPORT  Z14_02.

DATA : L_FILE_TABLE TYPE FILETABLE,

          L_RC          TYPE I        ,

          L_USER_ACTIO TYPE I        ,

          FILE_NAME    TYPE STRING   .

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.