ITPub博客

首页 > 数据库 > Oracle > 在存储过程中执行3种oracle循环语句

在存储过程中执行3种oracle循环语句

Oracle 作者:byk870521 时间:2010-09-26 01:50:15 0 删除 编辑

create or replace procedure pr_zhaozhenlong_loop

is
     i int;
begin
     i :=1;
     loop
         insert into tb_zhaozhenlong(rpt_date ,dept_id,item,qty) values(to_date('2007-01-01','yyyy-MM-dd'),'D'||i,'I'||i,round(i*100/3,3));
         exit when i =10;
         i :=i+1;
     end loop;
     --
     i :=1;
     while i<=5 loop
         insert into tb_zhaozhenlong(rpt_date ,dept_id,item,qty) values(to_date('2007-01-02','yyyy-MM-dd'),'D'||i,'I'||i,round(i*200/3,3));
         i :=i+1;
     end loop;
     --如果指定了reverse选项,则循环控制变量会自动减1,否则自动加1
     for j in reverse  1..10 loop
         --insert into tb_zhaozhenlong(rpt_date ,dept_id,item,qty) values(to_date('2007-01-03','yyyy-MM-dd'),'D'||j,'I'||j,round(j*300/3,3));
         insert all --first,不会被重复插入
         when i <> 2 then into tb_zhaozhenlong(rpt_date ,dept_id,item,qty)
         else into tb_temp_zhaozhenlong(rpt_date ,dept_id,item,qty)--如果两个表结构完全一样,则列举不用列名
         select to_date('2007-01-02','yyyy-MM-dd')as rpt_date,'D'||j as dept_id,'I'||j as item,round(j*300/3,3) as qty from dual;
     end loop;
     commit;

     --???????
     <>--??????
     for x in  1..10 loop
         <>
         for y in 1..100 loop
         i :=x*y;
         exit outer_zzl when i=500;
         exit when i =300;
         end loop inner_zzl;
         --<>
     end loop outer_zzl;
     --<>
end;
本篇文章来源于:开发学院 http://edu.codepub.com   原文链接:http://edu.codepub.com/2010/0108/19517.php

<!-- 正文结束 -->

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/23184812/viewspace-1117505/,如需转载,请注明出处,否则将追究法律责任。

上一篇: 没有了~
下一篇: 没有了~
请登录后发表评论 登录
全部评论

注册时间:2010-01-14