建站服務(wù)器 1. PL/SQL異常處理
1、設(shè)置參數(shù)PLSQL_WARNINGS,記錄告警
會(huì)話級(jí)別啟用所有告警類型
ALTER SESSION SET PLSQL_WARNINGS=\'ENABLE:ALL\';
會(huì)話級(jí)別關(guān)閉所有告警
ALTER SESSION SET PLSQL_WARNINGS=\'DISABLE:ALL\';
開(kāi)啟 SEVERE warnings, 關(guān)閉 PERFORMANCE warnings, PLW-06002 告警為錯(cuò)誤
ALTER SESSION SET PLSQL_WARNINGS=\'ENABLE:SEVERE\', \'DISABLE:PERFORMANCE\', \'ERROR:06002\';
2、通過(guò)dbms告警包記錄告警
CALL DBMS_WARNING.set_warning_setting_string (\'ENABLE:ALL\' ,\'SESSION\');
檢查告警設(shè)置
SELECT DBMS_WARNING.get_warning_setting_string() FROM DUAL;
1.1.2. 測(cè)試創(chuàng)建存儲(chǔ)過(guò)程
CREATE OR REPLACE PROCEDURE unreachable_code AS
x CONSTANT BOOLEAN := TRUE;
BEGIN
IF x THEN
DBMS_OUTPUT.PUT_LINE(\'TRUE\');
ELSE
DBMS_OUTPUT.PUT_LINE(\'FALSE\');
END IF;
END unreachable_code;
/
開(kāi)啟告警記錄
CALL DBMS_WARNING.set_warning_setting_string (\'ENABLE:ALL\' ,\'SESSION\');
重新編譯
ALTER PROCEDURE unreachable_code COMPILE;
查看錯(cuò)誤
Show errors:
1.2.異常處理概述即使是寫(xiě)得最好的PL/SQL程序也會(huì)遇到錯(cuò)誤或未預(yù)料到的事件。一個(gè)優(yōu)秀的程序都應(yīng)該能夠正確處理各種出錯(cuò)情況,并盡可能從錯(cuò)誤中恢復(fù)。任何ORACLE錯(cuò)誤(報(bào)告為ORA-xxxxx形式的Oracle錯(cuò)誤號(hào))、PL/SQL運(yùn)行錯(cuò)誤或用戶定義條件(不一寫(xiě)是錯(cuò)誤),都可以。當(dāng)然了,PL/SQL編譯錯(cuò)誤不能通過(guò)PL/SQL異常處理來(lái)處理,因?yàn)檫@些錯(cuò)誤發(fā)生在PL/SQL程序執(zhí)行之前。
ORACLE 提供異常情況(EXCEPTION)和異常處理(EXCEPTION HANDLER)來(lái)實(shí)現(xiàn)錯(cuò)誤處理。
異常情況處理(EXCEPTION)是用來(lái)處理正常執(zhí)行過(guò)程中未預(yù)料的事件,程序塊的異常處理預(yù)定義的錯(cuò)誤和自定義錯(cuò)誤,由于PL/SQL程序塊一旦產(chǎn)生異常而沒(méi)有指出如何處理時(shí),程序就會(huì)自動(dòng)終止整個(gè)程序運(yùn)行。
有兩大類類型的異常錯(cuò)誤:
1、預(yù)定義 ( Predefined )錯(cuò)誤
ORACLE預(yù)定義的異常情況大約有24個(gè)。對(duì)這種異常情況的處理,無(wú)需在程序中定義,由ORACLE自動(dòng)將其引發(fā)。
2、用戶定義(User_define) 錯(cuò)誤
程序執(zhí)行過(guò)程中,出現(xiàn)編程人員認(rèn)為的非正常情況。對(duì)這種異常情況的處理,需要用戶在程序中定義,然后顯式地在程序中將其引發(fā)。
用戶定義錯(cuò)誤有分為兩類。
? 內(nèi)部錯(cuò)誤碼定義的異常
? 用戶定義的錯(cuò)誤代碼異常
1.3.預(yù)定義異常處理預(yù)定義說(shuō)明的部分 ORACLE 異常錯(cuò)誤
錯(cuò)誤號(hào)
異常錯(cuò)誤信息名稱
說(shuō)明
ORA-0001
Dup_val_on_index
違反了唯一性限制
ORA-0051
Timeout-on-resource
在等待資源時(shí)發(fā)生超時(shí)
ORA-0061
Transaction-backed-out
由于發(fā)生死鎖事務(wù)被撤消
ORA-1001
Invalid-CURSOR
試圖使用一個(gè)無(wú)效的游標(biāo)
ORA-1012
Not-logged-on
沒(méi)有連接到ORACLE
ORA-1017
Login-denied
無(wú)效的用戶名/口令
ORA-1403
No_data_found
SELECT INTO沒(méi)有找到數(shù)據(jù)
ORA-1422
Too_many_rows
SELECT INTO 返回多行
ORA-1476
Zero-divide
試圖被零除
ORA-1722
Invalid-NUMBER
轉(zhuǎn)換一個(gè)數(shù)字失敗
ORA-6500
Storage-error
內(nèi)存不夠引發(fā)的內(nèi)部錯(cuò)誤
ORA-6501
Program-error
內(nèi)部錯(cuò)誤
ORA-6502
Value-error
轉(zhuǎn)換或截?cái)噱e(cuò)誤
ORA-6504
Rowtype-mismatch
宿主游標(biāo)變量與 PL/SQL變量有不兼容行類型
ORA-6511
CURSOR-already-OPEN
試圖打開(kāi)一個(gè)已處于打開(kāi)狀態(tài)的游標(biāo)
ORA-6530
Access-INTO-null
試圖為null 對(duì)象的屬性賦值
ORA-6531
Collection-is-null
試圖將Exists 以外的集合( collection)方法應(yīng)用于一個(gè)null pl/sql 表上或varray上
ORA-6532
Subscript-outside-limit
對(duì)嵌套或varray索引得引用超出聲明范圍以外
ORA-6533
Subscript-beyond-count
對(duì)嵌套或varray 索引得引用大于集合中元素的個(gè)數(shù).
對(duì)這種異常情況的處理,只需在PL/SQL塊的異常處理部分,直接引用相應(yīng)的異常情況名,并對(duì)其完成相應(yīng)的異常錯(cuò)誤處理即可
1.4.用戶定義的異常處理程序執(zhí)行過(guò)程中,出現(xiàn)編程人員認(rèn)為的非正常情況。對(duì)這種異常情況的處理,需要用戶在程序中定義,然后顯式地在程序中將其引發(fā)。
1.4.1. 異常定義和異常的范圍異常定義
DECLARE
past_due EXCEPTION;
BEGIN
NULL;
END;
/
異常的范圍
異常必須在當(dāng)前塊定義,全局異??梢栽谧訅K重處理,子塊中的異常只在只在子塊中處理,子塊中的異常定義可以傳播給上層塊,但是子塊需要重新觸發(fā)異常。
DECLARE
past_due EXCEPTION;
acct_num NUMBER;
BEGIN
DECLARE -- sub-block begins
past_due EXCEPTION; -- this declaration prevails
acct_num NUMBER;
due_date DATE := SYSDATE - 1;
todays_date DATE := SYSDATE;
BEGIN
IF due_date < todays_date THEN
RAISE past_due; -- this is not handled
END IF;
END; -- sub-block ends
EXCEPTION
-- Does not handle raised exception
WHEN past_due THEN
DBMS_OUTPUT.PUT_LINE (\'Handling PAST_DUE exception.\');
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE
(\'Could not recognize PAST_DUE_EXCEPTION in this scope.\');
END;
/
1.4.2. 內(nèi)部錯(cuò)誤碼定義的異常<異常情況> EXCEPTION;
PRAGMA EXCEPTION_INIT(<異常情況>, <錯(cuò)誤代碼>);
DECLARE
deadlock_detected EXCEPTION;
PRAGMA EXCEPTION_INIT(deadlock_detected, -60);
BEGIN
NULL; -- Some operation that causes an ORA-00060 error
EXCEPTION
WHEN deadlock_detected THEN
NULL; -- handle the error
END;
/
1.4.3. 用戶定義的錯(cuò)誤代碼異常<異常情況> EXCEPTION;
觸發(fā)異常
RAISE <異常情況>;
在PL/SQL 塊的異常情況處理部分對(duì)異常情況做出相應(yīng)的處理。
舉例
DECLARE
out_of_stock EXCEPTION;
number_on_hand NUMBER := 0;
BEGIN
IF number_on_hand < 1 THEN
RAISE out_of_stock;
END IF;
EXCEPTION
WHEN out_of_stock THEN
DBMS_OUTPUT.PUT_LINE(\'Out-of-stock error.\');
END;
/
1.5.異常的傳播 1.6.異常的重新觸發(fā)異常必須在當(dāng)前塊定義,全局異常可以在子塊重處理,子塊中的異常只在只在子塊中處理,子塊中的異常定義可以傳播給上層塊,但是子塊需要重新觸發(fā)異常,上層塊才能處理相同的異常。
DECLARE
salary_too_high EXCEPTION;
current_salary NUMBER := 20000;
max_salary NUMBER := 10000;
erroneous_salary NUMBER;
BEGIN
BEGIN -- sub-block begins
IF current_salary > max_salary THEN
RAISE salary_too_high; -- raise the exception
END IF;
EXCEPTION
WHEN salary_too_high THEN
-- first step in handling the error
DBMS_OUTPUT.PUT_LINE(\'Salary \' || erroneous_salary ||\' is out of range.\');
DBMS_OUTPUT.PUT_LINE (\'Maximum salary is \' || max_salary || \'.\');
RAISE; -- reraise exception
END; -- sub-block ends
EXCEPTION
WHEN salary_too_high THEN
-- handle error more thoroughly
erroneous_salary := current_salary;
current_salary := max_salary;
DBMS_OUTPUT.PUT_LINE (
\'Revising salary from \' || erroneous_salary ||
\' to \' || current_salary || \'.\'
);
END;
/
1.7.異常的處理定義中出現(xiàn)錯(cuò)誤,直接關(guān)閉塊。異常中出現(xiàn)錯(cuò)誤,后續(xù)操作時(shí)。
1.7.1. 異常處理---記錄錯(cuò)誤代碼和錯(cuò)誤消息Displaying SQLCODE and SQLERRM
創(chuàng)建表
CREATE TABLE errors (
code NUMBER,
message VARCHAR2(64),
happened TIMESTAMP
);
DECLARE
name EMPLOYEES.LAST_NAME%TYPE;
v_code NUMBER;
v_errm VARCHAR2(64);
BEGIN
SELECT last_name INTO name
FROM EMPLOYEES
WHERE EMPLOYEE_ID = -1;
EXCEPTION
WHEN OTHERS THEN
v_code := SQLCODE;
v_errm := SUBSTR(SQLERRM, 1, 64);
DBMS_OUTPUT.PUT_LINE
(\'Error code \' || v_code || \': \' || v_errm);
INSERT INTO errors (code, message, happened)
VALUES (v_code, v_errm, SYSTIMESTAMP);
commit;
END;
/
1.7.2. 異常處理—異常出發(fā)后繼續(xù)執(zhí)行CREATE TABLE employees_temp AS
SELECT employee_id, salary, commission_pct
FROM employees;
DECLARE
sal_calc NUMBER(8,2);
BEGIN
INSERT INTO employees_temp (employee_id, salary, commission_pct)
VALUES (301, 2500, 0);
SELECT (salary / commission_pct) INTO sal_calc
FROM employees_temp
WHERE employee_id = 301;
INSERT INTO employees_temp VALUES (302, sal_calc/100, .1);
EXCEPTION
WHEN ZERO_DIVIDE THEN
DBMS_OUTPUT.PUT_LINE(sqlcode||sqlerrm);
null;
END;
/
1.7.3. 異常處理—重新開(kāi)始事務(wù)DROP TABLE results;
CREATE TABLE results (
res_name VARCHAR(20),
res_answer VARCHAR2(3)
);
CREATE UNIQUE INDEX res_name_ix ON results (res_name);
INSERT INTO results (res_name, res_answer)
VALUES (\'SMYTHE\', \'YES\');
INSERT INTO results (res_name, res_answer)
VALUES (\'JONES\', \'NO\');
DECLARE
name VARCHAR2(20) := \'SMYTHE\';
answer VARCHAR2(3) := \'NO\';
suffix NUMBER := 1;
BEGIN
FOR i IN 1..5 LOOP -- try 5 times
BEGIN -- sub-block begins
SAVEPOINT start_transaction;
-- Remove rows from a table of survey results:
DELETE FROM results WHERE res_answer = \'NO\';
-- Add a survey respondent\'s name and answers:
INSERT INTO results (res_name, res_answer)
VALUES (name, answer);
-- If two respondents have same name, raise DUP_VAL_ON_INDEX.
COMMIT;
EXIT;
EXCEPTION
WHEN DUP_VAL_ON_INDEX THEN
ROLLBACK TO start_transaction; -- undo changes
suffix := suffix + 1; -- try to fix problem
name := name || TO_CHAR(suffix);
END; -- sub-block ends
END LOOP;
END;
/
1.7.4. 異常處理—定位變量標(biāo)識(shí)異常位置CREATE OR REPLACE PROCEDURE loc_var AS
stmt_no NUMBER;
name_ VARCHAR2(100);
BEGIN
stmt_no := 1; -- designates 1st SELECT statement
SELECT table_name INTO name_
FROM user_tables
WHERE table_name LIKE \'ABC%\';
stmt_no := 2; -- designates 2nd SELECT statement
SELECT table_name INTO name_
FROM user_tables
WHERE table_name LIKE \'XYZ%\';
EXCEPTION
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE (\'Table name not found in query \' || stmt_no);
END;
/
網(wǎng)站標(biāo)題:PL/SQL異常處理
URL地址:http://m.rwnh.cn/article46/cpoheg.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站建設(shè)、App設(shè)計(jì)、網(wǎng)站內(nèi)鏈、品牌網(wǎng)站設(shè)計(jì)、網(wǎng)站設(shè)計(jì)公司、建站公司
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)