REPORT ZZTESTLLL05.
TYPE-POOLS sscr.
PARAMETERS: p_r1 RADIOBUTTON GROUP r1 DEFAULT 'X' USER-COMMAND select,
p_r2 RADIOBUTTON GROUP r1 .
Select-OPTIONS s_date FOR sy-datum MODIF ID sc1 .
*PARAMETERS p_date type sy-datum modif id sc1. 这里换成PARAMETERS也好用
INITIALIZATION.
AT SelectION-SCREEN OUTPUT. 此事件中修改屏幕
LOOP AT SCREEN.
IF p_r2 <> 'X' AND screen-group1 = 'SC1'.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
TYPE-POOLS sscr.
PARAMETERS: p_r1 RADIOBUTTON GROUP r1 DEFAULT 'X' USER-COMMAND select,
p_r2 RADIOBUTTON GROUP r1 .
Select-OPTIONS s_date FOR sy-datum MODIF ID sc1 .
*PARAMETERS p_date type sy-datum modif id sc1. 这里换成PARAMETERS也好用
INITIALIZATION.
AT SelectION-SCREEN OUTPUT. 此事件中修改屏幕
LOOP AT SCREEN.
IF p_r2 <> 'X' AND screen-group1 = 'SC1'.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10481590/viewspace-293442/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/10481590/viewspace-293442/