SQL> 
SQL> declare
  2   indoc       VARCHAR2(2000);
  3   xsldoc      VARCHAR2(2000);
  4   myParser    dbms_xmlparser.Parser;
  5   indomdoc    dbms_xmldom.domdocument;
  6   xsltdomdoc  dbms_xmldom.domdocument;
  7   xsl         dbms_xslprocessor.stylesheet;
  8   outdomdocf  dbms_xmldom.domdocumentfragment;
  9   outnode     dbms_xmldom.domnode;
 10   proc        dbms_xslprocessor.processor;
 11   buf         varchar2(2000);
 12  begin
 13     indoc      := '<emp><empno> 1</empno> <fname> robert </fname> <lname>
 14  smith</lname> <sal>1000</sal> <job> engineer </job> </emp>';
 15     xsldoc     :=
 16     '<?xml version="1.0"?>
 17      <xsl:stylesheet version="1.0"
 18  xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
 19        <xsl:output encoding="utf-8"/>
 20        <!-- alphabetizes an xml tree -->
 21        <xsl:template match="*">
 22          <xsl:copy>
 23           <xsl:apply-templates select="*|text()">
 24           <xsl:sort select="name(.)" data-type="text" order="ascending"/>
 25           </xsl:apply-templates>
 26          </xsl:copy>
 27        </xsl:template>
 28        <xsl:template match="text()">
 29          <xsl:value-of select="normalize-space(.)"/>
 30        </xsl:template>
 31      </xsl:stylesheet>';
 32  
 33     myParser := dbms_xmlparser.newParser;
 34     dbms_xmlparser.parseBuffer(myParser, indoc);
 35     indomdoc   := dbms_xmlparser.getDocument(myParser);
 36     dbms_xmlparser.parseBuffer(myParser, xsldoc);
 37     xsltdomdoc := dbms_xmlparser.getDocument(myParser);
 38     xsl        := dbms_xslprocessor.newstylesheet(xsltdomdoc, '');
 39     proc       := dbms_xslprocessor.newProcessor;
 40  
 41     --apply stylesheet to DOM document
 42     outdomdocf := dbms_xslprocessor.processxsl(proc, xsl, indomdoc);
 43     outnode    := dbms_xmldom.makenode(outdomdocf);
 44  -- PL/SQL DOM API for XMLType can be used here
 45     dbms_xmldom.writetobuffer(outnode, buf);
 46     dbms_output.put_line(buf);
 47  end;
 48  /
<emp>
  <empno>1</empno>
  <fname>robert</fname>
  <job>engineer</job>
         
<lname>smith</lname>
  <sal>1000</sal>
</emp>
                                  

PL/SQL procedure successfully completed.

SQL> 
SQL> spool off