编程论坛's Archiver

xiaqin802 发表于 2006-5-31 14:16

[求助]oracle下怎么创建游标

可不可以给我例子看看,谢谢!!!!!!!1

zhoche2008 发表于 2006-6-12 22:21

--隐式游标<BR>set serveroutput on;<BR>begin<BR> update emp set sal=sal+100 where empno=111;<BR> if SQL%found then<BR>  dbms_output.put_line('编号7369的员工工资已更新');<BR> else<BR>  dbms_output.put_line('编号7369的员工未找到');<BR> end if;<BR>end;<BR>--显示游标<BR>declare<BR> vsal emp.sal%type;<BR> cursor x is select sal from emp where deptno=20; <BR>begin<BR> open x;<BR> loop<BR>  fetch x into vsal;<BR>  exit when x%notfound;<BR>  dbms_output.put_line(x%rowcount||' 部门编号为20的员工工资:'||vsal);<BR> end loop;<BR> close x;<BR>end;<BR>希望我发的这两个针对EMP表操作的游标示例对你有所帮助

maozhibin911 发表于 2006-6-20 18:57

very good ,,高手就是不一样,

钱的马甲 发表于 2006-6-21 18:06

还有游标参数呢,也请二楼说了吧。

yms123 发表于 2006-7-20 22:59

<P>--补充REF游标<BR>--显示游标<BR>declare<BR>vsal emp.sal%type;<BR>type x is ref cursor;<BR>xA x;<BR>begin<BR>open xA for 'select sal from emp where deptno=20';<BR>loop<BR>  fetch xA into vsal;<BR>  exit when xA%notfound;<BR>  dbms_output.put_line(xA%rowcount||' 部门编号为20的员工工资:'||vsal);<BR>end loop;<BR>close xA;<BR>end;<BR></P>

页: [1]

Powered by Discuz! Archiver 6.1.0  © 2001-2007 Comsenz Inc.