数据库
首页 > 数据库> > Oracle(光标、例外)

Oracle(光标、例外)

作者:互联网

1、光标

(1)作用:

当返回多条记录的时候我们就需要用到光标。

(2)属性:

光标是否打开:

%isopen

影响的行数:

%rowcount

找到:

%found

未找到:

%notfound

(3)查询员工的姓名和薪水:

declare
cursor cemp is select ename,sal from emp;--定义光标
pename emp.ename%type;
psal emp.sal%type;
begin
open cemp;--打开游标
loop
fetch cemp into pename,psal;--取一条记录
exit when cemp%notfound;--为空
SYS.DBMS_OUTPUT.PUT_LINE('员工'||pename||'的薪水为'||psal);
end loop;
close cemp;
end;
匿名块已完成
员工SMITH的薪水为800
员工ALLEN的薪水为1600
员工WARD的薪水为1250
员工JONES的薪水为2975
员工MARTIN的薪水为1250
员工BLAKE的薪水为2850
员工CLARK的薪水为2450
员工SCOTT的薪水为3000
员工KING的薪水为5000
员工TURNER的薪水为1500
员工ADAMS的薪水为1100
员工JAMES的薪水为950
员工FORD的薪水为3000
员工MILLER的薪水为1300

(4)给员工加工资:

rem PL/SQL Developer Test Script
set feedback off
set autoprint off
rem Execute PL/SQL Block
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;  --关闭光标
  commit;--提交
end;
/

(5)带有参数的光标:

查看部门的员工姓名:

declare 
   cursor cemp(dno number) is select ename from emp where deptno=dno;
   pename emp.ename%type;
begin
   open cemp(20);
   loop
        fetch cemp into pename;
        exit when cemp%notfound;
        dbms_output.put_line(pename);
   end loop;
   close cemp;
end;
/

2、例外

(1)系统定义的:

no_data_found(没有找到数据)
too_many_rows(select....into语句匹配多个行)
zero_divide(被零除)
value_error(算术或转换错误)
timeout_on_resource(在等待资源时发生超时,分布式数据库)
declare
   pnum number;
begin
  pnum := 1/0;
exception
  when zero_divide then dbms_output.put_line('1:0不能做分母');
  when value_error then dbms_output.put_line('算术或者转换错误');                      
  when others then dbms_output.put_line('其他例外');
end;
/

注意:在Oracle中要处理掉所有的例外,如果将例外交给数据库将出错。

(2)自定义例外:

declare 
  cursor cemp  is select ename from emp where deptno=50;
  pename emp.ename%type;
  no_emp_found exception;
begin
  open cemp;
  fetch cemp into pename;
  if cemp%notfound then
    raise no_emp_found;--抛出例外
  end if;
  close cemp;
exception
  when no_emp_found then dbms_output.put_line('没有找到员工');
  when others then dbms_output.put_line('其他例外');
end;
/

 

标签:end,薪水,cemp,例外,Oracle,员工,光标,emp
来源: https://www.cnblogs.com/zhai1997/p/12383736.html