1. 程式人生 > >總結:整理 oracle異常錯誤處理 .

總結:整理 oracle異常錯誤處理 .

5.1 異常處理概念

5.1.1 預定義的異常處理

5.1.2 非預定義的異常處理

5.1.3 使用者自定義的異常處理

5.1.4  使用者定義的異常處理

5.2 異常錯誤傳播

5.2.1 在執行部分引發異常錯誤

5.2.2 在宣告部分引發異常錯誤

5.3 異常錯誤處理程式設計

5.4   PL/SQL 中使用 SQLCODE, SQLERRM異常處理函式

即使是寫得最好的PL/SQL程式也會遇到錯誤或未預料到的事件。一個優秀的程式都應該能夠正確處理各種出錯情況,並儘可能從錯誤中恢復。任何ORACLE錯誤(報告為ORA-xxxxx

形式的Oracle錯誤號)、PL/SQL執行錯誤或使用者定義條件(不一寫是錯誤),都可以。當然了,PL/SQL編譯錯誤不能通過PL/SQL異常處理來處理,因為這些錯誤發生在PL/SQL程式執行之前。

ORACLE 提供異常情況(EXCEPTION)和異常處理(EXCEPTION HANDLER)來實現錯誤處理。

異常情況處理(EXCEPTION)是用來處理正常執行過程中未預料的事件,程式塊的異常處理預定義的錯誤和自定義錯誤,由於PL/SQL程式塊一旦產生異常而沒有指出如何處理時,程式就會自動終止整個程式執行.

有三種類型的異常錯誤:

    1. 預定義 ( Predefined )

錯誤

  ORACLE預定義的異常情況大約有24個。對這種異常情況的處理,無需在程式中定義,由ORACLE自動將其引發。

    2. 非預定義 ( Predefined )錯誤

   即其他標準的ORACLE錯誤。對這種異常情況的處理,需要使用者在程式中定義,然後由ORACLE自動將其引發。

    3. 使用者定義(User_define) 錯誤

程式執行過程中,出現程式設計人員認為的非正常情況。對這種異常情況的處理,需要使用者在程式中定義,然後顯式地在程式中將其引發。

異常處理部分一般放在 PL/SQL 程式體的後半部,結構為:

EXCEPTION
   WHEN first_exception THEN  
   WHEN second_exception THEN  
   WHEN OTHERS THEN  
END;

異常處理可以按任意次序排列, OTHERS 必須放在最後.

5.1.1 預定義的異常處理

   預定義說明的部分 ORACLE 異常錯誤

錯誤號

異常錯誤資訊名稱

說明

ORA-0001

Dup_val_on_index

違反了唯一性限制

ORA-0051

Timeout-on-resource

在等待資源時發生超時

ORA-0061

Transaction-backed-out

由於發生死鎖事務被撤消

ORA-1001

Invalid-CURSOR

試圖使用一個無效的遊標

ORA-1012

Not-logged-on

沒有連線到ORACLE

ORA-1017

Login-denied

無效的使用者名稱/口令

ORA-1403

No_data_found

SELECT INTO沒有找到資料

ORA-1422

Too_many_rows

SELECT INTO 返回多行

ORA-1476

Zero-divide

試圖被零除

ORA-1722

Invalid-NUMBER

轉換一個數字失敗

ORA-6500

Storage-error

記憶體不夠引發的內部錯誤

ORA-6501

Program-error

內部錯誤

ORA-6502

Value-error

轉換或截斷錯誤

ORA-6504

Rowtype-mismatch

宿主遊標變數與 PL/SQL變數有不相容行型別

ORA-6511

CURSOR-already-OPEN

試圖開啟一個已處於開啟狀態的遊標

ORA-6530

Access-INTO-null

試圖為null 物件的屬性賦值

ORA-6531

Collection-is-null

試圖將Exists 以外的集合( collection)方法應用於一個null pl/sql 表上或varray

ORA-6532

Subscript-outside-limit

對巢狀或varray索引得引用超出聲明範圍以外

ORA-6533

Subscript-beyond-count

對巢狀或varray 索引得引用大於集合中元素的個數.

對這種異常情況的處理,只需在PL/SQL塊的異常處理部分,直接引用相應的異常情況名,並對其完成相應的異常錯誤處理即可。

1更新指定員工工資,如工資小於1500,則加100

DECLARE
   v_empno employees.employee_id%TYPE := &empno;
   v_sal   employees.salary%TYPE;
BEGIN
   SELECT salary INTO v_sal FROM employees WHERE employee_id = v_empno;
   IF v_sal<=1500 THEN
        UPDATE employees SET salary = salary + 100 WHERE employee_id=v_empno;
        DBMS_OUTPUT.PUT_LINE('編碼為'||v_empno||'員工工資已更新!');    
   ELSE
        DBMS_OUTPUT.PUT_LINE('編碼為'||v_empno||'員工工資已經超過規定值!');
   END IF;
EXCEPTION
   WHEN NO_DATA_FOUND THEN 
      DBMS_OUTPUT.PUT_LINE('資料庫中沒有編碼為'||v_empno||'的員工');
   WHEN TOO_MANY_ROWS THEN
      DBMS_OUTPUT.PUT_LINE('程式執行錯誤!請使用遊標');
   WHEN OTHERS THEN
      DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM);
END;

對於這類異常情況的處理,首先必須對非定義的ORACLE錯誤進行定義。步驟如下:

1. 在PL/SQL 塊的定義部分定義異常情況:

<異常情況>  EXCEPTION;

2. 將其定義好的異常情況,與標準的ORACLE錯誤聯絡起來,使用EXCEPTION_INIT語句:

PRAGMA EXCEPTION_INIT(<異常情況>, <錯誤程式碼>);

3. 在PL/SQL 塊的異常情況處理部分對異常情況做出相應的處理。

2刪除指定部門的記錄資訊,以確保該部門沒有員工。

INSERT INTO departments VALUES(50, 'FINANCE', 'CHICAGO');

DECLARE
   v_deptno departments.department_id%TYPE := &deptno;
   deptno_remaining EXCEPTION;
   PRAGMA EXCEPTION_INIT(deptno_remaining, -2292);
  
BEGIN
   DELETE FROM departments WHERE department_id = v_deptno;
EXCEPTION
   WHEN deptno_remaining THEN
      DBMS_OUTPUT.PUT_LINE('違反資料完整性約束!');
   WHEN OTHERS THEN
      DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM);
END;

當與一個異常錯誤相關的錯誤出現時,就會隱含觸發該異常錯誤。使用者定義的異常錯誤是通過顯式使用 RAISE 語句來觸發。當引發一個異常錯誤時,控制就轉向到 EXCEPTION塊異常錯誤部分,執行錯誤處理程式碼。

對於這類異常情況的處理,步驟如下:

1. 在PL/SQL 塊的定義部分定義異常情況:

<異常情況>  EXCEPTION;

2. RAISE <異常情況>

3. 在PL/SQL 塊的異常情況處理部分對異常情況做出相應的處理。

3更新指定員工工資,增加100

DECLARE
   v_empno employees.employee_id%TYPE :=&empno;
   no_result  EXCEPTION;
BEGIN
   UPDATE employees SET salary = salary+100 WHERE employee_id = v_empno;
   IF SQL%NOTFOUND THEN
      RAISE no_result;
   END IF;
EXCEPTION
   WHEN no_result THEN
      DBMS_OUTPUT.PUT_LINE('你的資料更新語句失敗了!');
   WHEN OTHERS THEN
      DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM);
END;

呼叫DBMS_STANDARD(ORACLE提供的包)包所定義的RAISE_APPLICATION_ERROR過程,可以重新定義異常錯誤訊息,它為應用程式提供了一種與ORACLE互動的方法。

RAISE_APPLICATION_ERROR 的語法如下:

    RAISE_APPLICATION_ERROR(error_number,error_message,[keep_errors] );

    這裡的error_number 是從 –20,000  –20,999 之間的引數,

    error_message 是相應的提示資訊(< 2048 位元組)

keep_errors 為可選,如果keep_errors =TRUE ,則新錯誤將被新增到已經引發的錯誤列表中。如果keep_errors=FALSE(預設),則新錯誤將替換當前的錯誤列表。

4建立一個函式get_salary, 該函式檢索指定部門的工資總和,其中定義了-20991-20992號錯誤,分別處理引數為空和非法部門程式碼兩種錯誤:

CREATE TABLE errlog(
  Errcode NUMBER,
  Errtext CHAR(40));

CREATE OR REPLACE FUNCTION get_salary(p_deptno NUMBER)
RETURN NUMBER
AS
  v_sal NUMBER;
BEGIN
  IF p_deptno IS NULL THEN
    RAISE_APPLICATION_ERROR(-20991, ’部門程式碼為空’);
  ELSIF p_deptno<0 THEN
    RAISE_APPLICATION_ERROR(-20992, ’無效的部門程式碼’);
  ELSE
    SELECT SUM(employees.salary) INTO v_sal FROM employees
    WHERE employees.department_id=p_deptno;
    RETURN v_sal;
  END IF;
END;

DECLARE
  V_salary NUMBER(7,2);
  V_sqlcode NUMBER;
  V_sqlerr VARCHAR2(512);
  Null_deptno EXCEPTION;
  Invalid_deptno EXCEPTION;
  PRAGMA EXCEPTION_INIT(null_deptno,-20991);
  PRAGMA EXCEPTION_INIT(invalid_deptno, -20992);
BEGIN
  V_salary :=get_salary(10);
  DBMS_OUTPUT.PUT_LINE('10號部門工資:' || TO_CHAR(V_salary));

  BEGIN
    V_salary :=get_salary(-10);
  EXCEPTION
    WHEN invalid_deptno THEN
      V_sqlcode :=SQLCODE;
      V_sqlerr  :=SQLERRM;
      INSERT INTO errlog(errcode, errtext)
      VALUES(v_sqlcode, v_sqlerr);
      COMMIT;
  END inner1;

  V_salary :=get_salary(20);
  DBMS_OUTPUT.PUT_LINE('部門號為20的工資為:'||TO_CHAR(V_salary));

  BEGIN
    V_salary :=get_salary(NULL);
  END inner2;

  V_salary := get_salary(30);
  DBMS_OUTPUT.PUT_LINE('部門號為30的工資為:'||TO_CHAR(V_salary));

  EXCEPTION
    WHEN null_deptno THEN
      V_sqlcode :=SQLCODE;
      V_sqlerr  :=SQLERRM;
      INSERT INTO errlog(errcode, errtext) VALUES(v_sqlcode, v_sqlerr);
      COMMIT;
    WHEN OTHERS THEN
         DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM);
END outer;

例5:定義觸發器,使用RAISE_APPLICATION_ERROR阻止沒有員工姓名的新員式記錄插入

CREATE OR REPLACE TRIGGER tr_insert_emp
BEFORE INSERT ON employees
FOR EACH ROW
BEGIN
  IF :new.first_name IS NULL OR :new.last_name is null THEN
    RAISE_APPLICATION_ERROR(-20000,'Employee must have a name.');
  END IF;
END;

    由於異常錯誤可以在宣告部分和執行部分以及異常錯誤部分出現,因而在不同部分引發的異常錯誤也不一樣。

    當一個異常錯誤在執行部分引發時,有下列情況:

l 如果當前塊對該異常錯誤設定了處理,則執行它併成功完成該塊的執行,然後控制轉給包含塊。

l 如果沒有對當前塊異常錯誤設定定義處理器,則通過在包含塊中引發它來傳播異常錯誤。然後對該包含塊執行步驟1)

    如果在宣告部分引起異常情況,即在宣告部分出現錯誤,那麼該錯誤就能影響到其它的塊。比如在有如下的PL/SQL程式:

DECLARE
    name varchar2(12):='EricHu';
    其它語句
BEGIN
    其它語句
EXCEPTION
    WHEN OTHERS THEN
    其它語句
END;

     例子中,由於Abc number(3)=’abc’; 出錯,儘管在EXCEPTION中說明了WHEN OTHERS THEN語句,但WHEN OTHERS THEN也不會被執行。 但是如果在該錯誤語句塊的外部有一個異常錯誤,則該錯誤能被抓住,如:

BEGIN
    DECLARE
    name varchar2(12):='EricHu';
    其它語句
   BEGIN
    其它語句
   EXCEPTION
    WHEN OTHERS THEN
    其它語句
    END;
EXCEPTION
WHEN OTHERS THEN
    其它語句
END;

    在一般的應用處理中,建議程式人員要用異常處理,因為如果程式中不宣告任何異常處理,則在程式執行出錯時,程式就被終止,並且也不提示任何資訊。下面是使用系統提供的異常來程式設計的例子。

    由於ORACLE 的錯資訊最大長度是512位元組,為了得到完整的錯誤提示資訊,我們可用 SQLERRM SUBSTR 函式一起得到錯誤提示資訊,方便進行錯誤,特別是如果WHEN OTHERS異常處理器時更為方便。

SQLCODE  返回遇到的Oracle錯誤號,

SQLERRM  返回遇到的Oracle錯誤資訊.

:  SQLCODE=-100   è SQLERRM=’no_data_found ‘

SQLCODE=0      è SQLERRM=’normal, successfual completion’

例6. 將ORACLE錯誤程式碼及其資訊存入錯誤程式碼表

CREATE TABLE errors (errnum NUMBER(4), errmsg VARCHAR2(100));

DECLARE
   err_msg  VARCHAR2(100);
BEGIN
  
   FOR err_num IN -100 .. 0 LOOP
      err_msg := SQLERRM(err_num);
      INSERT INTO errors VALUES(err_num, err_msg);
   END LOOP;
END;
DROP TABLE errors;

例7. 查詢ORACLE錯誤程式碼;

BEGIN
   INSERT INTO employees(employee_id, first_name,last_name,hire_date,department_id)
   VALUES(2222, 'Eric','Hu', SYSDATE, 20);
   DBMS_OUTPUT.PUT_LINE('插入資料記錄成功!');
  
   INSERT INTO employees(employee_id, first_name,last_name,hire_date,department_id)
   VALUES(2222, '胡','勇', SYSDATE, 20);
   DBMS_OUTPUT.PUT_LINE('插入資料記錄成功!');
EXCEPTION
   WHEN OTHERS THEN
      DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM);
END;

例8. 利用ORACLE錯誤程式碼,編寫異常錯誤處理程式碼;

DECLARE