oracle光标的使用

以下plsql程序用的scott用户的dept,emp表。

1.光标的使用:

--查询并打印员工的姓名名和薪水
/*
光标属性:
  %found  %notfound

*/

set serveroutput on;

declare

  CURSOR C1 IS SELECT ENAME,SAL FROM EMP;
  PENAME EMP.ENAME%TYPE;
  PSAL EMP.SAL%TYPE;
 
BEGIN

  --打开光标
  OPEN C1;  
 
  LOOP
   
    --取一条记录,
    FETCH C1 INTO PENAME,PSAL ;
    EXIT WHEN C1%notfound;
    --1.循环什么时候退出  2.FETCH一定能取到数据吗
    DBMS_OUTPUT.PUT_LINE(PENAME||'的薪水是'||PSAL);
  END LOOP;
 
  --关闭光标
  CLOSE C1;

END;
/

2.给员工涨工资

--给员工涨工资, 总裁涨1000 ，经理涨800 ，其他 400

set serveroutput on;

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;
 --对应oracle ,默认的事务隔离级别是 read committed
 --事务的ACID :原子性 一致性 隔离性 持久性
  SYS.DBMS_OUTPUT.PUT_LINE('涨工资完成');
 
 

end;

/

3.操作带参数的光标

--查询某个部门中员工的姓名

set serveroutput on;

declare

  cursor cemp(dno number) is select ename from emp where deptno = dno;
  pename emp.ename%type;
 
begin
  open cemp(10);
  dbms_output.put_line('10号部门的人有:');
  loop
   
    fetch cemp into pename;
    exit when cemp%notfound;
    dbms_output.put_line(pename);
 
  end loop;
 
 
 
  close cemp;

end;

/

知识点出处: http://www.imooc.com/learn/360