1. 背景
存储过程中使用oracleutl_http调用rest接口,并以JSON的方式传输数据.此需求下,业务和环境有如下限制:
业务已经通过sys_refcursor生成了业务数据,不希望重新编写存储过程
当前ORACLE版本为11G,不支持JSON操作
2. 思路
需要将游标转换为文本,有以下两个方法
使用游标生成XML,从XML转JSON,比较繁琐,如何生成XML,可参考ORACLE游标序列化
直接解析sys_refcursor,生成JSON数据,比较合理
第一种方法,适合接口为xml正文的接口,比如SOAP协议接口.若需要接口为json正文,还需要将XML转为JSON.需要掌握Oracle中的XML操作
第二种方法,直接转成JSON文本,需要借助DBMS_SQL解析游标数据
不管使用哪种方法,接口传输多为大文本,需要使用DBMS_LOB对文本进行文本操作
3. 实现
主要分为以下几个步骤
使用 DBMS_SQL.to_cursor_number 获取游标ID
使用 DBMS_SQL.DESCRIBE_COLUMNS 获取列数以及列信息
使用 DBMS_SQL.DEFINE_COLUMN 循环定义列类型
使用 DBMS_SQL.FETCH_ROWS 遍历数据
使用 DBMS_SQL.COLUMN_VALUE 获取每一列值
使用 DBMS_SQL.CLOSE_CURSOR 关闭游标
其中能获取到到列信息如下
-- author : herbert 公众号: 小满小慢 日期: 2025-11-11
type desc_rec is record (
col_type binary_integer := 0,
col_max_len binary_integer := 0,
col_name varchar2(32) := '',
col_name_len binary_integer := 0,
col_schema_name varchar2(32) := '',
col_schema_name_len binary_integer := 0,
col_precision binary_integer := 0,
col_scale binary_integer := 0,
col_charsetid binary_integer := 0,
col_charsetform binary_integer := 0,
col_null_ok boolean := TRUE);
具体测试代码如下
declare
v_cursor_id NUMBER;
v_col_count BINARY_INTEGER;
v_col_desc DBMS_SQL.DESC_TAB;
v_value VARCHAR2(4000);
v_row_data VARCHAR2(4000);
v_p_refcursor sys_refcursor;
BEGIN
open v_p_refcursor FOR
select '小游戏1' F_A, '地心侠士' F_B
from dual
union all
select '小游戏2', '地心侠士'
from dual;
v_cursor_id := DBMS_SQL.to_cursor_number(v_p_refcursor);
DBMS_SQL.DESCRIBE_COLUMNS(v_cursor_id, v_col_count, v_col_desc);
FOR i IN 1 .. v_col_count LOOP
DBMS_SQL.DEFINE_COLUMN(v_cursor_id, i, v_value, 4000);
END LOOP;
WHILE DBMS_SQL.FETCH_ROWS(v_cursor_id) > 0 LOOP
v_row_data := '';
FOR i IN 1 .. v_col_count LOOP
DBMS_SQL.COLUMN_VALUE(v_cursor_id, i, v_value);
v_row_data := v_row_data ||v_col_desc(i).col_name|| ': ' || v_value ;
END LOOP;
DBMS_OUTPUT.PUT_LINE(v_row_data);
END LOOP;
DBMS_SQL.CLOSE_CURSOR(v_cursor_id);
EXCEPTION
WHEN OTHERS THEN
IF DBMS_SQL.IS_OPEN(v_cursor_id) THEN
DBMS_SQL.CLOSE_CURSOR(v_cursor_id);
END IF;
RAISE;
END;
输出内容如下
F_A : 小游戏F_B : 地心侠士
F_A : 公众号F_B : 小满小慢
我们最终想要的JSON格式如下
[{
"F_A": "小游戏",
"F_B": "地心侠士"
}, {
"F_A": "公众号",
"F_B": "小满小慢"
}]
通过上边的示列代码简单修改就完全可以实现了.
