ABAP保存文件路径

FORM frm_get_file_path CHANGING cv_file TYPE rlgrap-filename.
  DATA:lv_rc TYPE i,
        lv_filename TYPE string,
        lv_path     TYPE string,
        lv_fullpath TYPE string.

  CALL METHOD cl_gui_frontend_services=>file_save_dialog
    EXPORTING
      window_title = '选择文件'
      file_filter  = '(*.xlsx;*.xls)|*.xlsx;*.xls|'
    CHANGING
      filename     = lv_filename
      path         = lv_path
      fullpath     = lv_fullpath
    EXCEPTIONS
      OTHERS       = 5.

  IF sy-subrc EQ 0.
    cv_file = lv_fullpath.
  ENDIF.
ENDFORM.                    "FRM_GET_FILE_PATH