Hi Christoph,
After having done mostly XSLT 2.0 lately, I thought it would be nice to
try solve some XSLT 1.0 problem.
This is what I can come up with.
Basically the same thing, only I implemented your eater template a bit
different (with recursion), allowing different row sizes.
Empty elements are added to the row when not enough data is provided. If
you need a more or less columns, you
Can pass param row-size to make-table template.
This stylesheet works with msxsl. No extension functions used.
To do: Some checks need to be added to check for empty strings when
entering a templated. But I leave that up to you.
<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform";
version="1.0">
<xsl:output encoding="UTF-8" method="xml" indent="yes"/>
<xsl:template match="/">
<xsl:apply-templates/>
</xsl:template>
<xsl:template match="root">
<xsl:apply-templates/>
</xsl:template>
<xsl:template match="transform">
<xsl:call-template name="make-table">
<xsl:with-param name="list" select="normalize-space(text())"/>
</xsl:call-template>
</xsl:template>
<xsl:template name="make-table">
<xsl:param name="list"/>
<xsl:param name="row-size" select="4"/>
<table>
<xsl:call-template name="output-rows">
<xsl:with-param name="list" select="$list"/>
<xsl:with-param name="row-size" select="$row-size"/>
</xsl:call-template>
</table>
</xsl:template>
<xsl:template name="output-rows">
<xsl:param name="list"/>
<xsl:param name="row-size"/>
<xsl:if test="string-length($list) > 0">
<xsl:variable name="elements-list">
<xsl:call-template name="get-elements">
<xsl:with-param name="list" select="$list"/>
<xsl:with-param name="count" select="$row-size"/>
</xsl:call-template>
</xsl:variable>
<xsl:comment><xsl:value-of select="$elements-list"/></xsl:comment>
<tr>
<xsl:call-template name="output-elements">
<xsl:with-param name="elements-list" select="$elements-list"/>
</xsl:call-template>
</tr>
<xsl:call-template name="output-rows">
<xsl:with-param name="list"
select="substring-after($list,$elements-list)"/>
<xsl:with-param name="row-size" select="$row-size"/>
</xsl:call-template>
</xsl:if>
</xsl:template>
<xsl:template name="output-elements">
<xsl:param name="elements-list"/>
<td>
<xsl:value-of select="substring-before($elements-list,' ')"/>
</td>
<xsl:if test="substring-after($elements-list,' ')!=''">
<xsl:call-template name="output-elements">
<xsl:with-param name="elements-list"
select="substring-after($elements-list,' ')"/>
</xsl:call-template>
</xsl:if>
</xsl:template>
<xsl:template name="get-elements">
<xsl:param name="list"/>
<xsl:param name="count"/>
<xsl:if test="$count > 0">
<xsl:variable name="elements-list">
<xsl:call-template name="get-elements">
<xsl:with-param name="list" select="substring-after($list,'
')"/>
<xsl:with-param name="count" select="$count - 1"/>
</xsl:call-template>
</xsl:variable>
<xsl:value-of select="concat(substring-before(concat($list,' '),'
'),' ',$elements-list)"/>
</xsl:if>
</xsl:template>
</xsl:stylesheet>
Regards,
Peter
-----Original Message-----
From: christoph(_dot_)naber(_at_)daimlerchrysler(_dot_)com
[mailto:christoph(_dot_)naber(_at_)daimlerchrysler(_dot_)com]
Sent: vrijdag 17 augustus 2007 11:19
To: xsl-list(_at_)lists(_dot_)mulberrytech(_dot_)com
Subject: [xsl] Split a string and fill it in a table (xslt1.0)
Hello list,
(XSLT 1.0, afaik MSXML (I dont use the stylesheets, they are
included in some visual basic programs)) I wonder about whats
a good way to split a string at whitespaces and fill it into a
table which has four rows and four columns. The string
contains a transformation-matrix and for better visualization
I have to put it into a html-table.
I know how to split strings, but how do I put them in rows
each with four cells? I cannot use extensionfunctions like
node-set which would IMHO make things much easier.
The example input XML:
<root>
<transform>12 34 1 5 54 2 6 24 34 34 6 23 67 234 74.45
2</transform> </root>
Desired output:
<table>
<tr>
<td>12</td>
<td>34</td>
<td>1</td>
<td>5</td>
</tr>
<tr>
<td>54</td>
<td>2</td>
<td>6</td>
<td>24</td>
</tr>
<tr>
<td>34</td>
<td>34</td>
<td>6</td>
<td>23</td>
</tr>
<tr>
<td>67</td>
<td>234</td>
<td>74.45</td>
<td>2</td>
</tr>
</table>
I have a working solution, but I like to know if there is a
better way to do this.
Here is my stylesheet:
<xsl:template match="transform">
<table>
<xsl:call-template name="row">
<xsl:with-param name="string"
select="text()" />
</xsl:call-template>
</table>
</xsl:template>
<!-- create a row and pass the string to the element template.
recursive call the row-template with the already used elements
chopped off as long as string contains whitespaces -->
<xsl:template name="row">
<xsl:param name="string" select="string('')" />
<xsl:variable name="shorter">
<xsl:call-template name="eater">
<xsl:with-param name="string"
select="$string" />
</xsl:call-template>
</xsl:variable>
<xsl:if test="contains($string, ' ')">
<tr>
<xsl:call-template name="element">
<xsl:with-param name="string"
select="$string" />
</xsl:call-template>
</tr>
<xsl:if test="contains($shorter, ' ')" >
<xsl:call-template name="row">
<xsl:with-param name="string"
select="$shorter" />
</xsl:call-template>
</xsl:if>
</xsl:if>
</xsl:template>
<!-- create 4 cells by recursive calls to the element-template
--> <xsl:template name="element">
<xsl:param name="string" select="string('')" />
<xsl:param name="count" select="0" />
<xsl:choose>
<!-- when 3 cells are done, output the last
element in the row and no recursive call -->
<xsl:when test="$count > 2 and contains($string, ' ')">
<td><xsl:value-of
select="substring-before($string, ' ')" /></td>
</xsl:when>
<!-- output the last element in the string
when $string contains no more whitespaces -->
<xsl:when test="not(contains($string, ' '))">
<td><xsl:value-of select="$string" /></td>
</xsl:when>
<!-- output the next element and recursive
call the element template with the shortened string -->
<xsl:otherwise>
<td><xsl:value-of
select="substring-before($string, ' ')" /></td>
<xsl:call-template name="element">
<xsl:with-param name="string"
select="substring-after($string, ' ')" />
<xsl:with-param name="count"
select="$count + 1" />
</xsl:call-template>
</xsl:otherwise>
</xsl:choose>
</xsl:template>
<!-- "eat" 4 elements at the beginning of the string -->
<xsl:template name="eater" >
<xsl:param name="string" select="string('')" />
<xsl:value-of
select="substring-after(substring-after(substring-after(substri
ng-after($string,
' '), ' '), ' '), ' ')" />
</xsl:template>
Greetings Christoph
If you are not the intended addressee, please inform us
immediately that you have received this e-mail by mistake and
delete it. We thank you for your support.
--~------------------------------------------------------------------
XSL-List info and archive: http://www.mulberrytech.com/xsl/xsl-list
To unsubscribe, go to: http://lists.mulberrytech.com/xsl-list/
or e-mail:
<mailto:xsl-list-unsubscribe(_at_)lists(_dot_)mulberrytech(_dot_)com>
--~--
This e-mail and any attachment is for authorised use by the intended
recipient(s) only. It may contain proprietary material, confidential
information and/or be subject to legal privilege. It should not be copied,
disclosed to, retained or used by, any other party. If you are not an intended
recipient then please promptly delete this e-mail and any attachment and all
copies and inform the sender. Thank you.
--~------------------------------------------------------------------
XSL-List info and archive: http://www.mulberrytech.com/xsl/xsl-list
To unsubscribe, go to: http://lists.mulberrytech.com/xsl-list/
or e-mail: <mailto:xsl-list-unsubscribe(_at_)lists(_dot_)mulberrytech(_dot_)com>
--~--