oracle存储过程解析xml实例

说明：入参xml_in 为xml字符串

          出参package.cursor为自定义包的类型

         变量ZH_KSDMTYPE为自定义表类型，该类型定义时需要实现类型体（type bodies）

CREATE OR REPLACE PROCEDURE ZH_PLATFORM_DEPART (xml_in IN CLOB, v_cur OUT package.cursor)
AS
  ---xml解析为doc
    xmlp xmlparser.parser;
    xml_doc xmldom.DOMDocument;
    doc_node xmldom.DOMNode;
    doc_nodelist xmldom.DOMNodeList;
    doc_len number;
    ---信息
    Info_Nodel xmldom.DOMNodeList;
    Info_No xmldom.DOMNode;
    Info_Len number;
    test_xml CLOB;
    ---子元素
    child_node xmldom.DOMNode;
    child_NodeList xmldom.DOMNodeList;
    child_len number;
    nnm xmldom.DOMNamedNodeMap;   --暂存row数据map
    v_coluValue varchar2(4000); ---最小节点值
    v_nodeName  varchar2(100);  --最小节点名称
    n_maxFid number(18); --日志ID
    Log_ygbh VARCHAR2(20);
    n_rollback number(2); --回滚点
    v_