How to export a data as an XML file from oracle data base?

Question

could u pls tell me the step by step procedure for following questions...? how to export a data as an XML file from oracle data base? is it possible? plz tell me itz urgent requirement...
Thankz in advance
Bala

Answer 1

SQL> SELECT * FROM v$version;
BANNER
Oracle DATABASE 11g Enterprise Edition Release 11.1.0.6.0 - Production
PL/SQL Release 11.1.0.6.0 - Production
CORE    11.1.0.6.0      Production
TNS FOR 32-bit Windows: Version 11.1.0.6.0 - Production
NLSRTL Version 11.1.0.6.0 - Production
5 rows selected.
SQL> CREATE OR REPLACE directory utldata AS 'C:\temp';
Directory created.
SQL> declare                                                                                                               
  2    doc  DBMS_XMLDOM.DOMDocument;                                                                                       
  3    xdata  XMLTYPE;                                                                                                     
  4                                                                                                                        
  5    CURSOR xmlcur IS                                                                                                    
  6    SELECT xmlelement("Employee",XMLAttributes('http://www.w3.org/2001/XMLSchema' AS "xmlns:xsi",                       
  7                                  'http://www.oracle.com/Employee.xsd' AS "xsi:nonamespaceSchemaLocation")              
  8                              ,xmlelement("EmployeeNumber",e.empno)                                                     
  9                              ,xmlelement("EmployeeName",e.ename)                                                       
10                              ,xmlelement("Department",xmlelement("DepartmentName",d.dname)                             
11                                                      ,xmlelement("Location",d.loc)                                     
12                                         )                                                                              
13                   )                                                                                                    
14     FROM   emp e                                                                                                       
15     ,      dept d                                                                                                      
16     WHERE  e.DEPTNO=d.DEPTNO;                                                                                          
17                                                                                                                        
18  begin                                                                                                                 
19    OPEN xmlcur;                                                                                                        
20    FETCH xmlcur INTO xdata;                                                                                            
21    CLOSE xmlcur;                                                                                                       
22    doc := DBMS_XMLDOM.NewDOMDocument(xdata);                                                                           
23    DBMS_XMLDOM.WRITETOFILE(doc, 'UTLDATA/marco.xml');                                                                  
24  end;                                                                                                                  
25  /                                                                                                                      
PL/SQL procedure successfully completed.
.