oracle存儲過程常用技巧
我們在進行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> ?
Dao的寫法跟普通查詢一樣
public List queryPostype() { ?
?return this.getSqlMapClientTemplate().queryForList("pos_dayprocset.procPostype", null); ?
} ?
有幾點需要注意，這里不能使用索引表，而是嵌套表。
另外就是把嵌套表強制轉換為普通表。
