Oracle Day 08 游标与例外的总结

1.游标的使用（cursor）

　　基本格式：

　　　　　　定义游标：  cursor 游标名 is select语句（查询要操作的数据）;

　　　　　　自定义参数：参数名1 对应表中的字段1；

　　　　　　　　　　　　参数名2 对应表中的字段2；

　　　　　　打开游标：  open 游标名;

　　　　　　　　　　　　　　loop（循环）

　　　　　　　　　　　　　　　　fetch ... into ...;   抓取一行到自定义变量里面

　　　　　　　　　　　　　　　　exit when ...%notfound;   退出循环的条件

　　　　　　　　　　　　　　　　具体操作...

　　　　　　　　　　　　　　end loop; 关闭循环

　　　　　　关闭游标：  close 游标名；

　　　　例：　　

declare
   cursor cemp is select job,sal from emp; ###定义了一个名称是cemp的游标，游标中的数据是select job,sal from emp;中查询出的数据　　　　
　　cjob emp.job%type;  ###定义变量cjob,对应emp表中的job字段
　　csal emp.sal%type;  ###定义变量csal,对应emp表中的sal字段
begin  
    open cemp;     ###打开游标 
        loop    ###循环
            fetch cemp into cjob,csal;    ###抓取游标中的一行数据赋值给变量cjob,csal
            exit when cemp%notfound;    ###退出条件：cemp%notfound表示游标没有抓取到数据了
            dbms_output.put_line('您的工作为' || cjob || '您的工资为' || csal);        ###具体操作：打印工作、工资
        end loop;    ###结束循环
    close cemp;        ###关闭游标
end;
/

 

　　　-- 游标的四个属性
　　　　　　　　1）. %isopen 判断游标是否打开
　　　　　　　　2）. %rowcount 影响的行
　　　　　　　　3）. %found 还有下一条数据
　　　　　　　　4）. %notfound 没有下一条数据

 　　　　　　例： --根据emp表员工的职位涨工资，总裁涨1000，经理涨800，其他涨400。

declare
    cursor cemp is select empno,job from emp;
    pempno emp.empno%type;
    pjob emp.job%type;
begin
    open cemp;
        loop
            fetch cemp into pempno,pjob;
            exit when cemp%notfound;
            if pjob ='PRESIDENT' then update emp set sal = sal + 1000 where empno = pempno;
            elsif pjob='MANAGER' then update emp set sal = sal + 800 where empno = pempno;
            else
                update emp set sal = sal + 400 where empno = pempno;
            end if;
        end loop;
    close cemp;
end;
 /

　　　　　　注意：elsif 的书写。

　　　-- 带参数的游标
　　　　　　例： -- 要查询emp表任意部门的员工信息。（10号部门）

declare
    cursor cemp(pdeptno number) is select empno,ename from emp where deptno = pdeptno;
    pempno emp.empno%type;
    pname emp.ename%type;
begin
    open cemp(10);    
        loop
            fetch cemp into pempno,pname;
            exit when cemp%notfound;
            dbms_output.put_line(pempno || '  ' || pname );
        end loop;
    close cemp;
end;
/

2.例外（exception）

　　　　例：

  1  declare
  2      pnum number := 0;
  3  begin
  4      pnum := 1/pnum; -- 会抛出一个叫zero_divide的异常
  5* end;
  6  /
declare
*
第 1 行出现错误: 
ORA-01476: 除数为 0
ORA-06512: 在 line 4 

　　自定义一个例外（异常）

  1  declare
  2      pnum number := 0;
  3  begin
  4      pnum := 1/pnum; -- 会跑出一个叫zero_divide的异常
  5  exception
  6      when zero_divide then dbms_output.put_line('不能被0除');
  7* end;
SQL> /
不能被0除

　　　　例： -- 查询50号部门的所有员工的姓名,如果没有查到数据抛出列外。

  1  declare
  2   cursor cemp is select ename from emp where deptno = 50;
  3   pname emp.ename%type;
  4   -- 自己定义异常
  5   not_emp_data exception;
  6  begin
  7   open cemp;
  8      fetch cemp into pname;
  9        if cemp%notfound then 
 10          dbms_output.put_line('11');
 11          raise not_emp_data;
 12    else
 13    loop
 14     exit when cemp%notfound;
 15     dbms_output.put_line(pname);
 16    end loop;
 17        end if;
 18   close cemp;
 19  exception
 20   when not_emp_data then dbms_output.put_line('没有找到50号部门的数据');
 21* end;
SQL> /
11                                                                                                                                                                                                      
没有找到50号部门的数据