Group Dates by Year, Month and Day

    <Event date="2006-12-24" location="Hollywood, CA" description="Christmas Eve with the Stars"/>

    <Event date="2006-12-24" location="Westwood, KS" description="Homeless Christmas Feast"/>

    <Event date="2006-12-31" location="Atlantic Dance Hall, Walt Disney World, Orlando, FL" description="New Year's Eve Dance"/>

    <Event date="2006-12-31" location="Times Square, New York, NY" description="New Year Countdown"/>

    <Event date="2007-01-01" location="Pasadena, CA" description="Tournament of Roses Parade"/>

    <Event date="2007-01-01" location="Pasadena, CA" description="Rose Bowl Football Game"/>

    <Event date="2007-02-02" location="Gobbler's Knob, Punxsutawney, PA" description="Ground Hog Day Festival"/>

    <style>.indent {margin-left:20px;}</style>

    <div>Holiday Event Calendar:</div><br/>

    <xsl:apply-templates select="Event" mode="Year">

        <xsl:sort select="@date" data-type="text" order="ascending"/>

    </xsl:apply-templates>

    <xsl:if test="not(preceding-sibling::Event[substring(@date,1,4) = substring(current()/@date,1,4)])">

        <div><xsl:value-of select="substring(@date,1,4)"/></div>

        <div class="indent">

            <xsl:apply-templates select="../Event[substring(@date,1,4) = substring(current()/@date,1,4)]" mode="Month">

                <xsl:sort select="@date" data-type="text" order="ascending"/>

            </xsl:apply-templates>

        </div>

    </xsl:if>

    <xsl:if test="not(preceding-sibling::Event[substring(@date,1,7) = substring(current()/@date,1,7)])">

        <div>

            <xsl:call-template name="MonthName">

                <xsl:with-param name="MONTH" select="substring(@date,6,2)"/>

            </xsl:call-template>

        </div>

        <div class="indent">

            <xsl:apply-templates select="../Event[substring(@date,1,7) = substring(current()/@date,1,7)]" mode="Day">

                <xsl:sort select="@date" data-type="text" order="ascending"/>

            </xsl:apply-templates>

        </div>

    </xsl:if>

    <xsl:if test="not(preceding-sibling::Event[@date = current()/@date])">

        <div><xsl:value-of select="number(substring(@date,9,2))"/></div>

        <div class="indent">

            <xsl:apply-templates select="../Event[@date = current()/@date]" mode="Details">

                <xsl:sort select="@date" data-type="text" order="ascending"/>

            </xsl:apply-templates>

        </div>

    </xsl:if>

    <div><xsl:value-of select="concat(@description, ' (', @location, ')')"/></div>

    <xsl:param name="MONTH"/>

    <xsl:choose>

        <xsl:when test="$MONTH = '01'">January</xsl:when>

        <xsl:when test="$MONTH = '02'">February</xsl:when>

        <xsl:when test="$MONTH = '03'">March</xsl:when>

        <xsl:when test="$MONTH = '04'">April</xsl:when>

        <xsl:when test="$MONTH = '05'">May</xsl:when>

        <xsl:when test="$MONTH = '06'">June</xsl:when>

        <xsl:when test="$MONTH = '07'">July</xsl:when>

        <xsl:when test="$MONTH = '08'">August</xsl:when>

        <xsl:when test="$MONTH = '09'">September</xsl:when>

        <xsl:when test="$MONTH = '10'">October</xsl:when>

        <xsl:when test="$MONTH = '11'">November</xsl:when>

        <xsl:when test="$MONTH = '12'">December</xsl:when>

    </xsl:choose>