Oracle EBS之Oracle Forms中的“WHEN-LEAVE-RECORD”觸發器

在開發Oracle Forms時，有沒有碰到這樣的需求，我需要在每次離開一行記錄時執行某個操作。用WHEN-VALIDATE-RECORD，不過實際測試的時候，怎么有時行有時不行？那你有沒有嘗試過WHEN-LEAVE-RECORD呢？什么？還有WHEN-LEAVE-RECORD？從來沒有聽說過……

在請出WHEN-LEAVE-RECORD前，讓我們先來分析分析下見過的幾個WHEN觸發器：
-
 

WHEN-NEW-RECORD-INSTANCE
鼠標每次進入新的一行時觸發。

WHEN-CREATE-RECORD
每次插入一行時觸發，沒輸入任何數據時SYSTEM.RECORD_STATUS為NEW，輸入數據后SYSTEM.RECORD_STATUS變為INSERT。

WHEN-VALIDATE-RECORD
當鼠標離開當前行，且當前行在上一次WHEN-VALIDATE-RECORD到當前離開該行的時刻止，該行數據發生過變換時觸發。

當新插入一行數據，SYSTEM.RECORD_STATUS變為INSERT時，移出會觸發一次。但是，當鼠標再次進入該行并打算移出，而這段時間內該行并沒有發生改變時，盡管此時該行的SYSTEM.RECORD_STATUS仍為INSERT（未保存的情況下），但不會再觸發WHEN-VALIDATE-RECORD事件。

同理，當修改了一行數據，SYSTEM.RECORD_STATUS變為CHANGED時，移出該行會觸發一次。但是，當鼠標再次進入該行并打算移出，而該段時間內該行并沒有發生改變時，盡管此時該行的SYSTEM.RECORD_STATUS仍為CHANGED（未保存的情況下），將不會再觸發WHEN-VALIDATE-RECORD事件。

好了，時機也差不多成熟了，是時候WHEN-LEAVE-RECORD出馬啦，當當當當……

我們如何才能在每次移出某行時執行某個操作？從上面的分析我們知道WHEN-VALIDATE-RECORD并不是每次離開行時都會觸發，而似乎又沒有類似WHEN-leave-RECORD之類的觸發器，那碰到這類需求時是不是就沒有其他辦法了呢？
當然不是，我們只需仔細想想WHEN-VALIDATE-RECORD的觸發條件就不難發現，當且僅當該行數據發生了改變WHEN-VALIDATE-RECORD便會觸發。這樣的話，我們通過人為改變行上的數據來引起WHEN-VALIDATE-RECORD。例如，在BLOCK（BLK_DUMMY）上加一個非數據庫的ITEM（就叫ITM_DUMMY吧，為了后面敘述方便，這里設為數值型，初始值為1），然后在WHEN-NEW-RECORD-INSTANCE（因為WHEN-NEW-RECORD-INSTANCE會在每次進入一行時無條件的觸發）中改變這個ITEM的值（可以這樣做：:BLK_DUMMY.ITM_DUMMY := NVL(:BLK_DUMMY.ITM_DUMMY, 1) + 1;），到此便大功告成了，WHEN-VALIDATE-RECORD已經被我們改造成了我們自己的WHEN-LEAVE-RECORD觸發器。

怎么樣，簡單吧？趕緊去開發咱自己的WHEN-LEAVE-RECORD觸發器吧。

服務器租用/服務器托管中國五強！虛擬主機域名注冊頂級提供商！15年品質保障！--億恩科技[ENKJ.COM]