瘋狂

 RAISE_APPLICATION_ERROR 是將應用程序專有的錯誤從服務器端轉達到客戶端應用程序。

      RAISE_APPLICATION_ERROR 的聲明：

      PROCEDURE RAISE_APPLICATION_ERROR

                                                    ( error_number_in IN NUMBER, error_msg_in IN VARCHAR2);

      里面的錯誤代碼和內容，都是自定義的。說明是自定義，當然就不是系統中已經命名存在的錯誤類別，是屬于一種自定義事務錯誤類型，才調用此函數。

      error_number_in 之容許從 -20000 到 -20999 之間，這樣就不會與 ORACLE 的任何錯誤代碼發生沖突。

      error_msg_in 的長度不能超過 2K，否則截取 2K。

舉個例吧：

阻止小于18歲的用戶增加到數據庫 employee 表中

CREATE OR REPALCE TRIGGER minimun_age_check

BEFORE INSERT ON employee

FOR EACH ROW

BEGIN

      IF ADD_MONTHS( :new.birth_date, 18*12) > SYSDATE

      THEN

             RAISE_APPLICATION_ERROR(-20001, 'Employees must at least eighteen years of age.');

      END IF;

END;

在客戶端，你可以寫一個類似下面的程序，來測試一下。

DECLARE

    no_babies_allowed EXCEPTION;

     /*將名稱與用于觸發器中的錯誤號碼關聯起來*/

     PRAGMA EXCEPTION_INIT(no_babies_allowed, -20001);

BEGIN

       INSERT INTO employee ....;

EXCEPTION

       WHEN no_babies_allowed

       THEN

              /*

              || SQLERRM 將傳遞給內置過程 RAISE_APPLICATION_ERROR 的消息返回

              */

              DBMS_OUTPUT.PUT_LINE(SQLERRM);

END;