Oracle显示游标的使用及游标for循环
下面给大家介绍在什么情况下用隐式游标,什么情况下用显示游标:
1.查询返回单行记录时→隐式游标;
2.查询返回多行记录并逐行进行处理时→显式游标
--显示游标属性
declare CURSOR cur_emp IS SELECT * FROM emp; row_emp cur_emp%ROWTYPE; BEGIN OPEN cur_emp; FETCH cur_emp INTO row_emp; WHILE cur_emp%FOUND LOOP dbms_output.put_line(row_emp.empno||'----'||row_emp.ename); FETCH cur_emp INTO row_emp; END LOOP; close cur_emp; END;
--使用显式游标修改数据(给所有的部门经理加薪1000)
DECLARE CURSOR emp_cur IS SELECT empno,ename,sal FROM emp WHERE job='MANAGER' FOR UPDATE; emp_row emp_cur%ROWTYPE; BEGIN OPEN emp_cur; LOOP FETCH emp_cur INTO emp_row; IF emp_cur%NOTFOUND THEN EXIT; ELSE UPDATE emp SET sal=sal+1000 WHERE CURRENT OF emp_cur; END IF; END LOOP; COMMIT; CLOSE emp_cur; END;
·注意:
1、如果游标打开之前或关闭之后,使用游标属性,Oracle会抛出一个INVALID_CURSOR错误(ORA-01001);
2、如果在第一次fetch后结果集是空的,%found=false,%NotFound=true,%ROWCOUNT=0;
3、如果使用了BULK COLLECT,那么%ROWCOUNT的值可能不是0或1,实际上他返回的是提取到相关集合的行数。
--游标for循环(给所有的部门经理减薪1000)
DECLARE CURSOR emp_cur IS SELECT empno,ename,sal FROM emp WHERE job='MANAGER' FOR UPDATE; BEGIN FOR emp_row IN emp_cur LOOP UPDATE emp SET sal=sal-1000 WHERE CURRENT OF emp_cur; END LOOP; COMMIT; END;
--我们可以看到游标FOR循环确实很好的简化了游标的开发,我们不在需要open、fetch和close语句,不在需要用%FOUND属性检测是否到最后一条记录,这一切Oracle隐式的帮我们完成了。
--给经理加薪5000,其他加薪1000
DECLARE CURSOR emp_cur IS SELECT * FROM emp FOR UPDATE; BEGIN FOR emp_row IN emp_cur LOOP IF emp_row.job='MANAGER' THEN UPDATE emp SET sal=sal+5000 WHERE CURRENT OF emp_cur; ELSE UPDATE emp SET sal=sal+1000 WHERE CURRENT OF emp_cur; END IF; END LOOP; END;
下面给大家介绍oracle游标cursor简单使用
总共介绍两种游标一种高效使用游标cursor 、sys_refcursor 、 bulk collect
1、cursor游标使用
/*简单cursor游标 *students表里面有name字段,你可以换做其他表测试 */ --定义 declare --定义游标并且赋值(is 不能和cursor分开使用) cursor stus_cur is select * from students; --定义rowtype cur_stu students%rowtype; /*开始执行*/ begin --开启游标 open stus_cur; --loop循环 loop --循环条件 exit when stus_cur%notfound; --游标值赋值到rowtype fetch stus_cur into cur_stu; --输出 dbms_output.put_line(cur_stu.name); --结束循环 end loop; --关闭游标 close stus_cur; /*结束执行*/ end;
执行结果
SQL> declare --定义游标并且赋值(is 不能和cursor分开使用) cursor stus_cur is select * from students; --定义rowtype cur_stu students%rowtype; /*开始执行*/ begin --开启游标 open stus_cur; --loop循环 loop --循环条件 exit when stus_cur%notfound; --游标值赋值到rowtype fetch stus_cur into cur_stu; --输出 dbms_output.put_line(cur_stu.name); --结束循环 end loop; --关闭游标 close stus_cur; /*结束执行*/ end; / 杨过 郭靖 付政委 刘自飞 江风 任我行 任盈盈 令狐冲 韦一笑 张无忌 朵儿 谢逊 小龙女 欧阳锋 欧阳锋
2、sys_refcursor游标使用
/* *游标名:sys_refcursor *特别注意赋值方式:for *与上重复内容不在叙述 */ declare stu_cur sys_refcursor; stuone students%rowtype; begin --这句赋值方式for open stu_cur for select * from students; --fetch赋值给rowtype fetch stu_cur into stuone; loop dbms_output.put_line(stuone.name||' '||stuone.hobby); fetch stu_cur into stuone; exit when stu_cur%notfound; end loop; end;
执行结果
SQL> /* *游标名:sys_refcursor *特别注意赋值方式:for *与上重复内容不在叙述 */ declare stu_cur sys_refcursor; stuone students%rowtype; begin --这句赋值方式for open stu_cur for select * from students; --fetch赋值给rowtype fetch stu_cur into stuone; loop dbms_output.put_line(stuone.name||' '||stuone.hobby); fetch stu_cur into stuone; exit when stu_cur%notfound; end loop; end; / 杨过 保护小龙女 郭靖 修炼降龙十八掌 付政委 看小人书 刘自飞 编程写代码 江风 编程写代码 任我行 修炼神功 任盈盈 游山玩水 令狐冲 行侠仗义 韦一笑 吸拾人雪 张无忌 修行 朵儿 洗浴 谢逊 毕生研究屠龙刀 小龙女 修炼玉女心经 欧阳锋 看小人书
补充一种循环条件
declare stu_cur sys_refcursor; stuone students%rowtype; begin open stu_cur for select * from students; fetch stu_cur into stuone; --特别注意循环条件的改变 --这个条件是发现了在循环 --与上一个notfound不同的 while stu_cur%found loop dbms_output.put_line(stuone.name||' '||stuone.hobby); fetch stu_cur into stuone; end loop; end;
--普通的fetch into
/*普通方式*/ declare cursor myemp_cur is select * from myemp; v_myemp myemp%rowtype; begin open myemp_cur; fetch myemp_cur into v_myemp; while myemp_cur%found loop dbms_output.put_line(v_myemp.ename); fetch myemp_cur into v_myemp; end loop; end;
--高效的bulk collect
/*高效bulk collect for*/ declare cursor myemp_cur is select * from myemp; type myemp_tab is table of myemp%rowtype; myemp_rd myemp_tab; begin open myemp_cur; loop fetch myemp_cur bulk collect into myemp_rd limit 20; for i in 1..myemp_rd.count loop dbms_output.put_line('姓名:'||myemp_rd(i).ename); end loop; exit when myemp_cur%notfound; end loop; end;
相关文章
Windows Server 2012 安装oracle11g(图文教程)
这篇文章主要介绍了Windows Server 2012 安装oracle11g(图文教程),文中通过示例代码介绍的非常详细,对大家的学习或者工作具有一定的参考学习价值,需要的朋友们下面随着小编来一起学习学习吧2019-12-12Navicat Premium连接Oracle数据库的2种方式
这篇文章主要给大家介绍了关于Navicat Premium连接Oracle数据库的2种方式,大家要使用Navicat Premium连接Oracle数据库,请按照以下步骤操作,需要的朋友可以参考下2024-01-01
最新评论