oracle数据库中存在两个数据表t_xml和t_parse，前者是将xml文档中主要节点以字符串的形式存放到para_name字段中，后者用于将para
背景：
oracle数据库中存在两个数据表t_xml和t_parse，前者是将xml文档中主要节点以字符串的形式存放到para_name字段中，后者用于将para_name字段中xml字符串进行解析，将子节点提取出来进行存放。
例如：para_name中的xml字符串为name180%，则在t_parset数据表中将分别提取name1和80%进行存放。
t_xml的表结构为，t_parse的表结构为，存储的xml字符串结构为name180%。
存储过程：
create or replace procedure p_parse (id in varchar2) is
--创建xml解析器实例xmlparser.parser
xmlpar xmlparser.parser :=xmlparser.newparser;
--定义dom文档
xdoc xmldom.domdocument;
--定义item子节点数目变量
lenitme integer;
--定义节点列表，存放item节点们
itemnodes xmldom.domnodelist;
--定义节点列表，存放item子节点们
childnodes xmldom.domnodelist;
--定义节点，存放单个item节点
itemnode xmldom.domnode;
--定义属性变量，存放节点属性
itemarrmap xmldom.domnamednodemap;
--定义其他变量，存放子节点的值
name varchar(100);
value varchar(100);
--定义clob变量，存放xml字符串para_name
xmlstr clob;
begin
for cur in (select t.para_name ,t.id from t_xml t where t.id=id )
--从t_xml表中查询数据，id不是唯一标识，一个id可查出多条数据，故用loop循环
loop
--获取para_name中的xml字符串
xmlstr:=cur.para_name;
xmlpar :=xmlparser.newparser;
--解析xmlstr中xml字符串，并存放到xmlpar中
xmlparser.parseclob(xmlpar, xmlstr);
--将xmlpar中的数据转存到dom文档中
xdoc:=xmlparser.getdocument(xmlpar);
xmlparser.freeparser(xmlpar); --释放解析器实例
--获取所有item节点
itemnodes:=xmldom.getelementsbytagname(xdoc,'item');
--获取item节点的个数
lenitme :=xmldom.getlength(itemnodes);
--遍历所有的item节点
for i in 0..lenitme-1
loop
begin
--获取节点列表中的第i个item节点
itemnode:=xmldom.item(itemnodes,i);
--获取第i个item节点的所有子节点
childnodes:=xmldom.getchildnodes(itemnode);
--获取所有子节点的值
name:=xmldom.getnodevalue(xmldom.getfirstchild(xmldom.item(childnodes,0)));
value:=xmldom.getnodevalue(xmldom.getfirstchild(xmldom.item(childnodes,1)));
--将子节点的值name1和80%存放到t_parse表中
insert into t_parse values(id,name,value);
commit;
end;
end loop;
end loop;
--是否dom文档
xmldom.freedocument(xdoc);
--异常和错误处理
exception
when others then
dbms_output.put_line(sqlerrm);
end p_parse;
存储过程创建完毕之后，就可以进行测试了，，右击存储过程名称，在快捷菜单中点击test进行测试，测试时需要手动输入id值，然后一步一步进行测试即可。