源码PL/SQL从入门到精通第十二章异常处理机制Part1

相比Java的异常处理功能&＃xff0c;PL/SQL的异常处理结构上更为简单&＃xff0c;容易理解。

在调试PL/SQL代码的过程中&＃xff0c;已经领教过很多异常了&＃xff0c;所以这章感觉不难。

--第12章开始
--代码12.1 编译时PL/SQL引擎异常
--编译时的错误处理&＃xff08;以下代码将在编译时报错&＃xff09;
DECLAREv_count NUMBER;
BEGIN--由于emp001表并不存在&＃xff0c;因此PL/SQL引擎将产生编译时错误SELECT COUNT(*) INTO v_count FROM emp001;DBMS_OUTPUT.PUT_LINE(&＃39;员工人数为&＃xff1a;&＃39;||v_count);
END; --代码12.2 运行时PL/SQL被零除异常
DECLAREx NUMBER:&＃61;&x; --使用参数化的数值y NUMBER:&＃61;&y;z NUMBER;
BEGINz:&＃61;x&＃43;y; --两个数相加 DBMS_OUTPUT.PUT_LINE(&＃39;x&＃43;y&＃61;&＃39;||z); z:&＃61;x/y; --两个数相除DBMS_OUTPUT.PUT_LINE(&＃39;x/y&＃61;&＃39;||z);
END; --通过在代码中添加检查语句来处理异常
DECLAREx NUMBER:&＃61;&x; --使用参数化的数值y NUMBER:&＃61;&y;z NUMBER;
BEGINz:&＃61;x&＃43;y; --两个数相加 DBMS_OUTPUT.PUT_LINE(&＃39;x&＃43;y&＃61;&＃39;||z);IF y<>0 THEN z:&＃61;x/y; --两个数相除DBMS_OUTPUT.PUT_LINE(&＃39;x/y&＃61;&＃39;||z);END IF;
END; --使用异常处理机制处理被零除异常
DECLAREx NUMBER:&＃61;&x; --使用参数化的数值y NUMBER:&＃61;&y;z NUMBER;
BEGINz:&＃61;x&＃43;y; --两个数相加 DBMS_OUTPUT.PUT_LINE(&＃39;x&＃43;y&＃61;&＃39;||z); z:&＃61;x/y; --两个数相除DBMS_OUTPUT.PUT_LINE(&＃39;x/y&＃61;&＃39;||z);
EXCEPTION --异常处理语句块WHEN ZERO_DIVIDE THEN --处理被0除异常DBMS_OUTPUT.PUT_LINE(&＃39;被除数不能为0&＃39;);
END; SELECT * FROM emp;--代码12.4 异常处理结构示例
DECLAREe_duplicate_name EXCEPTION; --定义异常v_ename emp.ename%TYPE; --保存姓名的变量v_newname emp.ename%TYPE :&＃61; &＃39;史密斯&＃39;; --新插入的员工名称
BEGIN--查询员工编号为7369的姓名SELECT enameINTO v_enameFROM empWHERE empno &＃61; 7881;--确保插入的姓名没有重复IF v_ename &＃61; v_newnameTHENRAISE e_duplicate_name; --如果产生异常&＃xff0c;触发e_duplicate_name异常END IF;--如果没有异常&＃xff0c;则执行插入语句INSERT INTO empVALUES (7881, v_newname, &＃39;职员&＃39;, NULL, TRUNC (SYSDATE), 2000, 200, 20);
EXCEPTION --异常处理语句块WHEN e_duplicate_name --处理异常 THENDBMS_OUTPUT.put_line (&＃39;不能插入重复的员工名称&＃39;);
END;select * from emp;--代码12.5 异常处理结构示例
DECLAREe_duplicate_name EXCEPTION; --定义异常v_ename emp.ename%TYPE; --保存姓名的变量v_newname emp.ename%TYPE :&＃61; &＃39;史密斯&＃39;; --新插入的员工名称
BEGIN--查询员工编号为7369的姓名SELECT enameINTO v_enameFROM empWHERE empno &＃61; 7369;--确保插入的姓名没有重复IF v_ename &＃61; v_newnameTHENRAISE e_duplicate_name; --如果产生异常&＃xff0c;触发e_duplicate_name异常END IF;--如果没有异常&＃xff0c;则执行插入语句INSERT INTO empVALUES (7881, v_newname, &＃39;职员&＃39;, NULL, TRUNC (SYSDATE), 2000, 200, 20);
EXCEPTION --异常处理语句块WHEN e_duplicate_name THENDBMS_OUTPUT.put_line (&＃39;不能插入重复的员工名称&＃39;);WHEN OTHERS THENDBMS_OUTPUT.put_line(&＃39;异常编码&＃xff1a;&＃39;||SQLCODE||&＃39; 异常信息&＃xff1a;&＃39;||SQLERRM);
END;--代码12.6 预定义异常使用示例
DECLAREv_tmpstr VARCHAR2 (10); --定义一个字符串变量
BEGINv_tmpstr :&＃61; &＃39;这是临时句子&＃39;; --赋一个超过其类型长度的字符串
EXCEPTIONWHEN VALUE_ERROR -- 捕捉VALUE_ERROR错误THENDBMS_OUTPUT.put_line ( &＃39;出现了VALUE_ERROR错误&＃39;|| &＃39; 错误编号&＃xff1a;&＃39;|| SQLCODE|| &＃39; 错误名称&＃xff1a;&＃39;|| SQLERRM); --显示错误编号和错误消息
END;--12.2.1 声明异常
DECLAREe_nodeptno EXCEPTION; --定义自定义异常
BEGINNULL;
END;--同一块中不能多次声明一个异常&＃xff08;这还要说吗&＃xff1f;&＃xff09;
DECLAREe_userdefinedexception EXCEPTION;e_userdefinedexception EXCEPTION;
BEGINRAISE e_userdefinedexception;
EXCEPTIONWHEN OTHERS THENNULL;
END;--代码12.8 不同语句块中相同的定义相同的异常
DECLAREe_userdefinedexception EXCEPTION; --定义外层外异常
BEGINDECLAREe_userdefinedexception EXCEPTION; --在内存块中定义相同的异常BEGINRAISE e_userdefinedexception; --触发内存块中的异常END;RAISE e_userdefinedexception; --触发外层块中的异常
EXCEPTIONWHEN OTHERS THEN --捕获并处理外层块中的异常DBMS_OUTPUT.put_line (&＃39;出现了错误&＃39;|| &＃39; 错误编号&＃xff1a;&＃39;|| SQLCODE|| &＃39; 错误名称&＃xff1a;&＃39;|| SQLERRM); --显示错误编号和错误消息
END;--代码12.9 在不同块中的异常的作用域级别
DECLAREe_outerexception EXCEPTION; --定义外层外异常
BEGINDECLAREe_innerexception EXCEPTION; --在内存块中定义相同的异常BEGINRAISE e_innerexception; --触发内存块中的异常RAISE e_outerexception; --在内存块中触发在外层块中定义的异常END;RAISE e_outerexception; --触发外层块中的异常--RAISE e_innerexception; --在外层块中触发内存块中的异常是非法的
EXCEPTIONWHEN OTHERS THEN --捕获并处理外层块中的异常DBMS_OUTPUT.put_line (&＃39;出现了错误&＃39;|| &＃39; 错误编号&＃xff1a;&＃39;|| SQLCODE|| &＃39; 错误名称&＃xff1a;&＃39;|| SQLERRM); --显示错误编号和错误消息
END;--代码12.10 重新声明外部块的异常&＃xff08;子块异常覆盖父块异常&＃xff09;
DECLAREe_userdefinedexception EXCEPTION; --定义外层外异常
BEGINDECLAREe_userdefinedexception EXCEPTION; --覆盖了外层块中的异常BEGINRAISE e_userdefinedexception; --触发内存块中的异常END;
EXCEPTIONWHEN e_userdefinedexception THEN --此时并不能捕获取该异常DBMS_OUTPUT.put_line (&＃39;出现了错误&＃39;|| &＃39; 错误编号&＃xff1a;&＃39;|| SQLCODE|| &＃39; 错误名称&＃xff1a;&＃39;|| SQLERRM); --显示错误编号和错误消息 WHEN OTHERS THEN --以其他异常被传递NULL;
END;