oracle plsql 中的循环实例

 

--输入一个用户如果工资小于2000则加10%否则不加
create or replace procedure sp_pro6(spName varchar2) is
--定义
v_sal emp.sal%type;
begin
  select sal into v_sal from emp where ename=spName;
  if v_sal<200 then 
    update emp set sal=sal*1.1 where ename=spName;
    end if;
    end;
    
--输入一个名字,如果该员工补助不是0就在原来的基础上加100;
--如果补助为0就设成200
create or replace procedure sp_pro7(spName varchar2) is
v_comm emp.comm%type;
begin
  select comm into v_comm from emp where ename=spName;
  if v_comm<>0 then
    update emp set comm=comm+100 where ename=spName;
    else
      update emp set comm=comm+200 where ename=spName;
      end if;
      end;
          
--写一个过程输入一个员工编号 如果职位是president 工资+100
--manager +500 其它员工+200
create or replace procedure sp_pro8(spNo number) is
v_job emp.job%type;
begin
  select job into v_job from emp where empno=spNo;
  if v_job='PRESIDENT' then
    update emp set sal=sal+1000 where empno=spNo;
    elsif v_job='MANAGER' then
    update emp set sal=sal+500 where empno=spNo;
    else
      update emp set sal=sal+200 where empno=spNo;
      end if;
      end;
       
       
--for循环10次向users表插入10条记录
create table users1(userNo number,spName varchar2(40));
create or replace procedure sp_pro9(spName varchar2) is
--定义:=表示赋值
v_num number:=1;
begin
  loop
     insert into users1 values(v_num,spName);
     --判断是否要退出循环,v_num=10是给等于
     exit when v_num=10;
     --自增
     v_num:=v_num+1;
  end loop;
  end;
  --调用过程
  exec sp_pro9('种田的');


--while 循环编号从11开始
create or replace procedure sp_pro10(spName varchar2) is
--定义:=表示赋值
v_num number:=11;
begin
  while v_num<=20
  loop
    insert into users1 values(v_num,spName);
     --自增
     v_num:=v_num+1;
  end loop;
  end;
  --调用过程
  exec sp_pro10('我的父亲');