REPORT ZICON_EXAMPLE .
**********************************************************************
* 在选择屏幕的标准应用工具条上增加自定义按钮需要定义的
* SAO的选择屏幕的标准工具栏上系统预先定义了5个按钮,他们对应的功能码是
* FC01-FC05,默认是不激活的。用户可以使用
* SELECTION-SCREEN FUNCTION KEY i.
* 来激活这5个按钮(这里的i必须是1-5),这五个按钮的文本放在SSCRFields
* 的对应的Functxt_0i中。当用户按下按钮时,系统将触发AT SELECTION-SCREEN
* 事件,并将功能码放到sscrfields的ucomm字段中。
**********************************************************************
*--> 按钮引入图标
INCLUDE : <ICON>.
*-->定义按钮工作区
TABLES SSCRFIELDS.
DATA: FUNCTXT TYPE SMP_DYNTXT.
**********************************************************************
**********************************************************************
PARAMETERS: P_CMD TYPE CHAR200.
**********************************************************************
**********************************************************************
SELECTION-SCREEN: FUNCTION KEY 1, "激活按钮
FUNCTION KEY 2.
**********************************************************************
**********************************************************************
INITIALIZATION.
**********************************************************************
**********************************************************************
FUNCTXT-ICON_ID = ICON_CHANGE.
FUNCTXT-QUICKINFO = '更改销售订单'.
SSCRFIELDS-FUNCTXT_01 = FUNCTXT.
FUNCTXT-ICON_ID = ICON_TIME.
FUNCTXT-QUICKINFO = '更改采购订单'.
SSCRFIELDS-FUNCTXT_02 = FUNCTXT.
**********************************************************************
**********************************************************************
AT SELECTION-SCREEN.
CASE SSCRFIELDS-UCOMM. "处理按钮命令
WHEN'FC01'.
P_CMD = 'FC01'.
WHEN 'FC02'.
P_CMD = 'FC02'.
ENDCASE.
START-OF-SELECTION.
WRITE / 'START-OF-SELECTION'.
在REPORT标准应用工具条上增加自定义按钮
最新推荐文章于 2022-05-04 17:54:36 发布