Dbms_xmlgen: write emp content to xml file

Question

Hi.
I have the following procedure to write the content of the emp table in xml to a file:
CREATE OR REPLACE PROCEDURE BSP_DBMSXMLGEN IS
v_ctx DBMS_XMLGen.ctxHandle;
v_file Utl_File.File_Type;
v_xml CLOB;
v_more BOOLEAN := TRUE;
l_exception varchar2(2000);
BEGIN
-- XML context erzeugen
v_ctx := DBMS_XMLGen.newContext('SELECT * from emp_big');
-- Root Element und Zeilentag setzen
DBMS_XMLGen.setRowsetTag(v_ctx, 'Emp');
DBMS_XMLGen.setRowTag(v_ctx, 'Zeile');
-- XML Dokument erzeugen
v_xml := DBMS_XMLGen.GetXML(v_ctx);
DBMS_XMLGen.closeContext(v_ctx);
-- Ausgabedatei erzeugen
v_file := Utl_File.FOpen('XML_DIR', 'BSP_DBMSXMLGEN.xml', 'w');
-- In Datei schreiben
WHILE v_more LOOP
Utl_File.Put(v_file, Substr(v_xml, 1, 32767));
IF Length(v_xml) > 32767 THEN
v_xml := Substr(v_xml, 32768);
ELSE
v_more := FALSE;
END IF;
END LOOP;
Utl_File.FClose(v_file);
EXCEPTION
when OTHERS then
l_exception := sqlerrm;
dbms_output.put_line('Error: ' || l_exception);
END;
The procedure works well with 14 emp rows. But after duplicating the rows a few times the procedure stops working...
insert into emp_big select * from emp_big;
commit;
select count(*) from emp_big;
COUNT(*)
960
exec bsp_dbmsxmlgen;
The file content:
<?xml version="1.0"?>
<Emp>
<Zeile>
<EMPNO>7369</EMPNO>
<ENAME>SMITH</ENAME>
<JOB>CLERK</JOB>
<MGR>7902</MGR>
<HIREDATE>17.12.80</HIREDATE>
<SAL>800</SAL>
<DEPTNO>20</DEPTNO>
</Zeile>
<Zeile>
<EMPNO>7499</EMPNO>
<E
The procedure stops writing to file in the middle of a table row...
Any ideas?
Thanks
Markus

Answer 1

Thanks, Marco, but I think I need to be more clear. The original XML data in the XMLType field looks like:
<?xml version="1.0" encoding="ISO-8859-1"?>
<metadata>
</metadata>where "metadata" is the root node of the entire file. What happens is when I run the script listed above, the name of the field being queried gets added as a root node, which I don't want. I did figure out how to omit the "ROW" and ROWSET" nodes from being placed in the resulting XML flat file. Using the same script, I replaced:
-- Root Element und Zeilentag setzen
DBMS_XMLGen.setRowsetTag( v_ctx, 'Emp' );
DBMS_XMLGen.setRowTag( v_ctx, 'Zeile' );with
-- Root Elements
DBMS_XMLGen.setRowsetTag( v_ctx, '' );
DBMS_XMLGen.setRowTag( v_ctx, '' );I simply removed "Emp" and "Zeile." By doing this, those nodes are omitted. I still can't figure out how to omit the "XML_DATA" node.