PL/SQL 05 儲存過程 procedure

--儲存過程(不帶引數)

create or replace procedure 儲存過程名
as
  變數、常量宣告;
begin
  程式碼;
end;

--儲存過程(帶輸入引數)

create or replace procedure 儲存過程名(引數1 型別,引數2 型別,...)   --可以設預設值，如low int:=1000
as
  變數、常量宣告;
begin
  程式碼;
end;

--儲存過程(帶輸出引數)

create or replace procedure 儲存過程名(引數1 out 型別,引數2 型別,...)   --如avgscore out stu.score%type
as
  變數、常量宣告;
begin
  程式碼;
end;

--儲存過程內部返回用 return;

--儲存過程和遊標配合使用

create or replace procedure  test1(j emp.job%type)
as
  cursor test
  is select empno,ename from emp where job=j;
  eno emp.empno%type;
  ena emp.ename%type;
begin
  open test;
  loop
    fetch test into eno,ena;
    exit when test%notfound;
     dbms_output.put_line(eno||' '||ena);
  end loop;
  close test;
end;

--例子 常量加字首v_  引數加字首p_ （不要和表欄位一樣，會出問題）
create or replace procedure
  pro_test(p_stuno varchar2)
as
  v_score number(3);
  cursor cur_test is
  select sco.score from score sco
  where sco.stuno=p_stuno;
begin
  open cur_test;
  loop
  fetch cur_test into v_score;
  exit when cur_test%notfound;
  dbms_output.put_line(p_stuno|| ' score is: '||v_score);
  end loop;
  close cur_test;
end;

--呼叫儲存過程
begin
  pro_test('stu001');
end;

 

 

來自 “ ITPUB部落格 ” ，連結：http://blog.itpub.net/27633655/viewspace-1080395/，如需轉載，請註明出處，否則將追究法律責任。