Oracle 游标实例

最新推荐文章于 2024-09-14 19:55:29 发布

weixin_30444105

最新推荐文章于 2024-09-14 19:55:29 发布

阅读量79

点赞数

文章标签：数据库

原文链接：http://www.cnblogs.com/jiangguang/archive/2012/11/08/2761070.html

版权

declare
 
linenumA varchar2(30);
skdwA varchar2(30);
 
cursor getlines is
select linenum,skdw from zw_skdwqr 
where linenum in('2009121669117392') 
and qrbz=1 and lx=1 ;
 
begin
 
if getlines%isopen = false then
 
open getlines;
 
end if;
 
fetch getlines into linenumA,skdwA;
 
while getlines%found 
loop
delete from zw_skdwqr where linenum=linenumA and lx=1
and skdw=skdwA and qrbz=2;
commit;
fetch getlines into linenumA,skdwA;
end loop;
close getlines;
end;