PLSQL NOTE--------XML generate

在PL/SQL中利用XML ,Oracle提供了几个组件，让开发人员能轻松地利用XML技术。这些组件包括：
1.XML分析程序。即用来分析、构造和验证XML文档。
2.XPath引擎。它是使用Xpath（XML标准的另一个元素）说明语法在内存中搜索XML文档的实用程序。SLT处理器。它在Oracle数据库中支持XSLT，允许您把XML文档转换成其他格式。
3.XML SQL实用程序。可以使用SQL产生XML文档，使您可以在Oracle数据库表格中轻松地插入基于XML的数据。
对于PL/SQL开发人员而言，XML分析程序是最重要的组件。通过它，您可以在Oracle数据库中分析、操纵和转换XML文档。XML分析程序由一套APIs（应用程序编程接口）构成。

===================================================================================================================================================================================

xml generate

生成Test.xml,内容如下

<staff content = "name and id">
    <member>
      <name>Arwen</name>
    <eno>123</eno>
  </member>
  <member>
      <name>Tom</name>
    <eno>456</eno>
  </member>
</staff>

1.生成xml的plsql code:

declare
    doc  XMLDOM.DOMDOCUMENT;
    doc_node  XMLDOM.DOMNODE;
    root_node  XMLDOM.DOMNODE;
    user_node XMLDOM.DOMNODE;
    item_node XMLDOM.DOMNODE;
    root_elmt XMLDOM.DOMELEMENT;
    user_elmt XMLDOM.DOMELEMENT;
    item_elmt XMLDOM.DOMELEMENT;
    item_text XMLDOM.DOMTEXT;
begin
   doc := XMLDOM.NEWDOMDOCUMENT;
   xmldom.setVersion(doc, ‘1.0‘);
   xmldom.setCharset(doc, ‘UTF-8‘);
   --根节点
   doc_node := XMLDOM.MAKENODE(doc);
   root_elmt := XMLDOM.CREATEELEMENT(doc,‘staff‘);
   XMLDOM.SETATTRIBUTE(root_elmt,‘content ‘,‘name and id‘);
   root_node:=XMLDOM.APPENDCHILD(doc_node, XMLDOM.MAKENODE(root_elmt));

   --节点1
   user_elmt := XMLDOM.CREATEELEMENT(doc,‘member‘);
   user_node :=XMLDOM.APPENDCHILD(root_node, XMLDOM.MAKENODE(user_elmt));

     item_elmt :=XMLDOM.CREATEELEMENT(doc,‘name‘);
     item_node :=XMLDOM.APPENDCHILD(user_node, XMLDOM.MAKENODE(item_elmt));
     item_text := XMLDOM.CREATETEXTNODE(doc,‘Arwen‘);
     item_node:=XMLDOM.APPENDCHILD(item_node, XMLDOM.MAKENODE(item_text));

     item_elmt :=XMLDOM.CREATEELEMENT(doc,‘eno‘);
     item_node :=XMLDOM.APPENDCHILD(user_node, XMLDOM.MAKENODE(item_elmt));
     item_text := XMLDOM.CREATETEXTNODE(doc,‘123‘);
     item_node:=XMLDOM.APPENDCHILD(item_node, XMLDOM.MAKENODE(item_text));

     --节点2
     user_elmt := XMLDOM.CREATEELEMENT(doc,‘member‘);
     user_node :=XMLDOM.APPENDCHILD(root_node, XMLDOM.MAKENODE(user_elmt));

     item_elmt :=XMLDOM.CREATEELEMENT(doc,‘name‘);
     item_node :=XMLDOM.APPENDCHILD(user_node, XMLDOM.MAKENODE(item_elmt));
     item_text := XMLDOM.CREATETEXTNODE(doc,‘tom‘);
     item_node:=XMLDOM.APPENDCHILD(item_node, XMLDOM.MAKENODE(item_text));

     item_elmt :=XMLDOM.CREATEELEMENT(doc,‘eno‘);
     item_node :=XMLDOM.APPENDCHILD(user_node, XMLDOM.MAKENODE(item_elmt));
     item_text := XMLDOM.CREATETEXTNODE(doc,‘456‘);
     item_node:=XMLDOM.APPENDCHILD(item_node, XMLDOM.MAKENODE(item_text));

     --写入操作系统文件中
     XMLDOM.WRITETOFILE(doc,‘DIR‘||‘\Test.xml‘);--注意必须先创建一个文件目录dir
     --可以通过语句 : create or replace directory dir as ‘d:\temp‘
        XMLDOM.FREEDOCUMENT(doc);
 end;

2.将xml encode 成clob 写入文件：

declare
    l_f utl_file.file_type;
    clobpart varchar2(2048);
    offset integer;
    l_xmltype XMLTYPE;
    cloblen integer;
    response_clob CLOB;
    resp_domdoc DBMS_XMLDOM.DOMDOCUMENT;
begin
    l_f  := utl_file.fopen(‘TEST_DIR‘,l_full_file_name,‘w‘);
    utl_file.put_line(l_f,‘<?xml version="1.0" encoding="utf-8" standalone="yes"?>‘||chr(13));
    resp_domdoc := SoapEncPrcnScnrPckgRead.encd_root_prcn_scnr_pckg_read(p_psp_resp_doc);
    l_xmltype := dbms_xmldom.getXmlType(resp_domdoc);
    dbms_xmldom.freeDocument(resp_domdoc);
    response_clob := l_xmltype.getClobVal;
    cloblen := LENGTH(response_clob);
    while offset < cloblen
    loop
        clobPart := dbms_lob.substr(response_clob, 1024, offset);
        utl_file.put(l_f, clobPart);
        offset := offset + 1024;
    end loop;
    utl_file.fflush(l_f);
    utl_file.fclose(l_f);
end;
/

3.结合使用XMLDOM和utl_file
  
 这样生成XML文件非常方便,能满足一般的应用了.但是XMLDOM有个缺点,就是一次性在内存中生成所有xml文件内容,然后写入到磁盘文件中.如果
xml文件太大,比如说有个table有几个G,想把它保存成xml文件.这样可能就会出现内存不足,生成文件失败.那该咋整呢?
    可能首先想到的是用UTL_FILE去生成文件.

里面的内容全部手动写成xml格式的,然后保存成xml后缀的文件.这样确实可行.但有个麻烦问题时如果一些节点内容含有xml的五个保留字符的话
(&,<,>,‘,"
分别是和号,小于号,大于号,单引号,双引号),我们如果以文本方式打开xml文件是看不到节点内容里面有这些保留字的,都转换成了对应
的&amp, &gt, &lt, &apos,
&quot.节点指定的是上面的Arwen或123,假如有名字(A&r<w>e‘n")则保存到xml文件中应该改成
(A&ampr&gtw&lte&aposn&quot).如果用xmldom会默认去转换,不用我们管了.如
果用UTL_FILE必须手动写代码去转换.
    假如有表staff(name varchar2(30), eno integer),里面有几个G的内容,要转换成开头讲的那种格式的xml文件。
    --生成xml的代码其中XML文件的头和尾用UTL_FILE直接写入文件中,节点内容用xmldom生成,然后写到clob变量中,再把clob变量值用utl_file写入到xml文件中。

declare
  STAFFINFO  UTL_FILE.FILE_TYPE;
  v_temp clob;
  cursor c_table_info is select name,eno from staff;
  v_name varchar2(30);
  v_eno integer;
  doc  XMLDOM.DOMDOCUMENT;
  doc_node XMLDOM.DOMNODE;
  root_node XMLDOM.DOMNODE;
  user_node XMLDOM.DOMNODE;
  item_node XMLDOM.DOMNODE;
  root_elmt XMLDOM.DOMELEMENT;
  user_elmt XMLDOM.DOMELEMENT;
  item_elmt XMLDOM.DOMELEMENT;
  item_text XMLDOM.DOMTEXT;
begin
   --xml header
    STAFFINFO :=utl_file.fopen_nchar(‘DIR‘,‘Test.xml‘,‘W‘,32767);--跟前面说的一样必须先创建一个directory才行
    UTL_FILE.PUT_LINE_NCHAR(STAFFINFO ,‘<staff content = "name and id">‘);
    UTL_FILE.FFLUSH(STAFFINFO );--直接写入到磁盘文件中,不会停留在内存中
    UTL_FILE.FCLOSE(STAFFINFO );
        open c_table_info;
        loop
            fetch c_table_info into v_name,v_eno;
            exit when c_table_info%notfound;
       --XML节点
          doc := XMLDOM.NEWDOMDOCUMENT;
        xmldom.setCharset(doc, ‘UTF-8‘);
      doc_node := XMLDOM.MAKENODE(doc);
      user_elmt := XMLDOM.CREATEELEMENT(doc,‘member‘);
           user_node :=XMLDOM.APPENDCHILD(doc_node, XMLDOM.MAKENODE(user_elmt));
      item_elmt :=XMLDOM.CREATEELEMENT(doc,‘name‘);
      item_node :=XMLDOM.APPENDCHILD(user_node, XMLDOM.MAKENODE(item_elmt));
      item_text := XMLDOM.CREATETEXTNODE(doc,v_name);
      item_node:=XMLDOM.APPENDCHILD(item_node, XMLDOM.MAKENODE(item_text));
      item_elmt :=XMLDOM.CREATEELEMENT(doc,‘eno‘);
      item_node :=XMLDOM.APPENDCHILD(user_node, XMLDOM.MAKENODE(item_elmt));
      item_text := XMLDOM.CREATETEXTNODE(doc,‘eno‘);
      item_node:=XMLDOM.APPENDCHILD(item_node, XMLDOM.MAKENODE(item_text));
      v_temp :=‘ ‘;
        --写入到临时变量v_temp中
      XMLDOM.WRITETOCLOB(doc,v_temp);
      STAFFINFO :=utl_file.fopen_nchar(‘DIR‘,‘Test.xml‘,‘A‘,32767);--以a模式会在文件后添加内容,用w会覆盖之前的内容
      UTL_FILE.PUT_LINE_NCHAR(STAFFINFO ,v_temp);
      UTL_FILE.FFLUSH(STAFFINFO );
      UTL_FILE.FCLOSE(STAFFINFO );
      XMLDOM.FREEDOCUMENT(doc);
    end loop;
    close c_table_info;
    --xml tail
    STAFFINFO :=utl_file.fopen_nchar(‘DIR‘,‘Test.xml‘,‘a‘,32767);
    UTL_FILE.PUT_LINE_NCHAR(STAFFINFO ,‘</staff>‘);
    UTL_FILE.FFLUSH(STAFFINFO );
    UTL_FILE.FCLOSE(STAFFINFO );
end;
时间： 2024-12-28 16:45:46

PLSQL NOTE--------XML generate的相关文章

&lt;!--把一个xml文档（&quot;note.xml&quot;）载入到xml解析器中--&gt;

<!--把一个xml文档("note.xml")载入到xml解析器中--> <html> <head> <scropt type = "text/javascript"> funcion parseXML() { try { xmlDoc = new ActiveXObject("Microsoft.XMLDOM"); }catch(e) { try { xmlDoc = document.impl

PLSQL NOTE --------like 与转义字符

SQL> create table test 2 (id integer, 3 name varchar2(90)); Table created. SQL> insert into test values(100,'aassdd'); 1 row created. SQL> insert into test values(120,null); 1 row created. SQL> insert into test values(110,'aa_see'); 1 row crea

PLSQL note

sql%count 最近一次sql执行的件数SUBSTR(string , int i) // i番目から最後までの文字列を切り取るSUBSTR(string , int i, int j) // i番目からj文二の文字列を切り取るNVL(para, string) // paraはnullであれば.string を戻るFLOOR( i) // iより小さく.一番大きい整数を戻るCEIL(i) // iより大きく.一番小さい整数を戻るROUND(i) // 四捨五入TO_CHAR() //sel

通过generate解析SQL日志生成xml进行SQL回放

查看Oracle redo日志来分析SQL执行记录 1)设置Oracle数据字典导出路径参数(可选) shutdown immediatealter system set UTL_FILE_DIR='/opt/oracle/utl' scope=spfile; execute dbms_logmnr_d.build(dictionary_filename => 'logminer_dict.ora', dictionary_location => '/opt/oracle/utl');star

XML generate-from cyber

PLSQL NOTE--------XML generate 在PL/SQL中利用XML ,Oracle提供了几个组件,让开发人员能轻松地利用XML技术.这些组件包括:1.XML分析程序.即用来分析.构造和验证XML文档.2.XPath引擎.它是使用Xpath(XML标准的另一个元素)说明语法在内存中搜索XML文档的实用程序.SLT处理器.它在Oracle数据库中支持XSLT,允许您把XML文档转换成其他格式.3.XML SQL实用程序.可以使用SQL产生XML文档,使您可以在Oracle数据库

php操作xml小结

<?php #php操作xml,SimpleXMLElement类小结 header('Content-type:text/html;charset=utf-8;'); //1.构造函数 /* $xmlstring=<<<XML <?xml version="1.0" encoding="utf-8"?> <note  xmlns:b="http://www.w3school.com.cn/example/&quo

XML操作

XML: XML 指可扩展标记语言 XML 被设计用来传输和存储数据. XML 被设计用来结构化.存储以及传输信息. xml文档展示: -----------------------------xml文档 <?xml version="1.0" encoding="ISO-8859-1"?> <note> <to>George</to> <from>John</from> <heading

Java Jaxb JavaBean与XML互转

1.Jaxb - Java Arcitecture for XML Binding 是业界的一个标准,是一项可以根据XML Schema产生Java类的技术. Jaxb2.0是Jdk1.6的组成部分.不需要在第三方Jar包的支持下即可完成Xml与JavaBean的相互转换. 2.重要概念: ·JAXBContext类,是应用的入口,用于管理XML/Java绑定信息. ·Marshaller接口,将Java对象序列化为XML数据. ·Unmarshaller接口,将XML数据反序列化为Java对象

疯狂XML学习笔记（7）-----------XML Schema

XML Schema 是基于 XML 的 DTD 替代者. XML Schema 可描述 XML 文档的结构. XML Schema 语言也可作为 XSD(XML Schema Definition)来引用. 您应当具备的基础知识 在继续学习之前,您需要对下面的知识有基本的了解: HTML / XHTML XML 以及 XML 命名空间 对 DTD 的基本了解 如果您希望首先学习这些项目,请在 首页 访问这些教程. 什么是 XML Schema? XML Schema 的作用是定义 XML 文档