Oracle developer的異常處理機制

Oracle developer的異常處理機制

Oracle developer以其快速的數據處理開發而聞名，其異常處理機制也是比較完善，不可小覷。

1、 異常的優點
如果沒有異常，在程序中，應當檢查每個命令的成功還是失敗，如
BEGIN
SELECT ...
-- check for ’no data found’ error
SELECT ...
-- check for ’no data found’ error
SELECT ...
-- check for ’no data found’ error
這種實現的方法缺點在於錯誤處理沒有與正常處理分開，可讀性差，使用異常，可以方便處理錯誤，而且異常處理程序與正常的事務邏輯分開，提高了可讀性，如
BEGIN
SELECT ...
SELECT ...
SELECT ...
...
EXCEPTION
WHEN NO_DATA_FOUND THEN -- catches all ’no data found’ errors
2、 異常的分類
有兩種類型的異常，一種爲內部異常，一種爲用戶自定義異常，內部異常是執行期間返回到PL/SQL塊的ORACLE錯誤或由PL/SQL代碼的某操作引起的錯誤，如除數爲零或內存溢出的情況。用戶自定義異常由開發者顯示定義，在PL/SQL塊中傳遞信息以控制對於應用的錯誤處理。
每當PL/SQL違背了ORACLE原則或超越了系統依賴的原則就會隱式的產生內部異常。因爲每個ORACLE錯誤都有一個號碼並且在PL/SQL中異常通過名字處理，ORACLE提供了預定義的內部異常。如SELECT INTO 語句不返回行時產生的ORACLE異常NO_DATA_FOUND。對於預定義異常，現將最常用的異常列舉如下：
exception oracle error sqlcode value condition
no_data_found ora-01403 +100 select into 語句沒有符合條件的記錄返回
too_mang_rows ora-01422 -1422 select into 語句符合條件的記錄有多條返回
dup_val_on_index ora-00001 -1 對於數據庫表中的某一列，該列已經被限制爲唯一索引，程序試圖存儲兩個重複的值
value_error ora-06502 -6502 在轉換字符類型，截取或長度受限時，會發生該異常，如一個字符分配給一個變量，而該變量聲明的長度比該字符短，就會引發該異常
storage_error ora-06500 -6500 內存溢出
zero_divide ora-01476 -1476 除數爲零
case_not_found ora-06592 -6530 對於選擇case語句，沒有與之相匹配的條件，同時，也沒有else語句捕獲其他的條件
cursor_already_open ora-06511 -6511 程序試圖打開一個已經打開的遊標
timeout_on_resource ora-00051 -51 系統在等待某一資源，時間超時
如果要處理未命名的內部異常，必須使用OTHERS異常處理器或PRAGMA EXCEPTION_INIT 。PRAGMA由編譯器控制，或者是對於編譯器的註釋。PRAGMA在編譯時處理，而不是在運行時處理。EXCEPTION_INIT告訴編譯器將異常名與ORACLE錯誤碼結合起來，這樣可以通過名字引用任意的內部異常，並且可以通過名字爲異常編寫一適當的異常處理器。
在子程序中使用EXCEPTION_INIT的語法如下：
PRAGMA EXCEPTION_INIT(exception_name, -Oracle_error_number);
在該語法中，異常名是聲明的異常，下例是其用法：
DECLARE
deadlock_detected EXCEPTION;
PRAGMA EXCEPTION_INIT(deadlock_detected, -60);
BEGIN
... -- Some operation that causes an ORA-00060 error
EXCEPTION
WHEN deadlock_detected THEN
-- handle the error
END;
對於用戶自定義異常，只能在PL/SQL塊中的聲明部分聲明異常，異常的名字由EXCEPTION關鍵字引入：
reserved_loaned Exception
產生異常後，控制傳給了子程序的異常部分，將異常轉向各自異常控制塊，必須在代碼中使用如下的結構處理錯誤：
Exception
When exception1 then
Sequence of statements;
When exception2 then
Sequence of statements;
When others then
3、異常的拋出
由三種方式拋出異常
1． 通過PL/SQL運行時引擎
2. 使用RAISE語句
3. 調用RAISE_APPLICATION_ERROR存儲過程
　當數據庫或PL/SQL在運行時發生錯誤時，一個異常被PL/SQL運行時引擎自動拋出。異常也可以通過RAISE語句拋出
　　RAISE exception_name;
　　顯式拋出異常是程序員處理聲明的異常的習慣用法，但RAISE不限於聲明瞭的異常，它可以拋出任何任何異常。例如，你希望用TIMEOUT_ON_RESOURCE錯誤檢測新的運行時異常處理器，你只需簡單的在程序中使用下面的語句：
　　RAISE TIMEOUT_ON_RESOUCE;
比如下面一個訂單輸入的例子，若當訂單小於庫存數量，則拋出異常，並且捕獲該異常，處理異常
DECLARE
inventory_too_low EXCEPTION;
---其他聲明語句
BEGIN
IF order_rec.qty>inventory_rec.qty THEN
RAISE inventory_too_low;
END IF
EXCEPTION
WHEN inventory_too_low THEN
order_rec.staus:='backordered';
END;

RAISE_APPLICATION_ERROR內建函數用於拋出一個異常並給異常賦予一個錯誤號以及錯誤信息。自定義異常的缺省錯誤號是+1,缺省信息是User_Defined_Exception。RAISE_APPLICATION_ERROR函數能夠在pl/sql程序塊的執行部分和異常部分調用，顯式拋出帶特殊錯誤號的命名異常。 Raise_application_error(error_number,message[,true,false]))
　　錯誤號的範圍是-20,000到-20,999。錯誤信息是文本字符串，最多爲2048字節。TRUE和FALSE表示是添加(TRUE)進錯誤堆(ERROR STACK)還是覆蓋(overwrite)錯誤堆(FALSE)。缺省情況下是FALSE。
如下代碼所示：
IF product_not_found THEN
　　RAISE_APPLICATION_ERROR(-20123,'Invald product code' TRUE);
END IF;
4、異常的處理
PL/SQL程序塊的異常部分包含了程序處理錯誤的代碼，當異常被拋出時，一個異常陷阱就自動發生，程序控制離開執行部分轉入異常部分,一旦程序進入異常部分就不能再回到同一塊的執行部分。下面是異常部分的一般語法：
EXCEPTION
　WHEN exception_name THEN
　　Code for handing exception_name
　[WHEN another_exception THEN
　　Code for handing another_exception]
　[WHEN others THEN
　　code for handing any other exception.]
用戶必須在獨立的WHEN子串中爲每個異常設計異常處理代碼，WHEN OTHERS子串必須放置在最後面作爲缺省處理器處理沒有顯式處理的異常。當異常發生時，控制轉到異常部分，ORACLE查找當前異常相應的WHEN..THEN語句，捕捉異常，THEN之後的代碼被執行，如果錯誤陷阱代碼只是退出相應的嵌套塊，那麼程序將繼續執行內部塊END後面的語句。如果沒有找到相應的異常陷阱，那麼將執行WHEN OTHERS。在異常部分WHEN 子串沒有數量限制。
EXCEPTION
　WHEN inventory_too_low THEN
　　order_rec.staus:='backordered';
　　replenish_inventory(inventory_nbr=>
　　inventory_rec.sku,min_amount=>order_rec.qty-inventory_rec.qty);
　WHEN discontinued_item THEN
　　--code for discontinued_item processing
　WHEN zero_divide THEN
　　--code for zero_divide
　WHEN OTHERS THEN
　　--code for any other exception
END;
當異常拋出後，控制無條件轉到異常部分，這就意味着控制不能回到異常發生的位置，當異常被處理和解決後，控制返回到上一層執行部分的下一條語句。
BEGIN
　 DECLARE
　　bad_credit exception;
　 BEGIN
　　RAISE bad_credit;
　　　--發生異常，控制轉向；
　 EXCEPTION
　　WHEN bad_credit THEN
　　　dbms_output.put_line('bad_credit');
　　END;
　　--bad_credit異常處理後，控制轉到這裏
　EXCEPTION
　　WHEN OTHERS THEN
　　　--控制不會從bad_credit異常轉到這裏
　　　--因爲bad_credit已被處理
END;
當異常發生時，在塊的內部沒有該異常處理器時，控制將轉到或傳播到上一層塊的異常處理部分。
BEGIN
　 DECLARE ---內部塊開始
　　bad_credit exception;
　 BEGIN
　　RAISE bad_credit;
　　　--發生異常，控制轉向；
　　EXCEPTION
　　WHEN ZERO_DIVIDE THEN --不能處理bad_credite異常
　　　dbms_output.put_line('divide by zero error');
　　END --結束內部塊
　　　--控制不能到達這裏，因爲異常沒有解決；
　　　--異常部分
　　EXCEPTION
　　WHEN OTHERS THEN
　　　--由於bad_credit沒有解決，控制將轉到這裏
END;
5、異常的傳播
沒有處理的異常將沿檢測異常調用程序傳播到外面，當異常被處理並解決或到達程序最外層傳播停止。在聲明部分拋出的異常將控制轉到上一層的異常部分。
BEGIN
executable statements
BEGIN
today DATE:='SYADATE'; --ERRROR
BEGIN --內部塊開始
dbms_output.put_line('this line will not execute');
EXCEPTION
WHEN OTHERS THEN
--異常不會在這裏處理
END;--內部塊結束
EXCEPTION
WHEN OTHERS THEN
處理異常
END
執行部分拋出的異常將首先傳遞到同一塊的異常部分，如果在同一塊的異常部分沒有處理這個異常的處理器，那麼異常將會傳播到上一層的異常部分中，一直到最外層。
　　在異常部分拋出的異常將控制轉到上一層的異常部分。
　　另外錯誤報告函數SQLCODE和SQLERRM在OTHERS處理器中特別有用，因爲它們返回ORACLE錯誤代碼和消息。如下例所示：
declare
err_num NUMBER;
err_msg VARCHAR2(100);
BEGIN
...
EXCEPTION
WHEN OTHERS THEN
err_num := SQLCODE;
err_msg := SUBSTR(SQLERRM, 1, 100);
INSERT INTO errors VALUES (err_num, err_msg);
END;