F4相关函数

调用文件路径函数：

AT SELECTION-SCREEN ON VALUE-REQUEST FOR fname .

  CALL METHOD cl_gui_frontend_services=>file_open_dialog
    EXPORTING
      window_title            = 'Select the File'
*     default_filename        = dfile
      initial_directory       = 'E:\'
*     multiselection          = ' ' "No multiple selection
    CHANGING
      file_table              = it_file
      rc                      = filerc
    EXCEPTIONS
      file_open_dialog_failed = 1
      cntl_error              = 2
      error_no_gui            = 3
      not_supported_by_gui    = 4
      OTHERS                  = 5.
  IF sy-subrc <> 0.
    MESSAGE e398(00) WITH '打开文件错误' .
    LEAVE .
  ELSE .
    READ TABLE it_file INDEX 1 INTO fname .

  ENDIF.

标准F4 函数

AT SELECTION-SCREEN ON VALUE-REQUEST FOR fname .

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'    
  EXPORTING
*   DDIC_STRUCTURE         = ' '
    RETFIELD               = RETFIELD
*   PVALKEY                = ' '
*   DYNPPROG               = ' '
*   DYNPNR                 = ' '
*   DYNPROFIELD            = ' '
*   STEPL                  = 0
*   WINDOW_TITLE           = WINDOW_TITLE
*   VALUE                  = ' '
*   VALUE_ORG              = 'C'
*   MULTIPLE_CHOICE        = ' '
*   DISPLAY                = ' '
*   CALLBACK_PROGRAM       = ' '
*   CALLBACK_FORM          = ' '
*   CALLBACK_METHOD        = CALLBACK_METHOD
*   MARK_TAB               = MARK_TAB
* IMPORTING
*   USER_RESET             = USER_RESET
  TABLES
    VALUE_TAB              = VALUE_TAB
*   FIELD_TAB              = FIELD_TAB
*   RETURN_TAB             = RETURN_TAB
*   DYNPFLD_MAPPING        = DYNPFLD_MAPPING
* EXCEPTIONS
*   PARAMETER_ERROR        = 1
*   NO_VALUES_FOUND        = 2
          .