Oracle例外用法实例详解

2020-07-26 14:12:44

字体：大中小

来源：转载

供稿：网友

本文实例讲述了Oracle例外用法。分享给大家供大家参考，具体如下：

一、例外分类

oracle将例外分为预定义例外、非预定义例外和自定义例外三种。

1)、预定义例外用于处理常见的oracle错误。

2)、非预定义例外用于处理预定义例外不能处理的例外。

3)、自定义例外用于处理与oracle错误无关的其它情况。

下面通过一个小案例演示如果不处理例外看会出现什么情况？

编写一个存储过程，可接收雇员的编号，并显示该雇员的姓名。

sql代码如下：

SET SERVEROUTPUT ON;DECLARE V_ENAME EMP.ENAME%TYPE;BEGIN SELECT ENAME INTO V_ENAME FROM EMP WHERE EMPNO = &GNO; DBMS_OUTPUT.PUT_LINE('名字：' || V_ENAME);END;/

随便输入不存在的编号，回车，会抛出如下异常：

ORA-01403: 未找到数据
ORA-06512: 在line 6

例外捕获的sql代码如下：

SET SERVEROUTPUT ON;DECLARE V_ENAME EMP.ENAME%TYPE;BEGIN SELECT ENAME INTO V_ENAME FROM EMP WHERE EMPNO = &GNO; DBMS_OUTPUT.PUT_LINE('名字：' || V_ENAME);EXCEPTION WHEN no_data_found THEN  DBMS_OUTPUT.PUT_LINE('编号未找到！');END;/

随便输入不存在的编号，回车，会友情提示：编号未找到！

二、处理预定义例外

预定义例外是由pl/sql所提供的系统例外。当pl/sql应用程序违反了oracle规定的限制时，则会隐含的触发一个内部例外。pl/sql为开发人员提供了二十多个预定义例外。我们给大家介绍常用的例外。

1)、case_not_found预定义例外

在开发pl/sql块中编写case语句时，如果在when子句中没有包含必须的条件分支，就会触发case_not_found例外：

SET SERVEROUTPUT ON;CREATE OR REPLACE PROCEDURE SP_PRO6(SPNO NUMBER) IS V_SAL EMP.SAL%TYPE;BEGIN SELECT SAL INTO V_SAL FROM EMP WHERE EMPNO = SPNO; CASE  WHEN V_SAL < 1000 THEN   UPDATE EMP SET SAL = SAL + 100 WHERE EMPNO = SPNO;  WHEN V_SAL < 2000 THEN   UPDATE EMP SET SAL = SAL + 200 WHERE EMPNO = SPNO; END CASE;EXCEPTION WHEN CASE_NOT_FOUND THEN  DBMS_OUTPUT.PUT_LINE('case语句没有与' || V_SAL || '相匹配的条件');END;/--调用存储过程SQL> EXEC SP_PRO6(7369);

case语句没有与4444相匹配的条件

2)、cursor_already_open预定义例外

当重新打开已经打开的游标时，会隐含的触发cursor_already_open例外

DECLARE CURSOR EMP_CURSOR IS  SELECT ENAME, SAL FROM EMP;BEGIN OPEN EMP_CURSOR; --声明时游标已打开，所以没必要再次打开 FOR EMP_RECORD1 IN EMP_CURSOR LOOP  DBMS_OUTPUT.PUT_LINE(EMP_RECORD1.ENAME); END LOOP;EXCEPTION WHEN CURSOR_ALREADY_OPEN THEN  DBMS_OUTPUT.PUT_LINE('游标已经打开');END;/

3)、dup_val_on_index预定义例外

在唯一索引所对应的列上插入重复的值时，会隐含的触发例外

BEGIN INSERT INTO DEPT VALUES (10, '公关部', '北京');EXCEPTION WHEN DUP_VAL_ON_INDEX THEN  DBMS_OUTPUT.PUT_LINE('在deptno列上不能出现重复值');END;/

4)、invalid_cursorn预定义例外

当试图在不合法的游标上执行操作时，会触发该例外

例如：试图从没有打开的游标提取数据，或是关闭没有打开的游标。则会触发该例外

DECLARE CURSOR EMP_CURSOR IS  SELECT ENAME, SAL FROM EMP; EMP_RECORD EMP_CURSOR%ROWTYPE;BEGIN --open emp_cursor; --打开游标 FETCH EMP_CURSOR INTO EMP_RECORD; DBMS_OUTPUT.PUT_LINE(EMP_RECORD.ENAME); CLOSE EMP_CURSOR;EXCEPTION WHEN INVALID_CURSOR THEN  DBMS_OUTPUT.PUT_LINE('请检测游标是否打开');END;/

5)、invalid_number预定义例外

当输入的数据有误时，会触发该例外

比如：数字100写成了loo就会触发该例外

SET SERVEROUTPUT ON;BEGIN UPDATE EMP SET SAL = SAL + 'AAA';EXCEPTION WHEN INVALID_NUMBER THEN  DBMS_OUTPUT.PUT_LINE('输入的数字不正确');END;/

6)、no_data_found预定义例外

下面是一个pl/sql 块，当执行select into没有返回行，就会触发该例外

SET serveroutput ON;DECLARE V_SAL EMP.SAL%TYPE;BEGIN SELECT SAL INTO V_SAL FROM EMP WHERE ENAME = 'ljq';EXCEPTION WHEN NO_DATA_FOUND THEN  DBMS_OUTPUT.PUT_LINE('不存在该员工');END;/

7)、too_many_rows预定义例外

当执行select into语句时，如果返回超过了一行，则会触发该例外。

DECLARE V_ENAME EMP.ENAME%TYPE;BEGIN SELECT ENAME INTO V_ENAME FROM EMP;EXCEPTION WHEN TOO_MANY_ROWS THEN  DBMS_OUTPUT.PUT_LINE('返回了多行');END;/

8)、zero_divide预定义例外

当执行2/0语句时，则会触发该例外

9)、value_error预定义例外

当在执行赋值操作时，如果变量的长度不足以容纳实际数据，则会触发该例外value_error

其它预定义例外(这些例外不是在pl/sql里触发的，而是在用oracle时触发的，所以取名叫其它预定义例外)

1、login_denied

当用户非法登录时，会触发该例外

2、not_logged_on

如果用户没有登录就执行dml操作，就会触发该例外

3、storage_error

如果超过了内存空间或是内存被损坏，就触发该例外

4、timeout_on_resource

如果oracle在等待资源时，出现了超时就触发该例外

三、非预定义例外

非预定义例外用于处理与预定义例外无关的oracle错误。使用预定义例外只能处理21个oracle 错误，而当使用pl/sql开发应用程序时，可能会遇到其它的一些oracle错误。比如在pl/sql块中执行dml语句时，违反了约束规定等等。在这样的情况下，也可以处理oracle的各种例外，因为非预定义例外用的不多，这里我就不举例了。

四、处理自定义例外

预定义例外和自定义例外都是与oracle错误相关的，并且出现的oracle 错误会隐含的触发相应的例外；而自定义例外与oracle 错误没有任何关联，它是由开发人员为特定情况所定义的例外.

问题：请编写一个pl/sql 块，接收一个雇员的编号，并给该雇员工资增加1000元，如果该雇员不存在，请提示。

CREATE OR REPLACE PROCEDURE EX_TEST(SPNO NUMBER) ISBEGIN UPDATE EMP SET SAL = SAL + 1000 WHERE EMPNO = SPNO;END;/--调用存储过程，EXEC EX_TEST(56);

这里，编号为56 是不存在的，刚才的报异常了，为什么现在不报异常呢？
因为刚才的是select语句

怎么解决这个问题呢？修改代码，如下：

--自定义例外CREATE OR REPLACE PROCEDURE EX_TEST(SPNO NUMBER) IS--定义一个例外MYEX EXCEPTION;BEGIN--更新用户salUPDATE EMP SET SAL = SAL + 1000 WHERE EMPNO = SPNO;--sql%notfound 这是表示没有update--raise myex;触发myexIF SQL%NOTFOUND THEN RAISE MYEX;END IF;EXCEPTIONWHEN MYEX THEN DBMS_OUTPUT.PUT_LINE('没有更新任何用户');END;/

现在再测试一次：