ABAP FILE PATH 的F4帮助的两种方法

最新推荐文章于 2024-07-02 13:28:03 发布

hemir

最新推荐文章于 2024-07-02 13:28:03 发布

阅读量1.6k

点赞数

文章标签： file path table action dialog function

本文链接：https://blog.csdn.net/hemir/article/details/2971845

版权

本文介绍了两种在ABAP中实现文件上传的方法：一是通过调用方法CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG来打开文件选择对话框并获取文件路径；二是通过调用函数F4_FILENAME实现类似功能。文章详细展示了如何使用这两种方式处理文件上传操作。

摘要由CSDN通过智能技术生成

第一种： call method

FORM FORM_GET_FILE_PATH CHANGING O_PATH TYPE CHAR128.
DATA:
    LTD_FILE_TABLE TYPE FILETABLE,
    LW_RC         TYPE I,
    LW_ACTION     TYPE I.

CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
    CHANGING
      FILE_TABLE              = LTD_FILE_TABLE
      RC                      = LW_RC
      USER_ACTION             = LW_ACTION.

IF SY-SUBRC = 0.
*- アップロードファイルはそれぞれの取得
    PERFORM FORM_GET_FILE USING    LTD_FILE_TABLE
                          CHANGING O_PATH.
ELSE.
*- 選択画面に戻る
    MESSAGE E001.
ENDIF.

IF LW_ACTION = 9.
*- 選択画面に戻る
    MESSAGE E001.
ELSE.
*- アップロードファイルはそれぞれの取得
    PERFORM FORM_GET_FILE USING    LTD_FILE_TABLE
                          CHANGING O_PATH.
ENDIF.

ENDFORM. " FORM_GET_FILE_PATH

FORM FORM_GET_FILE USING I_FILETABLE TYPE FILETABLE
CHANGING O_PATH TYPE CHAR128.
DATA:
LTH_FILETABLE LIKE LINE OF I_FILETABLE.

IF NOT I_FILETABLE IS INITIAL.
    READ TABLE I_FILETABLE INTO LTH_FILETABLE INDEX 1.
    IF SY-SUBRC = 0.
      O_PATH = LTH_FILETABLE.
    ENDIF.
ENDIF.

ENDFORM. " FORM_GET_FILE

第二种： call function

CALL FUNCTION 'F4_FILENAME'
* EXPORTING
*   PROGRAM_NAME        = SYST-CPROG
*   DYNPRO_NUMBER       = SYST-DYNNR
*   FIELD_NAME          = ' '
IMPORTING
   FILE_NAME           = p_path