时间：2021-03-19 09:43:48 | 栏目：Oracle | 点击：次
一、背景
在数据开发中，有时你需要合并两个动态游标sys_refcursor。
开发一个存储过程PROC_A,这个过程业务逻辑相当复杂，代码篇幅较长。一段时间后要开发一个PROC_B,要用PROC_A同样的逻辑,而且在这个过程中，还要循环调用PROC_A这个过程。摆在你面前的有两个选择。
好吧，这个新的过程是完成了，可是看上去，它更复杂了，代码量更大了。完全不能接受，必须改改！
这时，已经默默打开了ORACLE官方帮助文档 https://docs.oracle.com/cd/B19306_01/index.htm，寻找一个可行的办法，最终目标标是要解析，整合，合并 游标 sys_refcursor
二、思路
经过搜索查询，找到以下可行的方案
为此你需要掌握的知识有
三、实现
从上边的帮助文档中，知道xmltype的构造函数中可以直接传入游标xmltype(refcursor)从而得到一个xmltype，调用xmltype的getClobVal方法，可得到序列化的结果，所以它的结构是这样的
<?xml version="1.0"?> <ROWSET> <ROW> <COLUMNNAME1></COLUMNNAME1> <COLUMNNAME2></COLUMNNAME2> <...>...</...> </ROW> .... </ROWSET>
所以，如果需要合并两个数据列相同游标，只需要提取DOM中的ROW节点数据保存到定义的clob字段中去。
提取dom中片段，采用标准的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结构=====');
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;
执行这段代码输出的结果是这样的
=====完整的REFCURSOR结构===== <?xml version="1.0"?> <ROWSET> <ROW> <F_USERNAME>系统管理员</F_USERNAME> <F_USERCODE>admin</F_USERCODE> <F_USERID>1</F_USERID> </ROW> </ROWSET> =====只提取行信息===== <ROW> <F_USERNAME>系统管理员</F_USERNAME> <F_USERCODE>admin</F_USERCODE> <F_USERID>1</F_USERID> </ROW> =====合并后的信息===== <ROWSET><ROW> <F_USERNAME>系统管理员</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>
从上边打印的结果看，我们已经成功的将两个游标 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构造函数
附：sys_refcursor 和 cursor 优缺点比较
优点比较
优点一：sys_refcursor，可以在存储过程中作为参数返回一个table格式的结构集（我把他认为是table类型，容易理解，其实是一个游标集）， cursor 只能用在存储过程，函数，包等的实现体中，不能做参数使用。
优点二：sys_refcursor 这东西可以使用在包中做参数，进行数据库面向对象开放。哈哈。我喜欢。cursor就不能。
缺点比较：
缺点：sys_refcursor 不能用open，close ，fetch 进行操作。不好学，难理解。
cursor可以用 open，close ，fetch操作，容易学，易懂
四、总结
xml作为早期数据传输，序列化和反序列化的文件格式，在oracle中也有良好的支持。所以，对于基于语言之上的知识，各个语言实现方式基本相识。基础终究是重要的。