1)INITIALIZATION事件
該事件在屏幕未顯示之前執行,對程序設置值及屏幕元素進行初始化賦值。如下代碼:
[For Example]
PARAMETERS QUAL_DAY TYPE D DEFAULT SY-DATUM.
SELECTION-SCREEN PUSHBUTTON /1(20) SAVE USER-COMMAND SAVE.
INITIALIZATION. "程序初始化事件,該事件在程序屏幕未顯示之前執行。對程序設置值及屏幕元素進行初始化設置.
QUAL_DAY+6(2) = '01'.
QUAL_DAY = QUAL_DAY - 1.
MOVE 'SAVE' TO SAVE. "給SAVE按鈕賦值
運行界面如下:
2)START-OF-SELECTION事件
該事件在單擊按鈕后觸發。
[For Example]
PARAMETERS QUAL_DAY TYPE D DEFAULT SY-DATUM.
SELECTION-SCREEN PUSHBUTTON /1(20) SAVE USER-COMMAND SAVE.
INITIALIZATION. "程序初始化事件,該事件在程序屏幕未顯示之前執行。對程序設置值及屏幕元素進行初始化設置.
QUAL_DAY+6(2) = '01'.
QUAL_DAY = QUAL_DAY - 1.
MOVE 'SAVE' TO SAVE. "給SAVE按鈕賦值
*START-OF-SELECTION事件在單擊按鈕后觸發該事件.
START-OF-SELECTION.
"STOP. "EXIT.:從EXIT語句后的程序將不再執行包括END-OF-SELECTION模塊,REJECT.語名后的程序將不再執行,但不影響END-OF-SELECTION.模塊的執行.
WRITE: 'DATE=',QUAL_DAY.
運行界面后按F8或者單擊查詢,如下:
3)END-OF-SELECTION事件
該事件應用於所有數據處理完成,即START-OF-SELECTION相關執行事件執行完成,但輸出屏幕還未顯示之前,在實際的應用於一些執行結果的檢驗等。
[For Example]
PARAMETERS QUAL_DAY TYPE D DEFAULT SY-DATUM.
SELECTION-SCREEN PUSHBUTTON /1(20) SAVE USER-COMMAND SAVE.
INITIALIZATION. "程序初始化事件,該事件在程序屏幕未顯示之前執行。對程序設置值及屏幕元素進行初始化設置.
QUAL_DAY+6(2) = '01'.
QUAL_DAY = QUAL_DAY - 1.
MOVE 'SAVE' TO SAVE. "給SAVE按鈕賦值
*START-OF-SELECTION事件在單擊按鈕后觸發該事件.
START-OF-SELECTION.
"STOP. "EXIT.:從EXIT語句后的程序將不再執行包括END-OF-SELECTION模塊,REJECT.語名后的程序將不再執行,但不影響END-OF- SELECTION.模塊的執行.
WRITE: 'DATE=',QUAL_DAY.
END-OF-SELECTION.
IF QUAL_DAY <> SY-DATUM. "<>符號與><符號都是不等於
WRITE:'TODAY=',SY-DATUM.
ELSE.
WRITE:'QUAL_DAY=',QUAL_DAY.
ENDIF.
運行界面如下:
4)屏幕事件的中止
EXIT,STOP,REJECT,CHECK.
祥見:http://hi.baidu.com/fener86/item/6c8b2e178711794be65e0636