在选择屏幕上添加工具栏按钮的做法:
引用一个系统结构:tables sscrfields.
先定义好选择屏幕 例如:paramaeters p_matnr type mara-matnr.
定义按钮:
selection-screen function key 1. "定义按钮一
selection-screen function key 2. “定义按钮二
initialization."初始化事件
sscrfields-functxt_01 = 'BUT1'. 给按钮一赋值名称
sccrfields-functxt_01 = 'BUT2'. 给按钮二赋值名称
实现了按钮后 我们要为按钮实现一定的功能。
at selection-screen. "对选择屏幕进行check
if sscrifields-ucomm = 'fc01'. "这边的ucomm='fc01'是系统自动生成的
message '你单击了按钮一' type 'S'.
以上是报表程序用到的,要是屏幕编程的话就要用到系统自带的一些按钮了。