form frm_f4_handle using p_e_fieldname row_id p_er_event_data type ref to cl_alv_event_data p_et_bad_cells p_e_display.
data: lw_shlp type shlp_descr_t.
data: lw_interface type ddshiface,
lt_return_values like ddshretval occurs 0 with header line.
data:begin of lt_value occurs 0, "搜索帮助值内表
charg like mcha-charg,
end of lt_value.
data lt_return like table of ddshretval with header line.
data:begin of lt_mcha occurs 0, "批次
charg like mcha-charg, "批次号
end of lt_mcha.
read table gt_alv index row_id.
if p_e_fieldname = 'AUFNR'.
call function 'F4IF_GET_SHLP_DESCR'
exporting
shlpname = 'ZPP_SH_ORDEF'
shlptype = 'SH'
importing
shlp = lw_shlp.
loop at lw_shlp-interface into lw_interface.
if lw_interface-shlpfield eq 'WERKS'. "输入参数
lw_interface-value = p_werks. "限
ALV F4事件无法触发DATA_CHANGE事件解决办法
最新推荐文章于 2024-01-19 16:37:51 发布