*&---------------------------------------------------------------------* *& Form GET_FILE_NAME_MULTI *&---------------------------------------------------------------------* * 여러 파일 선택 가능한 팝업 띄움 *----------------------------------------------------------------------* FORM GET_FILE_NAME_MULTI TABLES PT_FILE_TABLE TYPE FILETABLE.
*& Form GET_FILE_NAME_MULTI
*&---------------------------------------------------------------------*
* 여러 파일 선택 가능한 팝업 띄움
*----------------------------------------------------------------------*
FORM GET_FILE_NAME_MULTI TABLES PT_FILE_TABLE TYPE FILETABLE.
DATA: L_RC TYPE I.
CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
EXPORTING
* WINDOW_TITLE =
* DEFAULT_EXTENSION =
* DEFAULT_FILENAME =
* FILE_FILTER =
* WITH_ENCODING =
* INITIAL_DIRECTORY =
MULTISELECTION = 'X'
CHANGING
FILE_TABLE = PT_FILE_TABLE[]
RC = L_RC
* USER_ACTION =
* FILE_ENCODING =
EXCEPTIONS
FILE_OPEN_DIALOG_FAILED = 1
CNTL_ERROR = 2
ERROR_NO_GUI = 3
NOT_SUPPORTED_BY_GUI = 4
OTHERS = 5.
IF SY-SUBRC <> 0 OR L_RC = -1.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " GET_FILE_NAME_MULTI