上传文件时显示选择窗口

上载文件时

需要选择窗口

两种实现方式：

PARAMETER : p_file  TYPE ibipparms -path  DEFAULT  'C:\Users\pc\Desktop\上传模板.xlsx' .

第一种：
AT  SELECTION-SCREEN  ON  VALUE-REQUEST  FOR p_file .
   CALL  FUNCTION  'F4_FILENAME'
     IMPORTING
      file_name  = p_file .

第二种：

  CALL FUNCTION 'WS_FILENAME_GET'
    EXPORTING
      mask             = ',Excel Files,*.xls,All Files,*.*.'(101)
      title            = '选择文件'(100)
    IMPORTING
      filename         = p_file
    EXCEPTIONS
      inv_winsys       = 1
      no_batch         = 2
      selection_cancel = 3
      selection_error  = 4
      OTHERS           = 5.
  IF sy-subrc <> 0 AND sy-subrc <> 3.
    MESSAGE e100(zdev) WITH '选择文件出错！'(007).
  ENDIF.

另外有个函数可以校验文件是否存在

TMP_GUI_GET_FILE_EXIST

转载于:https://www.cnblogs.com/senlinmu110/p/3802277.html