1declare 2 cursor ca is 3 select id_no, name from user where ym=201401; 4begin 5 for cb in ca loop 6 update path set ename=cb.name where id_no=cb.id_no; 7 end loop; 8 commit; 9end;
-------------
1declare 2 --游标结构 3 cursor ca is select * from emp where deptno = 10; 4 --游标变量 5 carec ca%rowtype; 6begin
-----------------
1declare 2 --游标结构 3 cursor ca is select * from emp where deptno = 10; 4 --游标变量 5 onerow ca%rowtype; 6begin 7 --打开游标 8 open ca; 9 loop 10 fetch ca into onerow; 11 exit when ca%notfound; 12 dbms_output.put_line(onerow.ename); 13 end loop; 14 close ca; 15end;
-------------
1declare 2 cursor ca(dno emp.deptno%type) is select * from emp where deptno = dno; 3 carec ca%rowtype; 4begin 5 for carec in ca(10) loop 6 dbms_output.put_line(carec.ename); 7 end loop; 8end;
--动态游标
1declare 2 --动态游标数据类型 3 type cur is ref cursor; 4 --游标结构变量 5 mycur cur; 6 --行变量 7 cdept dept%rowtype; 8 cemp emp%rowtype; 9begin 10 --动态游标绑定select * form dept; 11 open mycur for select * from dept; 12 loop 13 fetch mycur into cdept; 14 exit when mycur%notfound; 15 dbms_output.put_line(cdept.dname); 16 end loop; 17 dbms_output.put_line('--------------------------------'); 18 open mycur for select * from emp; 19 loop 20 fetch mycur into cemp; 21 exit when mycur%notfound; 22 dbms_output.put_line(cemp.ename); 23 end loop; 24 close mycur; 25end;
建议你百度.google吧