以下操作在Oracle9i、10g版本成功

步骤一:创建存放XML文件的目录对象

SQL>createorreplacedirectoryexp_diras'/opt';/

–注意此目录要有oracle用户的写权限

步骤二:创建过程生成xml文件的主过程

SQL>createorreplaceproceduretable2xml(result inoutnocopyclob,filenameinvarchar2)isxmlstr varchar2(32767);line varchar2(2000);fhandle utl_file.file_type;beginfhandle := utl_file.fopen('EXP_DIR', filename,'w');xmlstr := dbms_lob.substr(result,32767);loop exitwhenxmlstrisnull; line := substr(xmlstr,1, instr(xmlstr, chr(10)) -1); dbms_output.put_line('| '|| line); utl_file.put_line(fhandle, line); xmlstr := substr(xmlstr, instr(xmlstr, chr(10)) +1);endloop;utl_file.fclose(fhandle);end;/

步骤三:调用此过程

declarequeryctx dbms_xmlquery.ctxType;result clob;beginqueryctx := dbms_xmlquery.newContext('select user_id,user_name from lq_xml_test');
--存放查询记录集的SQLresult := dbms_xmlquery.getXML(queryctx);table2xml(result,'table2xml.xml');dbms_xmlquery.closeContext(queryctx);end;/

【编辑推荐】

    详解Oracle的几种分页查询语句实战Oracle数据库备份与恢复Oracle DBA职责及日常工作分析