例外处理 例外的分类
oracle将例外分为预定义例外，非预定义例外和自定义例外三种。
预定义例外用于处理常见的oracle错误
非预定义例外用于处理预定义例外不能处理的例外
自定义例外用于处理与oracle错误无关的其它情况 例外传递
如果不处理例外我们看看会出现什么情况：
案例，编写一个过程，可接收雇员的编号，并显示该雇员的姓名。
问题是，如果输入的雇员编号不存在，怎样去处理呢？
Sql代码
.--例外案例
.declare
.--定义
.v_ename emp.ename%type;
.begin
.--
.select ename into v_ename from emp where empno=&gno;
.dbms_output.put_line('名字：'||v_ename)
./
执行，弹出框，看图：
随便输个不存在的编号，回车，会抛出异常，显示：
ORA-: 未找到数据
ORA-: 在line
Sql代码
.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 （no_data_found是预定义例外）
. dbms_output.put_line('编号没有！');
./
执行，输入一个不存在的编号，回车，显示：
编号没有！
处理预定义例外
预定义例外是由pl/sql所提供的系统例外。当pl/sql应用程序违反了oracle 规定的限制时，则会隐含的触发一个内部例外。pl/sql为开发人员提供了二十多个预定义例外。我们给大家介绍常用的例外。 预定义例外 case_not_found
在开发pl/sql块中编写case语句时，如果在when子句中没有包含必须的条件分支，就会触发case_not_found的例外：
Sql代码
.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 < then
. update emp set sal = sal + where empno = spno;
. when v_sal < then
. update emp set sal = sal + where empno = spno;
. end case;
.exception
. when case_not_found then
. dbms_output.put_line('case语句没有与' || v_sal || '相匹配的条件');
.end; 预定义例外 cursor_already_open
当重新打开已经打开的游标时，会隐含的触发例外cursor_already_open
Sql代码
.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;
./ 预定义例外 dup_val_on_index
在唯一索引所对应的列上插入重复的值时，会隐含的触发例外dup_val_on_index例外
Sql代码
.begin
. insert into dept values (, '公关部', '北京');
.exception
. when dup_val_on_index then
. dbms_output.put_line('在deptno列上不能出现重复值');
.end; 预定义例外 invalid_cursor
当试图在不合法的游标上执行操作时，会触发该例外
例如：试图从没有打开的游标提取数据，或是关闭没有打开的游标。则会触发该例外
Sql代码
.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; 预定义例外 invalid_number
当输入的数据有误时，会触发该例外
比如：数字100写成了loo就会触发该例外
Sql代码
.begin
. update emp set sal= sal + 'loo';
.exception
. when invalid_number then
. dbms_output.put_line('输入的数字不正确');
.end; 预定义例外 no_data_found
下面是一个pl/sql块，当执行select into 没有返回行，就会触发该例外
Sql代码
.declare
. v_sal emp.sal%type;
.begin
. select sal into v_sal from emp
. when ename='&name';
.exception
. when no_data_found then
. dbms_output.put_line('不存在该员工')；
.end;
预定义例外 too_many_rows
当执行select into语句时，如果返回超过了一行，则会触发该例外。
Sql代码
.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; 预定义例外 zero_divide
当执行2/0语句时，则会触发该例外。 预定义例外 value_error
当在执行赋值操作时，如果变量的长度不足以容纳实际数据，则会触发该例外value_error，比如：
Sql代码
.declare
. v_ename varchar2();
.begin
. select ename into v_ename from emp where empno = &no1;
. dbms_output.put_line(v_ename);
.exception
. when value_error then
. dbms_output.put_line('变量尺寸不足');
end;
其它预定义例外(这些例外不是在pl/sql里触发的，而是在用oracle时触发的，所以取名叫其它预定义例外)
.login_denied
当用户非法登录时，会触发该例外
.not_logged_on
如果用户没有登录就执行dml操作，就会触发该例外
.storage_error
如果超过了内存空间或是内存被损坏，就触发该例外
.timeout_on_resource
如果oracle在等待资源时，出现了超时就触发该例外 非预定义例外
非预定义例外用于处理与预定义例外无关的oracle错误。使用预定义例外只能处理21个oracle错误，而当使用pl/sql开发应用程序时，可能会遇到其它的一些oracle错误。比如在pl/sql块中执行dml语句时，违反了约束规定等等。在这样的情况下，也可以处理oracle的各种例外，因为非预定义例外用的不多，这里我就不举例了。
处理自定义例外
预定义例外和自定义例外都是与oracle错误相关的，并且出现的oracle错误会隐含的触发相应的例外；而自定义例外与oracle错误没有任何关联，它是由开发人员为特定情况所定义的例外.
问题：请编写一个pl/sql块，接收一个雇员的编号，并给该雇员工资增加1000元，如果该雇员不存在，请提示。
Sql代码
.--自定义例外
.create or replace procedure ex_test(spNo number)
.is
.begin
.--更新用户sal
.update emp set sal=sal+ where empno=spNo;
.end;
./ 运行，该过程被成功创建。
SQL> exec ex_test();
PL/SQL过程被成功完成 这里，编号为56是不存在的，刚才的报异常了，为什么现在不报异常呢？
因为刚才的是select语句 现在是update语句
怎么解决这个问题呢？ 修改代码，如下：
Sql代码
.--自定义例外
.create or replace procedure ex_test(spNo number)
.is
.--定义一个例外
.myex exception;
.begin
.--更新用户sal
.update emp set sal=sal+ where empno=spNo;
.--sql%notfound这是表示没有更新成功
.--raise myex;触发myex
.if sql%notfound then
.raise myex;
.end if;
.exception
.when myex then
.dbms_output.put_line('没有更新任何用户')；
.end;
./ 现在再测试一次：
SQL> exec ex_test();
没有更新任何用户