Oracle 中的exception——(Raise)

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_many_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執行時引擎

使用RAISE語句

呼叫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

Oracle：pl/sql異常處理 （3）

處理 oracle 系統自動生成系統異常外，可以使用 raise 來手動生成錯誤。

l Raise exception;

l Raise package.exception;

l Raise;

以上是 raise 的三種使用方法。第一種用於生成當前程式中定義的異常或在 standard 中的系統異常。

Declare

Invalid_id exception;

Id_values varchar(2);

Begin

Id_value:=id_for(‘smith’);

If substr(id_value,1,1)!=’x’

Then

Raise invalid_id;

End if;

Exception

When invalid_id

Then

Dbms_output.put_line(‘this is an invalid id!’);

End;

這是一個生成自定義異常的例子，當然也可以生成系統異常：

declare

employee_id_in number;

Begin

Select employee_id into employee_id_in from employ_list where employee_name=&n;

If employee_id_in=0

Then

Raise zero_devided;

End if;

Exception

When zero_devided

Then

Dbms_output.put_line(‘wrong!’);

End;

有一些異常是定義在非標準包中的，如 UTL_FILE ， DBMS_SQL 以及程式設計師建立的包中異常。可以使用 raise 的第二種用法來生成異常。

If day_overdue(isbn_in, browser_in) > 365

Then

Raise overdue_pkg.book_is_lost

End if;

在最後一種 raise 的形式中，不帶任何引數。這種情況只出現在希望將當前的異常傳到外部程式時。

Exception

When no_data_found

Then

Raise;

End;

Pl.sql 使用 raise_application_error 過程來生成一個有具體描述的異常。當使用這個過程時，當前程式被中止，輸入輸出引數被置為原先的值，但任何 DML 對資料庫所做的改動將被保留，可以在之後用 rollback 命令回滾。下面是該過程的原型：

Procedure raise_application_error(

Num binary_integer;

Msg varchar2;

Keeperrorstack Boolean default false

)

其中 num 是在 -20999 到 -20000 之間的任何數字（但事實上， DBMS_OUPUT 和 DBMS_DESCRIBLE 包使用了 -20005 到 -20000 的數字）； msg 是小於 2K 個字元的描述語，任何大於 2K 的字元都將被自動丟棄； keeperrorstack 預設為 false ，是指清空異常棧，再將當前異常入棧，如果指定 true 的話就直接將當前異常壓入棧中。

CREATE OR REPLACE PROCEDURE raise_by_language (code_in IN PLS_INTEGER)

IS

l_message error_table.error_string%TYPE;

BEGIN

SELECT error_string

INTO l_message

FROM error_table, v$nls_parameters v

WHERE error_number = code_in

AND string_language = v.VALUE

AND v.parameter = ‘NLS_LANGUAGE’;

RAISE_APPLICATION_ERROR (code_in, l_message);

END;