425: procedure xsl_transform_test(
426: p_result out nocopy varchar2,
427: p_xdkversion out nocopy varchar2)
428: is
429: v_parser_xml xmlparser.parser;
430: v_xml_node xmldom.domnode;
431: v_xmldoc xmldom.domdocument;
432: v_out clob;
433: v_doctype xmldom.domdocumenttype;
431: v_xmldoc xmldom.domdocument;
432: v_out clob;
433: v_doctype xmldom.domdocumenttype;
434: -- xsl
435: v_parser_xsl xmlparser.parser;
436: v_xmldoc_xsl xmldom.domdocument;
437: v_stylesheet xslprocessor.stylesheet;
438: v_processor xslprocessor.processor;
439: v_docfrag xmldom.domdocumentfragment;
456: l_xsl_clob := l_xsl;
457: p_xdkversion:= ecx_utils.xmlversion;
458: dbms_lob.createtemporary(v_out,false,dbms_lob.session);
459: -- parse and get ge DOMDocument from xml
460: v_parser_xml := xmlparser.newparser;
461: xmlparser.setvalidationmode(v_parser_xml, false);
462: xmlparser.parseclob(v_parser_xml,l_xml_clob);
463: --get document
464: v_xmldoc := xmlparser.getdocument(v_parser_xml);
457: p_xdkversion:= ecx_utils.xmlversion;
458: dbms_lob.createtemporary(v_out,false,dbms_lob.session);
459: -- parse and get ge DOMDocument from xml
460: v_parser_xml := xmlparser.newparser;
461: xmlparser.setvalidationmode(v_parser_xml, false);
462: xmlparser.parseclob(v_parser_xml,l_xml_clob);
463: --get document
464: v_xmldoc := xmlparser.getdocument(v_parser_xml);
465: --starting the transformation
458: dbms_lob.createtemporary(v_out,false,dbms_lob.session);
459: -- parse and get ge DOMDocument from xml
460: v_parser_xml := xmlparser.newparser;
461: xmlparser.setvalidationmode(v_parser_xml, false);
462: xmlparser.parseclob(v_parser_xml,l_xml_clob);
463: --get document
464: v_xmldoc := xmlparser.getdocument(v_parser_xml);
465: --starting the transformation
466: -- parse and get the DOMDocument from xsl
460: v_parser_xml := xmlparser.newparser;
461: xmlparser.setvalidationmode(v_parser_xml, false);
462: xmlparser.parseclob(v_parser_xml,l_xml_clob);
463: --get document
464: v_xmldoc := xmlparser.getdocument(v_parser_xml);
465: --starting the transformation
466: -- parse and get the DOMDocument from xsl
467: v_parser_xsl := xmlparser.newparser;
468: xmlparser.setpreservewhitespace(v_parser_xsl,true);
463: --get document
464: v_xmldoc := xmlparser.getdocument(v_parser_xml);
465: --starting the transformation
466: -- parse and get the DOMDocument from xsl
467: v_parser_xsl := xmlparser.newparser;
468: xmlparser.setpreservewhitespace(v_parser_xsl,true);
469: --xmlparser.parse(v_parser_xsl,dir||'/'||xslfile);
470: xmlparser.parseclob(v_parser_xsl,l_xsl_clob);
471: --get the DOMDocument from xsl
464: v_xmldoc := xmlparser.getdocument(v_parser_xml);
465: --starting the transformation
466: -- parse and get the DOMDocument from xsl
467: v_parser_xsl := xmlparser.newparser;
468: xmlparser.setpreservewhitespace(v_parser_xsl,true);
469: --xmlparser.parse(v_parser_xsl,dir||'/'||xslfile);
470: xmlparser.parseclob(v_parser_xsl,l_xsl_clob);
471: --get the DOMDocument from xsl
472: v_xmldoc_xsl := xmlparser.getdocument(v_parser_xsl);
465: --starting the transformation
466: -- parse and get the DOMDocument from xsl
467: v_parser_xsl := xmlparser.newparser;
468: xmlparser.setpreservewhitespace(v_parser_xsl,true);
469: --xmlparser.parse(v_parser_xsl,dir||'/'||xslfile);
470: xmlparser.parseclob(v_parser_xsl,l_xsl_clob);
471: --get the DOMDocument from xsl
472: v_xmldoc_xsl := xmlparser.getdocument(v_parser_xsl);
473: -- make stylesheet
466: -- parse and get the DOMDocument from xsl
467: v_parser_xsl := xmlparser.newparser;
468: xmlparser.setpreservewhitespace(v_parser_xsl,true);
469: --xmlparser.parse(v_parser_xsl,dir||'/'||xslfile);
470: xmlparser.parseclob(v_parser_xsl,l_xsl_clob);
471: --get the DOMDocument from xsl
472: v_xmldoc_xsl := xmlparser.getdocument(v_parser_xsl);
473: -- make stylesheet
474: v_stylesheet := xslprocessor.newstylesheet(v_xmldoc_xsl,NULL);
468: xmlparser.setpreservewhitespace(v_parser_xsl,true);
469: --xmlparser.parse(v_parser_xsl,dir||'/'||xslfile);
470: xmlparser.parseclob(v_parser_xsl,l_xsl_clob);
471: --get the DOMDocument from xsl
472: v_xmldoc_xsl := xmlparser.getdocument(v_parser_xsl);
473: -- make stylesheet
474: v_stylesheet := xslprocessor.newstylesheet(v_xmldoc_xsl,NULL);
475: -- process xsl
476: v_processor := xslprocessor.newprocessor;
484: -- free resources
485: xslprocessor.freestylesheet(v_stylesheet);
486: xslprocessor.freeprocessor(v_processor);
487: xmldom.freedocument(v_xmldoc_xsl);
488: xmlparser.freeparser(v_parser_xsl);
489: xmldom.freedocument(v_xmldoc);
490: xmlparser.freeparser(v_parser_xml);
491: dbms_lob.freetemporary(v_out);
492: --p_result:= 'TRUE';
486: xslprocessor.freeprocessor(v_processor);
487: xmldom.freedocument(v_xmldoc_xsl);
488: xmlparser.freeparser(v_parser_xsl);
489: xmldom.freedocument(v_xmldoc);
490: xmlparser.freeparser(v_parser_xml);
491: dbms_lob.freetemporary(v_out);
492: --p_result:= 'TRUE';
493: exception
494: when others then