一、背景

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

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

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

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

二、思路

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

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

為此你需要掌握的知識(shí)有

• 使用 Dbms_Lob 個(gè)package操作clob類型數(shù)據(jù)，因?yàn)榻馕龊蟮挠螛?biāo)可能用varchar2是裝不下的，幫助地址 https://docs.oracle.com/cd/E11882_01/timesten.112/e21645/d_lob.htm#TTPLP600。
• 重點(diǎn)掌握Oracle類型xmltype如何使用 https://docs.oracle.com/cd/B19306_01/appdev.102/b14258/t_xml.htm#BABHCHHJ

三、實(shí)現(xiàn)

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

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

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

提取dom中片段，采用標(biāo)準(zhǔn)的xpath語(yǔ)法，/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)成功的將兩個(gè)游標(biāo) ref_cur和ref_cur2中我們需要的列信息合并到了一個(gè)xml文檔中。那么接下了，我們就需要通過(guò)解析這個(gè)xml并返回一個(gè)新的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');

簡(jiǎn)單說(shuō)明下xmltable構(gòu)造函數(shù)

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

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

優(yōu)點(diǎn)比較

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

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

缺點(diǎn)比較：

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

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

四、總結(jié)

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

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