F4IF_INT_TABLE_VALUE_REQUEST的使用(转)

为screen上的输入框增加F4搜查功能

假设输入框g_var_f1绑定在变量g_var_f1.
且可选值在内表g_itab_t1的字段c1上.

1`在screen的logic flow上code:
PROCESS ON VALUE-REQUEST.
FIELD g_var_f1 MODULE user_gvarf1vr_0010.
其中f为输入框的name.并新建MODULE m.
立即能在屏幕显示后,该框右侧出现F4按钮.

为一个屏幕上多个输入框配置F4搜查即
PROCESS ON VALUE-REQUEST.
FIELD f1 MODULE m1.
FIELD f2 MODULE m2.

2`编写MODULE m.
MODULE user_gvarf1vr_0010 INPUT.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = 'C1' 大写,可选值内表的字段名
value_org = 'S' 就写'S'
dynpprog = SY-REPID 返回的输入框所在的main program
dynpnr = SY-DYNNR 返回的输入框所在屏幕
dynprofield = 'G_VAR_F1' 返回的输入框名
TABLES
value_tab = g_itab_t1 可选值的内表
EXCEPTIONS
parameter_error = 1
no_values_found = 2
others = 3.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
MODULE.
该function是将itab:value_tab的retfield列显示在屏幕上以供选择,并返回到dynpprog-dynpnr-dynprofield框中.


本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/zltpc007/archive/2007/11/01/1861518.aspx