TABLES:sscrfields.
TYPE-POOLS:icon,truxs.
DATA functxt TYPE smp_dyntxt.
SELECTION-SCREEN FUNCTION KEY 1.
SELECTION-SCREEN FUNCTION KEY 2.
INITIALIZATION.
functxt-icon_id = icon_change.
functxt-icon_text = '主管邮箱维护'.
sscrfields-functxt_01 = functxt.
sscrfields-functxt_02 = '物料维护'.
一个报表程序最多可添加5个按钮。
当点击屏幕按钮时,
CASE sscrfields-ucomm.
WHEN 'FC01'.
CALL FUNCTION 'VIEW_MAINTENANCE_CALL'
EXPORTING
action = 'U'
view_name = 'ZMMT1001'.
WHEN 'FC02'.
CALL FUNCTION 'VIEW_MAINTENANCE_CALL'
EXPORTING
action = 'U'
view_name = 'ZMMT1002'.
ENDCASE.