- CREATE OR REPLACE PROCEDURE TEST.put_query_xml (
- q_string IN VARCHAR2,
- RESULT OUT CLOB
- )
- IS
- qryctx DBMS_XMLGEN.ctxhandle;
- BEGIN
- qryctx := DBMS_XMLGEN.newcontext (q_string);
- DBMS_XMLGEN.setrowtag (qryctx, 'report');
- RESULT := DBMS_XMLGEN.getxml (qryctx);
- DBMS_XMLGEN.closecontext (qryctx);
- END;
- /
- DECLARE
q_string1 VARCHAR2 (2000);
RESULT CLOB;
BEGIN
q_string1 := 'select * from my_tables';
put_query_xml (q_string1, RESULT); - INSERT INTO temp_clob_tab
VALUES (RESULT); - COMMIT;
END; - SELECT *
FROM temp_clob_tab;
Oracle由SQL查询生成XML
最新推荐文章于 2023-06-23 14:33:02 发布