出于调试目的,我希望能够“TO_CHAR
”Oracle PL / SQL内存表。以下是我想做的简化示例:
DECLARE
TYPE T IS TABLE OF MY_TABLE%ROWTYPE INDEX BY PLS_INTEGER;
V T;
BEGIN
-- ..
-- Here, I'd like to dbms_output V's contents, which of course doesn't compile
FOR i IN V.FIRST .. V.LAST LOOP
dbms_output.put_line(V(i));
END LOOP;
-- I want to omit doing this:
FOR i IN V.FIRST .. V.LAST LOOP
dbms_output.put_line(V(i).ID || ',' || V(i).AMOUNT ...);
END LOOP;
END;
这可以简单地实现吗?我问的原因是因为我懒得一次又一次地编写这个调试代码,而且我想将它用于任何表类型。
答案 0 :(得分:6)
好的,抱歉这不完整,但要跟进@Lukas,这是我到目前为止所做的:
首先,我没有尝试创建任何数据/任何类型,而是尝试使用从游标中提取的XML ...很奇怪,但它是通用的:
CREATE OR REPLACE procedure printCur(in_cursor IN sys_refcursor) IS
begin
FOR c IN (SELECT ROWNUM rn,
t2.COLUMN_VALUE.getrootelement () NAME,
EXTRACTVALUE (t2.COLUMN_VALUE, 'node()') VALUE
FROM TABLE (XMLSEQUENCE (in_cursor)) t,
TABLE (XMLSEQUENCE (EXTRACT (COLUMN_VALUE, '/ROW/node()'))) t2
order by 1)
LOOP
DBMS_OUTPUT.put_line (c.NAME || ': ' || c.VALUE);
END LOOP;
exception
when others then raise;
end;
/
现在,要调用它,你需要一个游标,所以我尝试在pl / sql中转换为游标,如:
open v_cur for select * from table(cast(v_tab as tab_type));
但是根据v_tab的定义方式,这可能会也可能不会导致pl / sql强制转换问题(在嵌套表def中使用%rowtype似乎会产生问题)。
无论如何,你可以在此基础上进行构建或根据需要进行优化。 (并且可能使用xmltable ......)
希望有所帮助