home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / XML Utilities / Professional Programmer XSL IDE / Xselerator25.msi / Data.Cab / F35598_scanl.xsl < prev    next >
Encoding:
Extensible Markup Language  |  2002-01-20  |  1.6 KB  |  46 lines
  1. <xsl:stylesheet version="1.0" 
  2. xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
  3. xmlns:saxon="http://icl.com/saxon"
  4. >
  5.   <xsl:template name="scanl">
  6.     <xsl:param name="pFun" select="/.."/>
  7.     <xsl:param name="pQ0" select="/.."/>
  8.     <xsl:param name="pList" select="/.."/>
  9.     <xsl:param name="pElName" select="'el'"/>
  10.     
  11.     <xsl:element name="{$pElName}">
  12.       <xsl:copy-of select="saxon:node-set($pQ0)/node()"/>
  13.     </xsl:element>
  14.     
  15.     <xsl:if test="$pList">
  16.       <xsl:variable name="vFun_Node">
  17.         <xsl:apply-templates select="$pFun">
  18.           <xsl:with-param name="pArg1" select="$pQ0"/>
  19.           <xsl:with-param name="pArg2" select="$pList[1]"/>
  20.         </xsl:apply-templates>
  21.       </xsl:variable>
  22.       
  23.       <xsl:call-template name="scanl">
  24.         <xsl:with-param name="pFun" select="$pFun"/>
  25.         <xsl:with-param name="pQ0" select="$vFun_Node" />
  26.         <xsl:with-param name="pList" select="$pList[position() > 1]"/>
  27.         <xsl:with-param name="pElName" select="$pElName"/>
  28.       </xsl:call-template>
  29.     </xsl:if>
  30.   </xsl:template>
  31.   
  32.   <xsl:template name="scanl1">
  33.     <xsl:param name="pFun" select="/.."/>
  34.     <xsl:param name="pList" select="/.."/>
  35.     <xsl:param name="pElName" select="'el'"/>
  36.     
  37.     <xsl:if test="$pList">
  38.       <xsl:call-template name="scanl">
  39.         <xsl:with-param name="pFun" select="$pFun"/>
  40.         <xsl:with-param name="pQ0" select="$pList[1]" />
  41.         <xsl:with-param name="pList" select="$pList[position() > 1]"/>
  42.         <xsl:with-param name="pElName" select="$pElName"/>
  43.       </xsl:call-template>
  44.     </xsl:if>
  45.   </xsl:template>
  46. </xsl:stylesheet>