存儲過程常用技巧

我們在進行pl/sql編程時打交道最多的就是存儲過程了。存儲過程的結構是非常的簡單的，我們在這里除了學習存儲過程的基本結構外，還會學習編寫存儲過程時相關的一些實用的知識。如：游標的處理，異常的處理，集合的選擇等等?

1.存儲過程結構?
1.1 第一個存儲過程?

create?or?replace?procedure?proc1( ??
??p_para1?varchar2, ??
??p_para2?out?varchar2, ??
??p_para3?in?out?varchar2 ??
)as? ??
?v_name?varchar2(20); ??
begin ??
??v_name?:=?'張三豐'; ??
??p_para3?:=?v_name; ??
??dbms_output.put_line('p_para3:'||p_para3); ??
end;??

上面就是一個最簡單的存儲過程。一個存儲過程大體分為這么幾個部分:?
創建語句：create or replace procedure 存儲過程名?
如果沒有or replace語句，則僅僅是新建一個存儲過程。如果系統存在該存儲過程，則會報錯。Create or replace procedure 如果系統中沒有此存儲過程就新建一個，如果系統中有此存儲過程則把原來刪除掉，重新創建一個存儲過程。?
存儲過程名定義：包括存儲過程名和參數列表。參數名和參數類型。參數名不能重復，參數傳遞方式:IN, OUT, IN OUT?
IN 表示輸入參數，按值傳遞方式。?
OUT 表示輸出參數，可以理解為按引用傳遞方式。可以作為存儲過程的輸出結果，供外部調用者使用。?
IN OUT 即可作輸入參數，也可作輸出參數。?
參數的數據類型只需要指明類型名即可，不需要指定寬度。?
參數的寬度由外部調用者決定。?
過程可以有參數，也可以沒有參數?
變量聲明塊：緊跟著的as (is )關鍵字，可以理解為pl/sql的declare關鍵字，用于聲明變量。?
變量聲明塊用于聲明該存儲過程需要用到的變量，它的作用域為該存儲過程。另外這里聲明的變量必須指定寬度。遵循PL/SQL的變量聲明規范。?
過程語句塊：從begin 關鍵字開始為過程的語句塊。存儲過程的具體邏輯在這里來實現。?
異常處理塊：關鍵字為exception ，為處理語句產生的異常。該部分為可選?
結束塊：由end關鍵字結果。?

1.2 存儲過程的參數傳遞方式?
存儲過程的參數傳遞有三種方式:IN,OUT,IN OUT .?
IN 按值傳遞，并且它不允許在存儲過程中被重新賦值。如果存儲過程的參數沒有指定存參數傳遞類型，默認為IN?

create?or?replace?procedure?proc1( ??
??p_para1?varchar2, ??
??p_para2?out?varchar2, ??
??p_para3?in?out?varchar2 ??
)as? ??
?v_name?varchar2(20); ??
begin ??
??p_para1?:='aaa'; ??
??p_para2?:='bbb'; ??
??v_name?:=?'張三豐'; ??
??p_para3?:=?v_name; ??
??dbms_output.put_line('p_para3:'||p_para3); ??
??null; ??
end; ??
???? ??
Warning:?Procedure?created?with?compilation?errors ??
??
SQL>?show?error; ??
Errors?for?PROCEDURE?LIFEMAN.PROC1: ??
??
LINE/COL?ERROR ??
--------?---------------------------------------------------------------------- ??
8/3??????PLS-00363:?expression?'P_PARA1'?cannot?be?used?as?an?assignment?target ??
8/3??????PL/SQL:?Statement?ignored??

這一點與其它高級語言都不同。它相當于java在參數前面加上final關鍵字。?

OUT 參數：作為輸出參數，需要注意，當一個參數被指定為OUT類型時，就算在調用存儲過程之前對該參數進行了賦值，在存儲過程中該參數的值仍然是null.?

create?or?replace?procedure?proc1( ??
??p_para1?varchar2, ??
??p_para2?out?varchar2, ??
??p_para3?in?out?varchar2 ??
)as? ??
?v_name?varchar2(20); ??
begin ??
??v_name?:=?'張三豐'; ??
??p_para3?:=?v_name; ??
??dbms_output.put_line('p_para1:'||p_para1); ??
??dbms_output.put_line('p_para2:'||p_para2); ??
??dbms_output.put_line('p_para3:'||p_para3); ??
end; ??
??
SQL>?var?p1?varchar2(10); ??
SQL>?var?p2?varchar2(10); ??
SQL>?var?p3?varchar2(10); ??
SQL>?exec?:p1?:='aaaa'; ??
SQL>?exec?:p2?:='bbbb'; ??
SQL>?exec?:p3?:='cccc'; ??
SQL>?exec?proc1(:p1,:p2,:p3); ??
p_para1:aaaa ??
p_para2: ??
p_para3:張三豐 ??
SQL>?exec?dbms_output.put_line(:p2); ??
??
??
PL/SQL?procedure?successfully?completed ??
p2 ??
---------??

INOUT 是真正的按引用傳遞參數。即可作為傳入參數也可以作為傳出參數。?

1.3?存儲過程參數寬度 ??
create?or?replace?procedure?proc1( ??
??p_para1?varchar2, ??
??p_para2?out?varchar2, ??
??p_para3?in?out?varchar2 ??
)as? ??
?v_name?varchar2(2); ??
begin ??
??v_name?:=?p_para1; ??
end; ??
??
SQL>?var?p1?varchar2(10); ??
SQL>?var?p2?varchar2(20); ??
SQL>?var?p3?varchar2(30); ??
SQL>?exec?:p1?:='aaaaaa'; ??
SQL>?exec?proc1(:p1,:p2,:p3); ??
???? ??
???? ??
ORA-06502:?PL/SQL:?numeric?or?value?error:?character?string?buffer?too?small ??
ORA-06512:?at?"LIFEMAN.PROC1",?line?8??
ORA-06512:?at?line?1??

首先，我們要明白，我們無法在存儲過程的定義中指定存儲參數的寬度，也就導致了我們無法在存儲過程中控制傳入變量的寬度。這個寬度是完全由外部傳入時決定的。?
我們再來看看OUT類型的參數的寬度。?

create?or?replace?procedure?proc1( ??
??p_para1?varchar2, ??
??p_para2?out?varchar2, ??
??p_para3?in?out?varchar2 ??
)as? ??
?v_name?varchar2(2); ??
begin ??
??p_para2?:='aaaaaaaaaaaaaaaaaaaa'; ??
end; ??
SQL>?var?p1?varchar2(1); ??
SQL>?var?p2?varchar2(1); ??
SQL>?var?p3?varchar2(1); ??
SQL>?exec?:p2?:='a'; ??
SQL>?exec?proc1(:p1,:p2,:p3);??

在該過程中，p_para2被賦予了20個字符a.?
而在外部的調用過程中，p2這個參數僅僅被定義為varchar2(1).?
而把p2作為參數調用這個過程，卻并沒有報錯。而且它的真實值就是20個a?

SQL>?select?dump(:p2)?from?dual; ??
DUMP(:P2) ??
--------------------------------------------------------------------------- ??
Typ=1?Len=20:?97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97,97??
p2 ??
--------- ??
aaaaaaaaaaaaaaaaaaaa ??
???? ??
????再來看看IN?OUT參數的寬度 ??
create?or?replace?procedure?proc1( ??
??p_para1?varchar2, ??
??p_para2?out?varchar2, ??
??p_para3?in?out?varchar2 ??
)as? ??
?v_name?varchar2(2); ??
begin ??
??p_para3?:='aaaaaaaaaaaaaaaaaaaa'; ??
end; ??
??
SQL>?var?p1?varchar2(1); ??
SQL>?var?p2?varchar2(1); ??
SQL>?var?p3?varchar2(1); ??
SQL>?exec?proc1(:p1,:p2,:p3);??

執行這個過程，仍然正確執行。?

可見，對于IN參數，其寬度是由外部決定。?
對于OUT 和IN OUT 參數，其寬度是由存儲過程內部決定。?
因此，在寫存儲過程時，對參數的寬度進行說明是非常有必要的，最明智的方法就是參數的數據類型使用%type。這樣雙方就達成了一致。?

1.3 參數的默認值?
存儲過程的參數可以設置默認值?

create?or?replace?procedure?procdefault(p1?varchar2, ??
????????????????????????????????????????p2?varchar2?default?'mark') ??
as? ??
begin ??
??dbms_output.put_line(p2); ??
end; ??
??
SQL>?set?serveroutput?on; ??
SQL>?exec?procdefault('a');??

mark?
可以通過default 關鍵字為存儲過程的參數指定默認值。在對存儲過程調用時，就可以省略默認值。?
需要注意的是：默認值僅僅支持IN傳輸類型的參數。OUT 和 IN OUT不能指定默認值?

對于有默認值的參數不是排在最后的情況。?

create?or?replace?procedure?procdefault2(p1?varchar2?default?'remark', ??
????????????????????????????????????????p2?varchar2?) ??
as? ??
begin ??
??dbms_output.put_line(p1); ??
end;??

第一個參數有默認值，第二個參數沒有。如果我們想使用第一個參數的默認值時?
exec procdefault2('aa');?
這樣是會報錯的。?
那怎么變呢？可以指定參數的值。?

SQL>?exec?procdefault2(p2?=>'aa');??

remark?
這樣就OK了，指定aa傳給參數p2?

2. 存儲過程內部塊?
2.1 內部塊?
我們知道了存儲過程的結構，語句塊由begin開始，以end結束。這些塊是可以嵌套。在語句塊中可以嵌套任何以下的塊。?

Declare?…?begin?…?exception?…?end; ??
create?or?replace?procedure?innerBlock(p1?varchar2) ??
as? ??
??o1?varchar2(10)?:=?'out1'; ??
begin ??
??dbms_output.put_line(o1); ??
??declare? ??
????inner1?varchar2(20); ??
??begin ??
????inner1?:='inner1'; ??
????dbms_output.put_line(inner1); ??
??
????declare? ??
??????inner2?varchar2(20); ??
????begin ??
??????inner2?:=?'inner2'; ??
??????dbms_output.put_line(inner2); ??
????end; ??
??exception? ??
????when?others?then ??
??????null; ??
??end; ??
end;??

需要注意變量的作用域。?

3.存儲過程的常用技巧?
3.1 哪種集合??
我們在使用存儲過程的時候經常需要處理記錄集，也就是多條數據記錄。分為單列多行和多列多行，這些類型都可以稱為集合類型。我們在這里進行比較這些集合類型，以便于在編程時做出正確的選擇。?
索引表,也稱為pl/sql表，不能存儲于數據庫中，元素的個數沒有限制,下標可以為負值。?

type?t_table?is?table?of?varchar2(20)?index?by?binary_integer; ??
?v_student?t_table;??

varchar2(20)表示存放元素的數據類型，binary_integer表示元素下標的數據類型。?
嵌套表，索引表沒有 index by子句就是嵌套表，它可以存放于數據中，元素個數無限，下標從1開始，并且需要初始化?

type?t_nestTable?is?table?of?varchar2(20); ??
v_class?t_nestTable?;??

僅是這樣聲明是不能使用的，必須對嵌套表進行初始化，對嵌套表進行初始化可以使用它的構造函數?

v_class?:=t_nestTable('a','b','c');??

變長數組，變長數組與高級語言的數組類型非常相似，下標以1開始，元素個數有限。?

type?t_array?is?varray?(20)?of?varchar2(20);??

varray(20)就定義了變長數組的最大元素個數是20個?
變長數組與嵌套表一樣，也可以是數據表列的數據類型。?
同時，變長數組的使用也需要事先初始化。?

類型可存儲于數據庫元素個數是否需初始化初始下標值?
索引表否無限不需?
嵌套表可無限需 1?
可變數組可有限(自定義) 需 1?

由此可見，如果僅僅是在存儲過程中當作集合變量使用，索引表是最好的選擇。?

3.2 選用何種游標??
顯示游標分為：普通游標，參數化游標和游標變量三種。?
下面以一個過程來進行說明?

create?or?replace?procedure?proccursor(p?varchar2) ??
as? ??
v_rownum?number(10)?:=?1; ??
cursor?c_postype?is?select?pos_type?from?pos_type_tbl?where?rownum?=1; ??
cursor?c_postype1?is?select?pos_type?from?pos_type_tbl?where?rownum?=?v_rownum; ??
cursor?c_postype2(p_rownum?number)?is?select?pos_type?from?pos_type_tbl?where?rownum?=?p_rownum; ??
type?t_postype?is?ref?cursor?; ??
c_postype3?t_postype; ??
v_postype?varchar2(20); ??
begin ??
??open?c_postype; ??
??fetch?c_postype?into?v_postype; ??
??dbms_output.put_line(v_postype); ??
??close?c_postype; ??
??open?c_postype1; ??
??fetch?c_postype1?into?v_postype; ??
??dbms_output.put_line(v_postype); ??
??close?c_postype1; ??
??open?c_postype2(1); ??
??fetch?c_postype2?into?v_postype; ??
??dbms_output.put_line(v_postype); ??
??close?c_postype2; ??
??open?c_postype3?for?select?pos_type?from?pos_type_tbl?where?rownum?=1; ??
??fetch?c_postype3?into?v_postype; ??
??dbms_output.put_line(v_postype); ??
??close?c_postype3; ??
end;??

cursor c_postype is select pos_type from pos_type_tbl where rownum =1?
這一句是定義了一個最普通的游標，把整個查詢已經寫死,調用時不可以作任何改變。?
cursor c_postype1 is select pos_type from pos_type_tbl where rownum = v_rownum;?
這一句并沒有寫死，查詢參數由變量v_rownum來決定。需要注意的是v_rownum必須在這個游標定義之前聲明。?
cursor c_postype2(p_rownum number) is select pos_type from pos_type_tbl where rownum = p_rownum;?
這一條語句與第二條作用相似，都是可以為游標實現動態的查詢。但是它進一步的縮小了參數的作用域范圍。但是可讀性降低了不少。?
type t_postype is ref cursor ;?
c_postype3 t_postype;?
先定義了一個引用游標類型，然后再聲明了一個游標變量。?
open c_postype3 for select pos_type from pos_type_tbl where rownum =1;?
然后再用open for 來打開一個查詢。需要注意的是它可以多次使用,用來打開不同的查詢。?
從動態性來說，游標變量是最好用的，但是閱讀性也是最差的。?
注意，游標的定義只能用使關鍵字IS，它與AS不通用。?

3.3 游標循環最佳策略?
我們在進行PL/SQL編程時，經常需要循環讀取結果集的數據。進行逐行處理，這個過程就需要對游標進行循環。對游標進行循環的方法有多種，我們在此一一分析。?

create?or?replace?procedure?proccycle(p?varchar2) ??
as? ??
cursor?c_postype?is?select?pos_type,?description?from?pos_type_tbl?where?rownum?<?6; ??
v_postype?varchar2(20); ??
v_description?varchar2(50); ??
begin ??
open?c_postype; ??
??if?c_postype%found?then ??
????dbms_output.put_line('found?true'); ??
??elsif?c_postype%found?=?false?then ??
????dbms_output.put_line('found?false'); ??
??else??
????dbms_output.put_line('found?null'); ??
??end?if; ??
??loop ??
???fetch?c_postype?into?v_postype,v_description?; ??
???exit?when?c_postype%notfound; ??
???dbms_output.put_line('postype:'||v_postype||',description:'||v_description); ??
??end?loop; ??
??close?c_postype; ??
dbms_output.put_line('---loop?end---'); ??
??open?c_postype; ??
????fetch?c_postype?into?v_postype,v_description; ??
????while?c_postype%found?loop ??
??????dbms_output.put_line('postype:'||v_postype||',description:'||v_description); ??
??????fetch?c_postype?into?v_postype,v_description?; ??
????end?loop; ??
??
??close?c_postype; ??
dbms_output.put_line('---while?end---'); ??
??for?v_pos?in?c_postype?loop ??
????v_postype?:=?v_pos.pos_type; ??
????v_description?:=?v_pos.description; ??
????dbms_output.put_line('postype:'||v_postype||',description:'||v_description); ??
??end?loop; ??
??dbms_output.put_line('---for?end---'); ??
end;??

使用游標之前需要開打游標,open cursor，循環完后再關閉游標close cursor.?
這是使用游標應該慎記于心的法則。?
上面的過程演示了游標循環的三種方法。?
在討論循環方法之前，我們先看看%found和%notfound這些游標的屬性。?

open?c_postype; ??
?if?c_postype%found?then ??
???dbms_output.put_line('found?true'); ??
?elsif?c_postype%found?=?false?then ??
???dbms_output.put_line('found?false'); ??
?else??
???dbms_output.put_line('found?null'); ??
?end?if;??

在打開一個游標之后，馬上檢查它的%found或%notfound屬性，它得到的結果即不是true也不是false.而是null.必須執行一條fetch語句后，這些屬性才有值。?

第一種使用loop 循環?

loop ??
???fetch?c_postype?into?v_postype,v_description?; ??
???exit?when?c_postype%notfound; ??
???…… ??
end?loop??

這里需要注意，exit when語句一定要緊跟在fetch之后。必避免多余的數據處理。?
處理邏輯需要跟在exit when之后。這一點需要多加小心。?
循環結束后要記得關閉游標。?

第二種使用while循環。?

???fetch?c_postype?into?v_postype,v_description; ??
while?c_postype%found?loop ??
???…… ??
??????fetch?c_postype?into?v_postype,v_description?; ??
end?loop;??

我們知道了一個游標打開后，必須執行一次fetch語句，游標的屬性才會起作用。所以使用while 循環時，就需要在循環之前進行一次fetch動作。?
而且數據處理動作必須放在循環體內的fetch方法之前。循環體內的fetch方法要放在最后。否則就會多處理一次。這一點也要非常的小心。?
總之，使用while來循環處理游標是最復雜的方法。?

第三種 for循環?

for?v_pos?in?c_postype?loop ??
???v_postype?:=?v_pos.pos_type; ??
???v_description?:=?v_pos.description; ??
???… ??
?end?loop;??

可見for循環是比較簡單實用的方法。?
首先，它會自動open和close游標。解決了你忘記打開或關閉游標的煩惱。?
其它,自動定義了一個記錄類型及聲明該類型的變量，并自動fetch數據到這個變量中。?
我們需要注意v_pos 這個變量無需要在循環外進行聲明，無需要為其指定數據類型。?
它應該是一個記錄類型，具體的結構是由游標決定的。?
這個變量的作用域僅僅是在循環體內。?
把v_pos看作一個記錄變量就可以了，如果要獲得某一個值就像調用記錄一樣就可以了。?
如v_pos.pos_type?
由此可見，for循環是用來循環游標的最好方法。高效，簡潔，安全。?
但遺憾的是，常常見到的卻是第一種方法。所以從今之后得改變這個習慣了。?

3.4 select into不可乎視的問題?
我們知道在pl/sql中要想從數據表中向變量賦值，需要使用select into 子句。?
但是它會帶動來一些問題，如果查詢沒有記錄時，會拋出no_data_found異常。?
如果有多條記錄時，會拋出too_many_rows異常。?
這個是比較糟糕的。一旦拋出了異常，就會讓過程中斷。特別是no_data_found這種異常，沒有嚴重到要讓程序中斷的地步，可以完全交給由程序進行處理。?

create?or?replace?procedure?procexception(p?varchar2) ??
as? ??
??v_postype?varchar2(20); ??
begin ??
???select?pos_type?into?v_postype?from?pos_type_tbl?where?1=0; ??
????dbms_output.put_line(v_postype); ??
end; ??
??????

執行這個過程?

SQL>?exec?procexception('a'); ??
報錯 ??
ORA-01403:?no?data?found ??
ORA-06512:?at?"LIFEMAN.PROCEXCEPTION",?line?6??
ORA-06512:?at?line?1??

處理這個有三個辦法?
1．直接加上異常處理。?

create?or?replace?procedure?procexception(p?varchar2) ??
as? ??
??v_postype?varchar2(20); ??
?? ??
begin ??
???select?pos_type?into?v_postype?from?pos_type_tbl?where?1=0; ??
????dbms_output.put_line(v_postype); ??
exception? ??
??when?no_data_found?then ??
????dbms_output.put_line('沒找到數據'); ??
end;??

這樣做換湯不換藥，程序仍然被中斷。可能這樣不是我們所想要的。?
2. select into做為一個獨立的塊，在這個塊中進行異常處理?

create?or?replace?procedure?procexception(p?varchar2) ??
as? ??
??v_postype?varchar2(20); ??
?? ??
begin ??
??begin ??
???select?pos_type?into?v_postype?from?pos_type_tbl?where?1=0; ??
????dbms_output.put_line(v_postype); ??
?exception? ??
??when?no_data_found?then ??
????v_postype?:=?''; ??
??end; ??
??dbms_output.put_line(v_postype); ??
end;??

這是一種比較好的處理方式了。不會因為這個異常而引起程序中斷。?
3.使用游標?

create?or?replace?procedure?procexception(p?varchar2) ??
as? ??
??v_postype?varchar2(20); ??
??cursor?c_postype?is?select?pos_type??from?pos_type_tbl?where?1=0; ??
begin ??
??open?c_postype; ??
????fetch?c_postype?into?v_postype; ??
??close?c_postype; ??
??dbms_output.put_line(v_postype); ??
end;??

這樣就完全的避免了no_data_found異常。完全交由程序員來進行控制了。?

第二種情況是too_many_rows 異常的問題。?
Too_many_rows 這個問題比起no_data_found要復雜一些。?
給一個變量賦值時，但是查詢結果有多個記錄。?
處理這種問題也有兩種情況：?
1．多條數據是可以接受的，也就是說從結果集中隨便取一個值就行。這種情況應該很極端了吧，如果出現這種情況，也說明了程序的嚴謹性存在問題。?
2．多條數據是不可以被接受的，在這種情況肯定是程序的邏輯出了問題，也說是說原來根本就不會想到它會產生多條記錄。?
對于第一種情況，就必須采用游標來處理，而對于第二種情況就必須使用內部塊來處理，重新拋出異常。?
多條數據可以接受,隨便取一條，這個跟no_data_found的處理方式一樣，使用游標。?
我這里僅說第二種情況，不可接受多條數據，但是不要忘了處理no_data_found哦。這就不能使用游標了，必須使用內部塊。?

create?or?replace?procedure?procexception2(p?varchar2) ??
as? ??
??v_postype?varchar2(20); ??
? ??
begin ??
??begin ??
????select?pos_type?into?v_postype?from?pos_type_tbl?where?rownum?<?5; ??
??exception ??
????when?no_data_found?then ??
??????v_postype?:=null; ??
????when?too_many_rows?then ??
??????raise_application_error(-20000,'對v_postype賦值時，找到多條數據'); ??
??end; ??
?dbms_output.put_line(v_postype); ??
end;??

需要注意的是一定要加上對no_data_found的處理，對出現多條記錄的情況則繼續拋出異常，讓上一層來處理。?
總之對于select into的語句需要注意這兩種情況了。需要妥當處理啊。?

3.5 在存儲過程中返回結果集?
我們使用存儲過程都是返回值都是單一的，有時我們需要從過程中返回一個集合。即多條數據。這有幾種解決方案。比較簡單的做法是寫臨時表，但是這種做法不靈活。而且維護麻煩。我們可以使用嵌套表來實現.沒有一個集合類型能夠與java的jdbc類型匹配。這就是對象與關系數據庫的阻抗吧。數據庫的對象并不能夠完全轉換為編程語言的對象，還必須使用關系數據庫的處理方式。?

create?or?replace?package?procpkg?is ??
???type?refcursor?is?ref?cursor; ??
???procedure?procrefcursor(p?varchar2,?p_ref_postypeList??out?refcursor); ??
end?procpkg; ??
??
create?or?replace?package?body?procpkg?is ??
??procedure?procrefcursor(p?varchar2,?p_ref_postypeList?out??refcursor) ??
??is ??
????v_posTypeList?PosTypeTable; ??
??begin ??
????v_posTypeList?:=PosTypeTable();--初始化嵌套表 ??
????v_posTypeList.extend; ??
????v_posTypeList(1)?:=?PosType('A001','客戶資料變更'); ??
????v_posTypeList.extend; ??
????v_posTypeList(2)?:=?PosType('A002','團體資料變更'); ??
????v_posTypeList.extend; ??
????v_posTypeList(3)?:=?PosType('A003','受益人變更'); ??
????v_posTypeList.extend; ??
????v_posTypeList(4)?:=?PosType('A004','續期交費方式變更'); ??
????open?p_ref_postypeList?for??select?*?from?table(cast?(v_posTypeList?as?PosTypeTable)); ??
??end; ??
end?procpkg;??

在包頭中定義了一個游標變量,并把它作為存儲過程的參數類型。?
在存儲過程中定義了一個嵌套表變量，對數據寫進嵌套表中，然后把嵌套表進行類型轉換為table,游標變量從這個嵌套表中進行查詢。外部程序調用這個游標。?
所以這個過程需要定義兩個類型。?

create?or?replace?type?PosType?as?Object?( ??
??posType?varchar2(20), ??
??description?varchar2(50) ??
);??

create or replace type PosTypeTable is table of PosType;?
需要注意，這兩個類型不能定義在包頭中，必須單獨定義，這樣java層才能使用。?

在外部通過pl/sql來調用這個過程非常簡單。?

set?serveroutput?on; ??
declare? ??
??type?refcursor?is?ref?cursor; ??
??v_ref_postype?refcursor; ??
??v_postype?varchar2(20); ??
??v_desc?varchar2(50); ??
begin ??
??procpkg.procrefcursor('a',v_ref_postype); ??
??loop ??
????fetch??v_ref_postype?into?v_postype,v_desc; ??
????exit?when?v_ref_postype%notfound; ??
????dbms_output.put_line('posType:'||?v_postype?||?';description:'?||?v_desc); ??
??end?loop; ??
end;??

注意：對于游標變量，不能使用for循環來處理。因為for循環會隱式的執行open動作。而通過open for來打開的游標%isopen是為true的。也就是默認打開的。Open一個已經open的游標是錯誤的。所以不能使用for循環來處理游標變量。?

我們主要討論的是如何通過jdbc調用來處理這個輸出參數。?

conn?=?this.getDataSource().getConnection(); ??
CallableStatement?call?=?conn.prepareCall("{call?procpkg.procrefcursor(?,?)}"); ??
call.setString(1,?null); ??
call.registerOutParameter(2,?OracleTypes.CURSOR); ??
call.execute(); ??
ResultSet?rsResult?=?(ResultSet)?call.getObject(2); ??
while?(rsResult.next())?{ ??
??String?posType?=?rsResult.getString("posType"); ??
??String?description?=?rsResult.getString("description"); ??
??...... ??
}??

這就是jdbc的處理方法。?

Ibatis處理方法：?
1.參數配置?

<parameterMap?id="PosTypeMAP"?class="java.util.Map">? ??
?<parameter?property="p"?jdbcType="VARCHAR"?javaType="java.lang.String"?/>? ??
?<parameter?property="p_ref_postypeList"?jdbcType="ORACLECURSOR"?javaType="java.sql.ResultSet"?mode="OUT"?typeHandler="com.palic.elis.pos.dayprocset.integration.dao.impl.CursorHandlerCallBack"?/>? ??
</parameterMap> ??
??
2.調用過程 ??
??<procedure?id?="procrefcursor"?parameterMap?="PosTypeMAP"> ??
??????{call?procpkg.procrefcursor(?,?)} ??
??</procedure> ??
??
3.定義自己的處理器 ??
??public?class?CursorHandlerCallBack?implements?TypeHandler{ ??
????public?Object?getResult(CallableStatement?cs,?int?index)?throws?SQLException?{ ??
????????ResultSet?rs?=?(ResultSet)cs.getObject(index); ??
????????List?result?=?new?ArrayList(); ??
????????while(rs.next())?{ ??
????????????String?postype?=rs.getString(1); ??
????????????String?description?=?rs.getString(2); ??
????????????CodeTableItemDTO?posTypeItem?=?new?CodeTableItemDTO(); ??
????????????posTypeItem.setCode(postype); ??
????????????posTypeItem.setDescription(description); ??
????????????result.add(posTypeItem); ??
????????} ??
????????return?result; ??
????} ??
??
??
??
4.?dao方法 ??
????public?List?procPostype()?{ ??
????????String?p?=?""; ??
????????Map?para?=?new?HashMap(); ??
????????para.put("p",p); ??
????????para.put("p_ref_postypeList",null); ??
?????????this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procrefcursor",??para); ??
?????????return?(List)para.get("p_ref_postypeList"); ??
????}??

這個跟jdbc的方式非常的相似.?
我們使用的是ibatis的2.0版本，比較麻煩。?
如果是使用2.2以上版本就非常簡單的。?
因為可以在parameterMap中定義一個resultMap.這樣就無需要自己定義處理器了。?
可以從分析2.0和2.0的dtd文件知道。?

上面的兩種方式都是非常的復雜，如果僅僅是需要返回一個結果集，那就完全可以使用函數來實現了。?

create?or?replace?package?procpkg?is ??
???type?refcursor?is?ref?cursor; ??
???procedure?procrefcursor(p?varchar2,?p_ref_postypeList??out?refcursor); ??
???function?procpostype(p?varchar2)?return?PosTypeTable;? ??
end?procpkg; ??
??
create?or?replace?package?body?procpkg?is ??
??procedure?procrefcursor(p?varchar2,?p_ref_postypeList?out??refcursor) ??
??is ??
????v_posTypeList?PosTypeTable; ??
??begin ??
????v_posTypeList?:=PosTypeTable();--初始化嵌套表 ??
????v_posTypeList.extend; ??
????v_posTypeList(1)?:=?PosType('A001','客戶資料變更'); ??
????v_posTypeList.extend; ??
????v_posTypeList(2)?:=?PosType('A002','團體資料變更'); ??
????v_posTypeList.extend; ??
????v_posTypeList(3)?:=?PosType('A003','受益人變更'); ??
????v_posTypeList.extend; ??
????v_posTypeList(4)?:=?PosType('A004','續期交費方式變更'); ??
????open?p_ref_postypeList?for??select?*?from?table(cast?(v_posTypeList?as?PosTypeTable)); ??
??end; ??
??
??function?procpostype(p?varchar2)?return?PosTypeTable ??
??as ??
???v_posTypeList?PosTypeTable; ??
??begin ??
??????v_posTypeList?:=PosTypeTable();--初始化嵌套表 ??
????v_posTypeList.extend; ??
????v_posTypeList(1)?:=?PosType('A001','客戶資料變更'); ??
????v_posTypeList.extend; ??
????v_posTypeList(2)?:=?PosType('A002','團體資料變更'); ??
????v_posTypeList.extend; ??
????v_posTypeList(3)?:=?PosType('A003','受益人變更'); ??
????v_posTypeList.extend; ??
????v_posTypeList(4)?:=?PosType('A004','續期交費方式變更'); ??
????return??v_posTypeList; ??
??end; ??
end?procpkg;??

ibatis配置?

<resultMap?id="posTypeResultMap"?class="com.palic.elis.pos.common.dto.CodeTableItemDTO"> ??
???<result?property="code"?column="posType"/> ??
???<result?property="description"?column="description"/> ??
?</resultMap> ??
??
??<select?id="procPostype"?resultMap="posTypeResultMap"> ??
????select?*?from?table(cast?(procpkg.procpostype(#value#)?as?PosTypeTable)) ??
??</select>??