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.
*&---------------------------------------------------------------------*
*& 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'. "最大显示数量
本文地址:http://sicmodule.glev.cn/quote/9471.html 歌乐夫 http://sicmodule.glev.cn/ , 查看更多