Hi Ken,
Thank you for your generous help. I am not attached to my original code; I
want to learn how to do this the right way, so seeing how you approach it
will be very helpful. Thanks again.
Rick
-----Original Message-----
From: G. Ken Holman [mailto:g(_dot_)ken(_dot_)holman(_at_)gmail(_dot_)com] On
Behalf Of G. Ken
Holman
Sent: Saturday, August 10, 2013 10:23 PM
To: xsl-list(_at_)lists(_dot_)mulberrytech(_dot_)com;
xsl-list(_at_)lists(_dot_)mulberrytech(_dot_)com
Subject: Re: [xsl] Grouping within a group
At 2013-08-10 21:53 -0400, Rick Quatro wrote:
I have a (basically) flat XML file:
...
With some help from the group, I got a single level of nesting,
starting with each new category. However, I just found out that I need
some sub-grouping. My finished XML needs to look like this:
...
Here is my stylesheet. It gives me what I need, except for the nested
<TeachingPoint> and <SuggestedReading> elements. I am not sure exactly
how to approach this with XSLT 1.0.
I have a complete solution below, but I refactored your extensive use of
modes and of recursive apply-templates of siblings as I found them very
confusing and really unnecessary. In my code below you'll see I use no
modes or pushing siblings, and I act on the data in a top-down fashion
rather than a sideways fashion.
I hope you find this helpful. Perhaps you can just extract what I did for
teaching points and suggested readings if you really want to keep the
original code, but I suggest you compare the maintainability of the two
solutions.
. . . . . . . . Ken
t:\ftemp>type rick.xml
<?xml version="1.0" encoding="UTF-8"?>
<Cases>
<Story>
<Category>Category: Subcategory</Category>
<CaseTitle>Title One</CaseTitle>
<Institution>Institution One</Institution >
<Author>Authors One</Author>
<History>History One</History>
<DifferentialDiagnosis>Sick</DifferentialDiagnosis>
<DifferentialDiagnosis>Sicker</DifferentialDiagnosis>
<DifferentialDiagnosis>Sickest</DifferentialDiagnosis>
<TeachingPoint>Point1</TeachingPoint>
<TeachingPoint>Point2</TeachingPoint>
<SuggestedReading>Reading1</SuggestedReading>
<SuggestedReading>Reading2</SuggestedReading>
<Category>Category One: Subcategory</Category>
<CaseTitle>Title Two</CaseTitle>
<Institution>Title Two</Institution >
<Author>Author Two</Author>
<History>History Two</History>
<DifferentialDiagnosis>Sickly</DifferentialDiagnosis>
<DifferentialDiagnosis>Sicklier</DifferentialDiagnosis>
<DifferentialDiagnosis>Sickliest</DifferentialDiagnosis>
<TeachingPoint>Point1</TeachingPoint>
<TeachingPoint>Point2</TeachingPoint>
<SuggestedReading>Reading1</SuggestedReading>
<SuggestedReading>Reading2</SuggestedReading></Story>
</Cases>
t:\ftemp>call xslt rick.xml rick.xsl
<?xml version="1.0" encoding="utf-8"?>
<data>
<newRecord>
<Category>Category</Category>
<Subcategory>Subcategory</Subcategory>
<Case>1</Case>
<CaseTitle>Title One</CaseTitle>
<Institution>Institution One</Institution>
<Author>Authors One</Author>
<History>History One</History>
<DifferentialDiagnosis1>Sick</DifferentialDiagnosis1>
<DifferentialDiagnosis2>Sicker</DifferentialDiagnosis2>
<DifferentialDiagnosis3>Sickest</DifferentialDiagnosis3>
<TeachingPoints>
<TeachingPoint>Point1</TeachingPoint>
<TeachingPoint>Point2</TeachingPoint>
</TeachingPoints>
<SuggestedReadings>
<SuggestedReading>Reading1</SuggestedReading>
<SuggestedReading>Reading2</SuggestedReading>
</SuggestedReadings>
</newRecord>
<newRecord>
<Category>Category One</Category>
<Subcategory>Subcategory</Subcategory>
<Case>2</Case>
<CaseTitle>Title Two</CaseTitle>
<Institution>Title Two</Institution>
<Author>Author Two</Author>
<History>History Two</History>
<DifferentialDiagnosis1>Sickly</DifferentialDiagnosis1>
<DifferentialDiagnosis2>Sicklier</DifferentialDiagnosis2>
<DifferentialDiagnosis3>Sickliest</DifferentialDiagnosis3>
<TeachingPoints>
<TeachingPoint>Point1</TeachingPoint>
<TeachingPoint>Point2</TeachingPoint>
</TeachingPoints>
<SuggestedReadings>
<SuggestedReading>Reading1</SuggestedReading>
<SuggestedReading>Reading2</SuggestedReading>
</SuggestedReadings>
</newRecord>
</data>
t:\ftemp>type rick.xsl
<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0"
xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output indent="yes" />
<xsl:template match="Cases/Story">
<data>
<xsl:apply-templates select="Category" />
</data>
</xsl:template>
<xsl:key name="category" match="Story/*[not(self::Category)]"
use="generate-id(preceding-sibling::Category[1])"/>
<xsl:template match="Category">
<newRecord>
<Category><xsl:value-of select="substring-before(.,':
')"/></Category>
<Subcategory><xsl:value-of select="substring-after(.,':
')"/></Subcategory>
<Case><xsl:number count="Category"/></Case>
<xsl:apply-templates select="key('category',generate-id(.))"/>
</newRecord>
</xsl:template>
<xsl:template match="Story/*" priority="-1">
<xsl:copy-of select="." />
</xsl:template>
<xsl:template match="DifferentialDiagnosis">
<xsl:variable name="diagnosis">
<xsl:value-of select="1 +
count(preceding-sibling::DifferentialDiagnosis) -
count(preceding-sibling::Category[1]/preceding-sibling::DifferentialDiagnosi
s)"/>
</xsl:variable>
<xsl:element name="{concat(name(),$diagnosis)}"><xsl:value-of
select="."/></xsl:element>
</xsl:template>
<xsl:key name="teaching" match="TeachingPoint"
use="generate-id(preceding-sibling::Category[1])"/>
<xsl:template match="TeachingPoint">
<xsl:if test="not(preceding-sibling::*[1][self::TeachingPoint])">
<!--now at the first of a set of teaching points-->
<TeachingPoints>
<xsl:copy-of select="key('teaching',
generate-id(preceding-sibling::Category[1]))"/>
</TeachingPoints>
</xsl:if>
</xsl:template>
<xsl:key name="suggested" match="SuggestedReading"
use="generate-id(preceding-sibling::Category[1])"/>
<xsl:template match="SuggestedReading">
<xsl:if test="not(preceding-sibling::*[1][self::SuggestedReading])">
<!--now at the first of a set of suggested readings-->
<SuggestedReadings>
<xsl:copy-of select="key('suggested',
generate-id(preceding-sibling::Category[1]))"/>
</SuggestedReadings>
</xsl:if>
</xsl:template>
</xsl:stylesheet>
t:\ftemp>rem Done!
--
Public XSLT, XSL-FO, and UBL classes in the Netherlands Oct 2013 |
Public XSLT, XSL-FO, UBL and code list classes in Australia Oct 2013 |
Contact us for world-wide XML consulting and instructor-led training | Free
5-hour lecture: http://www.CraneSoftwrights.com/links/udemy.htm |
Crane Softwrights Ltd. http://www.CraneSoftwrights.com/s/ |
G. Ken Holman mailto:gkholman(_at_)CraneSoftwrights(_dot_)com
|
Google+ profile: https://plus.google.com/116832879756988317389/about |
Legal business disclaimers: http://www.CraneSoftwrights.com/legal |
--~------------------------------------------------------------------
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>
--~--
--~------------------------------------------------------------------
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>
--~--