標籤:程式 實用 3.2 傳輸 比較 inner 傳遞 body for迴圈
1.預存程序結構
1.1 第一個預存程序
create or replace procedure proc1(para1 varchar2,para2 out varchar2,para3 in out varchar2) asv_name varchar2(20);begin v_name :=‘zhangsf‘; para3 := v_name;dbms_output.put_line(‘para3:‘||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( para1 varchar2, para2 out varchar2, para3 in out varchar2) as v_name varchar2(20);begin para1 := ‘aaa‘; para2 := ‘bbb‘; v_name :=‘zhangsf‘; para3 := v_name dbms_output.put_line(‘para3:‘||para3); null;end;
OUT 參數:作為輸出參數,需要注意,當一個參數被指定為OUT類型時,就算在調用預存程序之前對該參數進行了賦值,在預存程序中該參數的值仍然是null.
首先,我們要明白,我們無法在預存程序的定義中指定儲存參數的寬度,也就導致了我們無法在預存程序中控制傳入變數的寬度。這個寬度是完全由外部傳入時決定的。
我們再來看看OUT類型的參數的寬度。
create or replace procedure proc2(para1 varchar2,para2 out varchar2,para3 in out varchar2) asv_name varchar2(2);beginpara2 :=‘aaaaaaaaaaaaaaaaaaaa‘;end;--調用proc2var p1 varchar2(1);var p2 varchar2(1);var p3 varchar2(1);exec :p2 := ‘a‘;exec proc1(:p1,:p2,:p3);
在該過程中,p_para2被賦予了20個字元a.
而在外部的調用過程中,p2這個參數僅僅被定義為varchar2(1).
而把p2作為參數調用這個過程,卻並沒有報錯。而且它的真實值就是20個a
執行這個過程,仍然正確執行。
可見,對於IN參數,其寬度是由外部決定。
對於OUT 和IN OUT 參數,其寬度是由預存程序內部決定。
因此,在寫預存程序時,對參數的寬度進行說明是非常有必要的,最明智的方法就是參數的資料類型使用%type。這樣雙方就達成了一致。
1.3 參數的預設值
預存程序的參數可以設定預設值
create or replace procedure procdefault( p1 varchar2, p2 varchar2 default ‘mark‘) asbegin dbms_output.put_line(p2);end;
mark
可以通過default 關鍵字為預存程序的參數指定預設值。在對預存程序調用時,就可以省略預設值。
需要注意的是:預設值僅僅支援IN傳輸類型的參數。OUT 和 IN OUT不能指定預設值
對於有預設值的參數不是排在最後的情況。
create or replace procedure procdefault2( p1 varchar2 default ‘remark‘, p2 varchar2) asbegin dbms_output.put_line(p1);end;
第一個參數有預設值,第二個參數沒有。如果我們想使用第一個參數的預設值時
exec procdefault2(‘aa‘);
這樣是會報錯的。
那怎麼變呢?可以指定參數的值。
SQL> exec procdefault2(p2 =>‘aa‘);
remark
這樣就OK了,指定aa傳給參數p2
2. 預存程序內部塊
2.1 內部塊
我們知道了預存程序的結構,語句塊由begin開始,以end結束。這些塊是可以嵌套。在語句塊中可以嵌套任何以下的塊。
Declare .. beign ... 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表,不能儲存於資料庫中,元素的個數沒有限制,下標可以為負值。
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_tb1 where rownum = 1; cursor c_postype1 is select pos_type from pos_type_tb1 where rownum = v_rownum; cursor c_postype2(p_rownum number) is select pos_type from pos_type_tb1 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 post_type from pos_type_tb1 where rownum=1; fetch c_postype3 into v_postype; dbms_output.put_line(v_postype); close c_postype3end;
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_tb1 where rownum < 6;v_postype varchar2(20);v_description varchar2(50);beginopen c_postype;if c_postype%found then dbms_output.put_line(‘found true‘);elseif 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‘);elseif 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 loo;
我們知道了一個遊標開啟後,必須執行一次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_tb1 where 1=0;--絕壁為空白,報no_data_found的錯誤 dbms_output.put_line(v_postype);end;
處理這個有三個辦法
1. 直接加上異常處理。
create or replace procedure procexception(p varchar2) as v_postype varchar2(20);begin select pos_type into v_postype from pos_type_tb1 where 1=0;--絕壁為空白 dbms_output.put_line(v_postype);--解決辦法1:增加異常處理模組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 select pos_type into v_postype from pos_type_tb1 where 1=0;--絕壁為空白 dbms_output.put_line(v_postype);--其實吧,我覺得和上面那種差不多,原理一樣的呀,no zuo nod ieexception when no_data_found then v_postype := ‘‘; end; dbms_output.put_line(v_postype);end;
這是一種比較好的處理方式了。不會因為這個異常而引起程式中斷。
3.使用遊標
create or replace procedure proceexception(p varchar2) as v_postype varchar2(20); cursor c_postype is select pos_type from pos_type_tb1 where 1=0;beign open c_postype; fetch c_postype into v_postype; close c_postype; dbms_output.put_line(v_postype);end;
--個人覺得這樣先進行非空判斷會更好create or replace procedure proceexception(p varchar2) as v_postype varchar2(20); cursor c_postype is select pos_type from pos_type_tb1 where 1=0;beign if c_postype%found then open c_postype; fetch c_postype into v_postype; close c_postype; dbms_output.put_line(v_postype); end if;end;
這樣就完全的避免了no_data_found異常。完全交由程式員來進行控制了。
第二種情況是too_many_rows 異常的問題。
Too_many_rows 這個問題比起no_data_found要複雜一些。
給一個變數賦值時,但是查詢結果有多個記錄。
處理這種問題也有兩種情況:
1. 多條資料是可以接受的,也就是說從結果集中隨便取一個值就行。這種情況應該很極端了吧,如果出現這種情況,也說明了程式的嚴謹性存在問題。
2. 多條資料是不可以被接受的,在這種情況肯定是程式的邏輯出了問題,也說是說原來根本就不會想到它會產生多條記錄。
對於第一種情況,就必須採用遊標來處理,而對於第二種情況就必須使用內部塊來處理,重新拋出異常。
多條資料可以接受,隨便取一條,這個跟no_data_found的處理方式一樣,使用遊標。
我這裡僅說第二種情況,不可接受多條資料,但是不要忘了處理no_data_found哦。這就不能使用遊標了,必須使用內部塊。
create or replace proceduer procexception2(p varchar2) asv_postype varchar2(20);begin begin select pos_type into v_postype from pos_type_tb1 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類型匹配。這就是對象與關聯式資料庫的阻抗吧。資料庫的對象並不能夠完全轉換為程式設計語言的對象,還必須使用關聯式資料庫的處理方式
Oracle預存程序