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