如何给屏幕字段(下拉框和输入框)用代码添加F4 search help
2011-07-22 10:29
393 查看
有些时候我们可能要对屏幕上一些字段用代码写实现search help功能
下面用一个简单例子演示:
*&----------------------------------------------------------------*
*& Report ztest_pillar *
*&----------------------------------------------------------------*
report ztest_pillar.
* Global Data
TYPES: BEGIN OF type_carrid,
carrid TYPE spfli-carrid,
carrname TYPE scarr-carrname,
END OF type_carrid.
DATA itab_carrid TYPE STANDARD TABLE OF type_carrid.
* Selection Screen
parameters airline(2) type c.
*&---------------------------------------------------------------------*
*& Processing Blocks called by the Runtime Environment *
*&---------------------------------------------------------------------*
* Event Block AT SELECTION-SCREEN ON VALUE-REQUEST FOR
at selection-screen on value-request for airline.
perform frm_f4_help.
* Form for generating F4 HELP for parameter AIRLINE
form FRM_F4_HELP .
SELECT carrid carrname
FROM scarr
INTO CORRESPONDING FIELDS OF TABLE itab_carrid.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = 'CARRID' "指定要返回屏幕参数的在内表中的field
value_org = 'S' "S代表structure
dynpprog = sy-repid "指定屏幕参数所在的程序名称
dynpnr = sy-dynnr "指定参数所在的屏幕编号
dynprofield = 'AIRLINE'"指定屏幕参数的名称
TABLES
value_tab = itab_carrid "内表
EXCEPTIONS
parameter_error = 1
no_values_found = 2
OTHERS = 3.
IF sy-subrc <> 0.
...
ENDIF.
endform. " FRM_F4_HELP
下面用一个简单例子演示:
*&----------------------------------------------------------------*
*& Report ztest_pillar *
*&----------------------------------------------------------------*
report ztest_pillar.
* Global Data
TYPES: BEGIN OF type_carrid,
carrid TYPE spfli-carrid,
carrname TYPE scarr-carrname,
END OF type_carrid.
DATA itab_carrid TYPE STANDARD TABLE OF type_carrid.
* Selection Screen
parameters airline(2) type c.
*&---------------------------------------------------------------------*
*& Processing Blocks called by the Runtime Environment *
*&---------------------------------------------------------------------*
* Event Block AT SELECTION-SCREEN ON VALUE-REQUEST FOR
at selection-screen on value-request for airline.
perform frm_f4_help.
* Form for generating F4 HELP for parameter AIRLINE
form FRM_F4_HELP .
SELECT carrid carrname
FROM scarr
INTO CORRESPONDING FIELDS OF TABLE itab_carrid.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = 'CARRID' "指定要返回屏幕参数的在内表中的field
value_org = 'S' "S代表structure
dynpprog = sy-repid "指定屏幕参数所在的程序名称
dynpnr = sy-dynnr "指定参数所在的屏幕编号
dynprofield = 'AIRLINE'"指定屏幕参数的名称
TABLES
value_tab = itab_carrid "内表
EXCEPTIONS
parameter_error = 1
no_values_found = 2
OTHERS = 3.
IF sy-subrc <> 0.
...
ENDIF.
endform. " FRM_F4_HELP
相关文章推荐
- 如何把某个表字段对应的search help引用到自定义的屏幕字段中
- 屏幕字段不允许直接输入,只能通过SearchHelp(F4)
- 为屏幕字段添加F4 help
- 整理为屏幕字段加载F4 HELP
- ABAP--如何使用'F4IF_INT_TABLE_VALUE_REQUEST'填写屏幕的多个字段
- 为选择屏幕字段,添加下拉列表
- 通过search help给屏幕字段作自动检测
- 为屏幕输入框指定search help
- ABAP--如何使用'F4IF_INT_TABLE_VALUE_REQUEST'填写屏幕的多个字段
- ABAP--如何使用'F4IF_INT_TABLE_VALUE_REQUEST'填写屏幕的多个字段
- C# 程序中如何向(DEV)ComboBoxEdit控件中添加下拉列表的值不使用数据绑定,就是使用代码添加
- ABAP--如何使用'F4IF_INT_TABLE_VALUE_REQUEST'填写屏幕的多个字段
- ABAP--如何使用'F4IF_INT_TABLE_VALUE_REQUEST'填写屏幕的多个字段
- 如何通过代码向 User 类型的字段里面添加 多个用户
- 给表的某个字段添加table check的功能(字段有input help的选择,类似于search help)
- List添加Item时, 如何去判断某个字段, 并且保证字段数据不重复性
- 为选择屏幕的字段设置F4帮助
- sql server中如何循环添加字段
- 如何在水晶报表中动态添加字段
- 如何将自己的代码自动添加版权信息