FM实现F4帮助系列四：弹出框多筛选条件的搜索帮助（自定义筛选字段）

FM实现F4帮助系列四：弹出框多筛选条件的搜索帮助（自定义筛选字段）

2024-11-22 21:06 浏览:106

F4IF_INT_TABLE_VALUE_REQUEST

效果图：

FM实现F4帮助系列四：弹出框多筛选条件的搜索帮助（自定义筛选字段）_显示模式

本例子代码：

*&-------------------------------------------------------------------

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.

*&---------------------------------------------------------------------*

*& Form frm_f4

*&---------------------------------------------------------------------*

*----------------------------------------------------------------------*

FORM frm_f4.

werks TYPE werks_d,

matnr TYPE matnr,

maktx TYPE maktx,

END OF values.

data: values_tab

SELECT marc~werks makt~matnr makt~maktx

FROM makt

INNER JOIN marc ON marc~matnr = makt~matnr

INTO CORRESPonDING FIELDS OF TABLE values_tab.

retfield

dynpprog

dynpnr

dynprofield = 'MAKTX'

value_org = 'S'

callback_form = 'FRM_LIST' "Form for callback before F4 start (-> long docu)

value_tab = values_tab.

ENDFORM. "frm_f4

*&-------------------------------------------------------------------

*& 设置显示模式

*&-------------------------------------------------------------------

FORM frm_list TABLES record_tab STRUCTURE seahlpres

CHANGING shlp TYPE shlp_descr

shlp-intdescr-dialogtype = 'C'.

callcontrol-maxrecords = '50'. "最大显示数量