PL/SQL異常處理初步
2024-07-21 02:40:52
供稿：網友
PL/SQL處理異常不同于其他程序語言的錯誤治理方法，PL/SQL的異常處理機制與ADA很相似，有一個處理錯誤的全包含方法。當發(fā)生錯誤時，程序無條件轉到異常處理部分，這就要求代碼要非常干凈并把錯誤處理部分和程序的其它部分分開。Oracle答應聲明其他異常條件類型以擴展錯誤/異常處理。 這種擴展使PL/SQL的異常處理非常靈活。
當一個運行時錯誤發(fā)生時，稱為一個異常被拋出。PL/SQL程序編譯時的錯誤不是能被處理得異常，只有在運行時的異常能被處理。在PL/SQL程序設計中異常的拋出和處理是非常重要的內容。
拋出異常
由三種方式拋出異常
. 通過PL/SQL運行時引擎
. 使用RAISE語句
. 調用RAISE_application_ERROR存儲過程
當數(shù)據(jù)庫或PL/SQL在運行時發(fā)生錯誤時，一個異常被PL/SQL運行時引擎自動拋出。異常也可以通過RAISE語句拋出
RAISE exception_name;
顯式拋出異常是程序員處理聲明的異常的習慣用法，但RAISE不限于聲明了的異常，它可以拋出任何任何異常。例如，你希望用TIMEOUT_ON_RESOURCE錯誤檢測新的運行時異常處理器，你只需簡單的在程序中使用下面的語句：
RAISE TIMEOUT_ON_RESOUCE;
下面看一個訂單輸入系統(tǒng)，當庫存小于訂單時拋出一個inventory_too_low異常。
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';
replenish_inventory(inventory_nbr=>
inventory_rec.sku,min_amount=>order_rec.qty-inventory_rec.qty);
END;
這里replenish_inventory是一個觸發(fā)器。
處理異常
PL/SQL程序塊的異常部分包含了程序處理錯誤的代碼，當異常被拋出時，一個異常陷阱就自動發(fā)生，程序控制離開執(zhí)行部分轉入異常部分,一旦程序進入異常部分就不能再回到同一塊的執(zhí)行部分。下面是異常部分的一般語法：
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子串必須放置在最后面作為缺省處理器處理沒有顯式處理的異常。當異常發(fā)生時，控制轉到異常部分，ORACLE查找當前異常相應的WHEN..THEN語句，捕捉異常，THEN之后的代碼被執(zhí)行，假如錯誤陷阱代碼只是退出相應的嵌套塊，那么程序將繼續(xù)執(zhí)行內部塊END后面的語句。假如沒有找到相應的異常陷阱，那么將執(zhí)行WHEN OTHERS。在異常部分WHEN 子串沒有數(shù)量限制。
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;
當異常拋出后，控制無條件轉到異常部分，這就意味著控制不能回到異常發(fā)生的位置，當異常被處理和解決后，控制返回到上一層執(zhí)行部分的下一條語句。
BEGIN
DECLARE
bad_credit;
BEGIN
RAISE bad_credit;
--發(fā)生異常，控制轉向；
EXCEPTION
WHEN bad_credit THEN
dbms_output.put_line('bad_credit');
END;
--bad_credit異常處理后，控制轉到這里
EXCEPTION
WHEN OTHERS THEN
--控制不會從bad_credit異常轉到這里
--因為bad_credit已被處理
END;
當異常發(fā)生時，在塊的內部沒有該異常處理器時，控制將轉到或傳播到上一層塊的異常處理部分。
BEGIN
DECLARE ---內部塊開始
bad_credit;
BEGIN
RAISE bad_credit;
--發(fā)生異常，控制轉向；
EXCEPTION
WHEN ZERO_DIVIDE THEN --不能處理bad_credite異常
dbms_output.put_line('divide by zero error');
END --結束內部塊
--控制不能到達這里，因為異常沒有解決；
--異常部分
EXCEPTION
WHEN OTHERS THEN
--由于bad_credit沒有解決，控制將轉到這里
END;
異常傳播
沒有處理的異常將沿檢測異常調用程序傳播到外面，當異常被處理并解決或到達程序最外層傳播停止。
在聲明部分拋出的異常將控制轉到上一層的異常部分。
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
執(zhí)行部分拋出的異常將首先傳遞到同一塊的異常部分，假如在同一塊的異常部分沒有處理這個異常的處理器，那么異常將會傳播到上一層的異常部分中，一直到最外層。
在異常部分拋出的異常將控制轉到上一層的異常部分。
處理異常將停止異常的傳播和解決。有時用戶希望在錯誤發(fā)生時，程序仍然能執(zhí)行一些動作，要達到這個目的，可以把希望執(zhí)行的動作放在異常處理器中，然后執(zhí)行不帶參數(shù)的RAISE語句，RAISE語句將重新拋出出現(xiàn)的異常，答應他繼續(xù)傳播。
DECLARE
order_too_old EXCEPTION;
BEGIN
RAISE order_too_old;
EXCEPTION
WHEN order_too_old THEN
DECLARE
file_handle UTL_FILE.FILE_TYPE;
BEGIN
--open file
file_handle:=UTL_FILE.FOPEN
(location=>'/ora01/app/oracle/admin/test/utlsir'
,filename=>'error.log'
.open_mode=>'W');
--write error stack
UTL_FILE.PUT_LINE(filehandle,
DBMS_UTILITY.FORMAT_ERROR_STACK);
--write the call stack
UTL_FILE.PUT_LINE(filehandle,
DBMS_UTILITY.FORMAT_CALL_STACK);
--close error log
UTL_FILE.FCLOSE(file_handle);
RAISE; --re-raise the exception
END
END
假如從FORMAT_XXX_STACK輸出一個很大的值，那么使用DBMS_OUTPUT或UTL_FILE顯示錯誤或調用堆的異常部分自身也會拋出異常，這兩個堆常規(guī)下最多能返回2000字節(jié)，但utl_file.put_line被限制在1000字節(jié)以內，而dbms_output.put_line限制在512字節(jié)內。假如使用前面的代碼并且不答應這種可能性，那么在異常處理器中將拋出一個未處理的異常。
GOTO語句不能用于將控制從執(zhí)行部分傳遞到異常部分或反之。
已命名異常
在PL/SQL塊的異常部分只有已命名的異常才能被WHEN子串處理，ORACLE包含了一系列已命名的異常，這些異常都聲明在STANDARD包中，這些內建異常在這里就不一一講述，有愛好的讀者可以查閱有關資料。
常用異常處理方法
除了標準異常外，用戶可以聲明自己的已命名異常。比如商業(yè)規(guī)則錯誤，或者將自定義異常與一個數(shù)據(jù)庫號相聯(lián)系，甚至可以將數(shù)據(jù)庫錯誤號賦予自定義異常。PL/SQL的這個性能極大的提高了對異常的治理和處理的能力。
聲明自己的異常
假如你希望聲明自己的異常，那么你可以在異常處理器中包括WHEN子句，聲明的異常的作用范圍與聲明的變量相同。聲明在外層塊的異常能被該塊和它的子塊訪問，但聲明在子塊的異常不能被父塊處理。
例：
BEGIN
DECLARE
Insufficient_credite EXCEPTION;
BEGIN
RASISE Insufficient_credite;
EXCEPTION
WHEN Insufficient_credite THEN
--可以在此處理異常
extend_credite(cust_id);
END -嵌套塊結束
EXCEPTION
WHEN Insufficient_credite THEN
--超出范圍，不能在這里處理異常
END;
假如聲明的異常與內建的異常同名，那么當引用異常將解決你的異常而不是內建的異常。
給數(shù)據(jù)庫錯誤命名
假如希望處理一個異常，那么異常必須有一個名字，數(shù)據(jù)庫錯誤有數(shù)千個，但是只有不到25個是內建的已命名異常，但需要處理這些未命名的異常時，你可以將一個名字和一個錯誤號聯(lián)系在一起，達到這個目的的語句是：PRAGMA EXCEPTION_INIT語句
語法如下：
PRAGMA EXCEPTION_INIT(exception_name，error_number);
執(zhí)行這個語句之前，必須首先聲明異常名。
DECLARE
invald_table_name EXCEPTION;
PRAGMA EXCEPTION_INIT(invald_table_name,-942);
BEGIN
EXCEPTION
WHEN invald_table_name THEN
UTL_FILE.PUT_LINE(file_handle,'user' UID 'hit a bad table');
END;
另外一種處理數(shù)據(jù)庫錯誤的方法是使用內建函數(shù)SQLCODE和SQLERRM，這兩個函數(shù)在包一級聲明，SQLCODE將返回現(xiàn)行數(shù)據(jù)庫錯誤號，這些錯誤號中除了NO_DATA_FOUND是+100外其他都是負數(shù)。SQLERRM返回文本描述的錯誤信息。為了獲得用戶自定義異常返回的SQLERRM和SQLCODE，你需要使用RAISE_APPLICATION_ERROR函數(shù)給自定義異常標注錯誤號。
給自定義錯誤標注號碼
RAISE_APPLICATION_ERROR內建函數(shù)用于拋出一個異常并給異常賦予一個錯誤號以及錯誤信息。自定義異常的缺省錯誤號是+1,缺省信息是User_Defined_Exception。來自未處理的異常的一般信息對于識別導致錯誤的原因沒有幫助，RAISE_APPLICATION_ERROR函數(shù)能夠在pl/sql程序塊的執(zhí)行部分和異常部分調用，顯式拋出帶非凡錯誤號的命名異常。
RAISE_APPLICATION_ERROR(error_name,error_message[,{TRUE FALSE}]);
錯誤號的范圍是-20,999到-20,999。錯誤信息是文本字符串，最多為2048字節(jié)。TRUE和FALSE表示是添加(TRUE)進錯誤堆(ERROR STACK)還是覆蓋(overwrite)錯誤堆(FALSE)。缺省情況下是FALSE。
IF product_not_found THEN
RAISE_APPLICATION_ERROR(-20123,'Invald product code' TRUE);
END IF;
