11 PL/SQL编程基础B

create or replace procedure my_pro6(v_empno number) is
v_job emp.job%type;
begin
  select job into v_job from emp where empno=v_empno;
  if v_job='PRESIDENTt' then
    update emp set sal=sal+1000 where empno=v_empno;
  else if v_job='MANAGER' then
    update emp set sal=sal+500 where empno=v_empno;
  else
    update emp set sal=sal+200 where empno=v_empno;
  end if;
end;

create or replace procedure my_pro7(v_name varchar2,n number) is
v_idnumber number:=1;
begin
  loop
    insert into test values(v_idnumber,v_name);
    exit when v_idnumber=n;
    v_idnumber:=v_idnumber+1;
  end loop;
end;

create or replace procedure my_pro8(v_name varchar2,n number) is
v_idnumber number:=0;/***is...begin之间能赋初值，但不能给变量赋值，如：v_idnumber:=0***/
begin
  while v_idnumber=n loop
    insert into test values(v_idnumber,v_name);
    v_idnumber:=v_idnumber+1;
  end loop;
end;