一、背景

在數(shù)據(jù)開發(fā)中，有時你需要合并兩個動態(tài)游標(biāo)sys_refcursor。

開發(fā)一個存儲過程PROC_A,這個過程業(yè)務(wù)邏輯相當(dāng)復(fù)雜，代碼篇幅較長。一段時間后要開發(fā)一個PROC_B,要用PROC_A同樣的邏輯,而且在這個過程中，還要循環(huán)調(diào)用PROC_A這個過程。擺在你面前的有兩個選擇。

• 打開PL/SQL,仔細(xì)的讀PROC_A這個過程，一直到明白了所有的邏輯，然后在自己的過程中重寫這個邏輯 。
• 直接復(fù)制PROC_A這個過的代碼過來，多寫極端。還是業(yè)界標(biāo)準(zhǔn)大法好
• 針對循環(huán)調(diào)用的，建立一個臨時表，循環(huán)插入數(shù)據(jù)到臨時表（但這里還有一個問題，每次返回的游標(biāo)可能列都不相同，建立臨時表就顯得復(fù)雜了）

好吧，這個新的過程是完成了，可是看上去，它更復(fù)雜了，代碼量更大了。完全不能接受，必須改改！
這時，已經(jīng)默默打開了ORACLE官方幫助文檔 https://docs.oracle.com/cd/B19306_01/index.htm，尋找一個可行的辦法，最終目標(biāo)標(biāo)是要解析，整合，合并 游標(biāo) sys_refcursor

二、思路

經(jīng)過搜索查詢，找到以下可行的方案

1. 序列化sys_refcursor為xml文檔,ORACLE對xml支持還不錯，12C已經(jīng)有JSON格式了
2. 使用ORACLE xml解析的方法，對序列化的xml文檔，添加、刪除、修改
3. 轉(zhuǎn)換為內(nèi)存表，通過游標(biāo)返回查詢的結(jié)果

為此你需要掌握的知識有

• 使用 Dbms_Lob 個package操作clob類型數(shù)據(jù)，因為解析后的游標(biāo)可能用varchar2是裝不下的，幫助地址 https://docs.oracle.com/cd/E11882_01/timesten.112/e21645/d_lob.htm#TTPLP600。
• 重點掌握Oracle類型xmltype如何使用 https://docs.oracle.com/cd/B19306_01/appdev.102/b14258/t_xml.htm#BABHCHHJ

三、實現(xiàn)

從上邊的幫助文檔中，知道xmltype的構(gòu)造函數(shù)中可以直接傳入游標(biāo)xmltype(refcursor)從而得到一個xmltype，調(diào)用xmltype的getClobVal方法，可得到序列化的結(jié)果，所以它的結(jié)構(gòu)是這樣的

<?xml version="1.0"?>
<ROWSET>
<ROW>
<COLUMNNAME1></COLUMNNAME1>
<COLUMNNAME2></COLUMNNAME2>
<...>...</...>
</ROW>
....
</ROWSET>

所以，如果需要合并兩個數(shù)據(jù)列相同游標(biāo)，只需要提取DOM中的ROW節(jié)點數(shù)據(jù)保存到定義的clob字段中去。

提取dom中片段，采用標(biāo)準(zhǔn)的xpath語法，/ROWSET/ROW這里提取ROW信息

Declare
x xmltype;
rowxml clob;
mergeXml clob;
ref_cur Sys_Refcursor;
ref_cur2 Sys_Refcursor;
ref_cur3 Sys_Refcursor;
begin
 open ref_cur for
 select F_USERNAME, F_USERCODE, F_USERID
 from Tb_System_User
 where F_userid = 1;
 Dbms_Lob.createtemporary(mergeXml, true);
 Dbms_Lob.writeappend(mergeXml, 8, '<ROWSET>');
 x := xmltype(ref_cur);
 Dbms_Output.put_line('=====完整的REFCURSOR結(jié)構(gòu)=====');
 Dbms_Output.put_line(x.getClobVal());
 Dbms_Output.put_line('=====只提取行信息=====');
 rowxml := x.extract('/ROWSET/ROW').getClobVal(0, 0);
 Dbms_Output.put_line(rowxml);
 Dbms_Lob.append(mergeXml, rowxml);ROWSET
 open ref_cur2 for
 select F_USERNAME, F_USERCODE, F_USERID
 from Tb_System_User
 where F_userid = 1000;
 x := xmltype(ref_cur2);
 rowxml := x.extract('/ROWSET/ROW').getClobVal(0, 0);
 Dbms_Lob.append(mergeXml, rowxml);
 Dbms_Lob.writeappend(mergeXml, 9, '</ROWSET>');
 Dbms_Output.put_line('=====合并后的信息=====');
 Dbms_Output.put_line(mergeXml);
end;

 執(zhí)行這段代碼輸出的結(jié)果是這樣的

=====完整的REFCURSOR結(jié)構(gòu)=====
<?xml version="1.0"?>
<ROWSET>
<ROW>
<F_USERNAME>系統(tǒng)管理員</F_USERNAME>
<F_USERCODE>admin</F_USERCODE>
<F_USERID>1</F_USERID>
</ROW>
</ROWSET>

=====只提取行信息=====
<ROW>
<F_USERNAME>系統(tǒng)管理員</F_USERNAME>
<F_USERCODE>admin</F_USERCODE>
<F_USERID>1</F_USERID>
</ROW>

=====合并后的信息=====
<ROWSET><ROW>
<F_USERNAME>系統(tǒng)管理員</F_USERNAME>
<F_USERCODE>admin</F_USERCODE>
<F_USERID>1</F_USERID>
</ROW>
<ROW>
<F_USERNAME>黃燕</F_USERNAME>
<F_USERCODE>HUANGYAN</F_USERCODE>
<F_USERID>1000</F_USERID>
</ROW>
</ROWSET>

 從上邊打印的結(jié)果看，我們已經(jīng)成功的將兩個游標(biāo) ref_cur和ref_cur2中我們需要的列信息合并到了一個xml文檔中。那么接下了，我們就需要通過解析這個xml并返回一個新的sys_refcursor,這里你有必要了解以下oracle xmltable的用法(https://docs.oracle.com/cd/B19306_01/server.102/b14200/functions228.htm)接上邊代碼

Dbms_Output.put_line(mergeXml);
open ref_cur3 for
 select *
 from xmltable('/ROWSET/ROW' Passing xmltype(mergeXml) Columns
  F_USERNAME varchar2(100) path 'F_USERNAME',
  F_USERCODE varchar2(100) path 'F_USERCODE');

簡單說明下xmltable構(gòu)造函數(shù)

• 聲明xpath，指明你需要解析的dom在哪里，比如從根找到ROW /ROWSET/ROW
• 指明你要查詢的xmltype
• 定義轉(zhuǎn)換列，比如把ROW下邊的F_USERNAME這個節(jié)點值，映射到游標(biāo)列F_USERNAME 這個列中

附：sys_refcursor 和 cursor 優(yōu)缺點比較

優(yōu)點比較

優(yōu)點一：sys_refcursor，可以在存儲過程中作為參數(shù)返回一個table格式的結(jié)構(gòu)集（我把他認(rèn)為是table類型，容易理解，其實是一個游標(biāo)集）， cursor 只能用在存儲過程，函數(shù)，包等的實現(xiàn)體中，不能做參數(shù)使用。

優(yōu)點二：sys_refcursor 這東西可以使用在包中做參數(shù)，進(jìn)行數(shù)據(jù)庫面向?qū)ο箝_放。哈哈。我喜歡。cursor就不能。

缺點比較：

缺點：sys_refcursor 不能用open，close ，fetch 進(jìn)行操作。不好學(xué)，難理解。

cursor可以用 open，close ，fetch操作，容易學(xué)，易懂

四、總結(jié)

xml作為早期數(shù)據(jù)傳輸，序列化和反序列化的文件格式，在oracle中也有良好的支持。所以，對于基于語言之上的知識，各個語言實現(xiàn)方式基本相識。基礎(chǔ)終究是重要的。

好了，以上就是這篇文章的全部內(nèi)容了，希望本文的內(nèi)容對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價值，如果有疑問大家可以留言交流，謝謝大家對腳本之家的支持。

最新評論