xml与oralce的导入导出

直接在sql中运行:

 

insert:

declare
  2    l_sales_emp xmltype;
  3    l_ctx         dbms_xmlstore.ctxtype;
  4    l_rows       pls_integer;
  5  begin
  6    -- get all the sales employees into an xml document
  7    select xmlelement("ROWSET",
  8             xmlagg(
  9               xmlelement("ROW",
10                 xmlforest(e.empno,e.ename,e.job,e.mgr,
11                           e.hiredate,e.sal,e.comm,e.deptno)
12               )
13             )
14           )
15      into l_sales_emp
16      from emp e, dept d
17     where d.deptno = e.deptno
18       and d.dname='SALES';
19 
20     -- setup our dbms_xmlstore context
21     l_ctx := dbms_xmlstore.newcontext('SALES_EMP');
22     l_rows := dbms_xmlstore.insertxml(
23               L_ctx, l_sales_emp.getClobVal());
24
25   -- how many rows were inserted?
26   dbms_output.put_line(l_rows || ' rows inserted into SALES_EMP.');
27
28   -- clean up
29   dbms_xmlstore.closecontext(l_ctx);
30 end;

 

 

 

 

 

update:

 

 

declare
  2    l_sales_emp xmltype;
  3    l_ctx          dbms_xmlstore.ctxtype;
  4    l_rows        pls_integer;
  5  begin
  6    -- simulate the updates to make
  7    l_sales_emp := xmltype('<?xml version="1.0"?>
  8  <ROWSET>
  9    <ROW>
10      <EMPNO>7499</EMPNO><ENAME>ALLEN</ENAME><JOB>MANAGER</JOB>
<MGR>7698</MGR><SAL>2600</SAL>
11    </ROW>
12    <ROW>
13      <EMPNO>7521</EMPNO><ENAME>WARD</ENAME><JOB>MANAGER</JOB>
<MGR>7698</MGR><SAL>2250</SAL>
14    </ROW>
15  </ROWSET>');
16 
17    -- setup our dbms_xmlstore context
18    l_ctx := dbms_xmlstore.newcontext('SALES_EMP');
19 
20    -- setup the columns to be updated
21    dbms_xmlstore.clearupdatecolumnlist(l_ctx);
22    dbms_xmlstore.setupdatecolumn(l_ctx, 'ENAME');
23    dbms_xmlstore.setupdatecolumn(l_ctx, 'JOB');
24    dbms_xmlstore.setupdatecolumn(l_ctx, 'MGR');
25    dbms_xmlstore.setupdatecolumn(l_ctx, 'SAL');
26 
27    -- setup the key columns to update by
28    dbms_xmlstore.setkeycolumn(l_ctx, 'EMPNO');
29 
30    -- perform the update
31    l_rows := dbms_xmlstore.updatexml(l_ctx, l_sales_emp.getClobVal());
32 
33    -- how many rows were updated?
34    dbms_output.put_line(l_rows || ' rows updated in SALES_EMP.');
35 
36    -- clean up
37    dbms_xmlstore.closecontext(l_ctx);
38  end;

 

 

 

delete:

 

 

 

declare
  2    l_sales_emp xmltype;
  3    l_ctx        dbms_xmlstore.ctxtype;
  4    l_rows       pls_integer;
  5  begin
  6    -- simulate the updates to make
  7    l_sales_emp := xmltype('<?xml version="1.0"?>
  8  <ROWSET>
  9    <ROW>
10      <EMPNO>7499</EMPNO>
11    </ROW>
12    <ROW>
13      <EMPNO>7698</EMPNO>
14    </ROW>
15  </ROWSET>');
16 
17    -- setup our dbms_xmlstore context
18    l_ctx := dbms_xmlstore.newcontext('SALES_EMP');
19 
20    -- setup the key column to delete by
21    dbms_xmlstore.setkeycolumn(l_ctx, 'EMPNO');
22 
23    -- perform the delete
24    l_rows := dbms_xmlstore.deletexml(l_ctx, l_sales_emp.getClobVal());
25 
26    -- how many rows were deleted?
27    dbms_output.put_line(l_rows || ' rows deleted fm SALES_EMP.');
28 
29    -- clean up
30    dbms_xmlstore.closecontext(l_ctx);
31  end;

 

 

 

生成xml文件

 

 

 

 

 

SELECT xmlgen.getXml(
  'SELECT empno "EMP_NO"
        , ename "NAME"
        , deptno "DEPT_NO"
     FROM emp
    WHERE deptno = 10'
  , 0
  ) FROM dual;