SAP應用界面開發:4)SAP屏幕事件控制


       1)INITIALIZATION事件
      
該事件在屏幕未顯示之前執行,對程序設置值及屏幕元素進行初始化賦值。如下代碼:
       [For Example]

    PARAMETERS QUAL_DAY TYPE 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 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 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



免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM