原文連接:傳送門
html
即便是寫得最好的PL/SQL程序也會遇到錯誤或未預料到的事件。一個優秀的程序都應該可以正確處理各類出錯狀況,並儘量從錯誤中恢復。任何ORACLE錯誤(報告爲ORA-xxxxx形式的Oracle錯誤號)、PL/SQL運行錯誤或用戶定義條件(不一寫是錯誤),均可以。固然了,PL/SQL編譯錯誤不能經過PL/SQL異常處理來處理,由於這些錯誤發生在PL/SQL程序執行以前。
ORACLE 提供異常狀況(EXCEPTION)和異常處理(EXCEPTION HANDLER)來實現錯誤處理。
sql
異常狀況處理(EXCEPTION)是用來處理正常執行過程當中未預料的事件,程序塊的異常處理預約義的錯誤和自定義錯誤,因爲PL/SQL程序塊一旦產生異常而沒有指出如何處理時,程序就會自動終止整個程序運行。
數據庫
有三種類型的異常錯誤:編程
1. 預約義 ( Predefined )錯誤ide
ORACLE預約義的異常狀況大約有24個。對這種異常狀況的處理,無需在程序中定義,由ORACLE自動將其引起。函數
2.非預約義 ( Predefined )錯誤編碼
即其餘標準的ORACLE錯誤。對這種異常狀況的處理,須要用戶在程序中定義,而後由ORACLE自動將其引起。code
3.用戶定義(User_define) 錯誤orm
程序執行過程當中,出現編程人員認爲的非正常狀況。對這種異常狀況的處理,須要用戶在程序中定義,而後顯式地在程序中將其引起。
異常處理部分通常放在 PL/SQL 程序體的後半部,結構爲:htm
EXCEPTION WHEN first_exception THEN <code to handle first exception > WHEN second_exception THEN <code to handle second exception > WHEN OTHERS THEN <code to handle others exception > END;
異常處理能夠按任意次序排列,但 OTHERS 必須放在最後。
預約義說明的部分 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錯誤進行定義。步驟以下:
<異常狀況> EXCEPTION;
PRAGMA EXCEPTION_INIT(<異常狀況>, <錯誤代碼>);
在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); /* -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;
因爲異常錯誤能夠在聲明部分和執行部分以及異常錯誤部分出現,於是在不一樣部分引起的異常錯誤也不同。
當一個異常錯誤在執行部分引起時,有下列狀況:
若是沒有對當前塊異常錯誤設置定義處理器,則經過在包含塊中引起它來傳播異常錯誤。而後對該包含塊執行步驟。
若是在聲明部分引發異常狀況,即在聲明部分出現錯誤,那麼該錯誤就能影響到其它的塊。好比在有以下的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 /* 獲得全部 ORACLE 錯誤信息 */ 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 empno_remaining EXCEPTION; PRAGMA EXCEPTION_INIT(empno_remaining, -1); /* -1 是違反惟一約束條件的錯誤代碼 */ BEGIN INSERT INTO employees(employee_id, first_name,last_name,hire_date,department_id) VALUES(3333, 'Eric','Hu', SYSDATE, 20); DBMS_OUTPUT.PUT_LINE('插入數據記錄成功!'); INSERT INTO employees(employee_id, first_name,last_name,hire_date,department_id) VALUES(3333, '胡','勇',SYSDATE, 20); DBMS_OUTPUT.PUT_LINE('插入數據記錄成功!'); EXCEPTION WHEN empno_remaining THEN DBMS_OUTPUT.PUT_LINE('違反數據完整性約束!'); WHEN OTHERS THEN DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM); END;