FM實現F4幫助系列一：常規實現

1、 定義時利用數據類型自己的幫助

PARAMETERS: carrid TYPE  sflight-carrid,

            connid TYPE  sflight-connid .

若是須要定義工廠、公司、倉庫地點等，能夠找有搜索幫助的數據元素作參考

 2、 使用幫助函數完成通常幫助

函數：

F4IF_INT_TABLE_VALUE_REQUEST

效果：

本例代碼：

REPORT  ZLM_TEST_044.

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.

PARAMETERS:  p_matnr TYPE  matnr.

SELECTION-SCREEN END OF BLOCK b1.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_matnr.

  PERFORM frm_f4.

FORM frm_f4.

  TYPES: BEGIN OF values,

         matnr TYPE matnr,

         maktx TYPE maktx,

       END OF values.

  DATA: values_tab       TYPE TABLE OF values.

  SELECT  matnr maktx

    FROM  makt

    INTO TABLE values_tab.

  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

    EXPORTING

      retfield     = 'MATNR'                    "須要回傳的字段

      dynpprog     = sy-repid

      dynpnr       = sy-dynnr

      dynprofield  = 'MAKTX'                    "須要顯示的字段

      window_title = '情選擇物料 '

      value_org    = 'S'

    TABLES

      value_tab    = values_tab.

ENDFORM.                    "frm_f4