1 <?xml version=
"1.0" encoding=
"UTF-8"?>
3 Conversion of CCR to Level 3 CCD
5 Orginal Author: Ken Miller
7 ken.miller@solventus.coms
10 Richard Braman, EHR Doctors, Inc rbraman@ehrdoctors.com
11 George Lilly (WorldVistA glilly@glilly.net)
12 xxxx - Oroville Hospital
19 This program is free software: you can redistribute it and/or modify
20 it under the terms of the GNU General Public License as published by
21 the Free Software Foundation, either version 3 of the License, or
22 (at your option) any later version.
24 This program is distributed in the hope that it will be useful,
25 but WITHOUT ANY WARRANTY; without even the implied warranty of
26 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
27 GNU General Public License for more details.
29 You should have received a copy of the GNU General Public License
30 along with this program. If not, see http://www.gnu.org/licenses.
33 <xsl:stylesheet version=
"1.0" xmlns:
xsl=
"http://www.w3.org/1999/XSL/Transform" xmlns:
a=
"urn:astm-org:CCR" xmlns:
fo=
"http://www.w3.org/1999/XSL/Format">
34 <xsl:template name=
"address">
35 <xsl:param name=
"actorID"/>
36 <xsl:variable name=
"actor" select=
"/a:ContinuityOfCareRecord/a:Actors/a:Actor[a:ActorObjectID=$actorID]"/>
38 <table class=
"internal" cellpadding=
"0" cellspacing=
"0">
41 <xsl:for-each select=
"$actor/a:Address">
42 <xsl:if test=
"a:Type">
44 <xsl:value-of select=
"a:Type/a:Text"/>:
48 <xsl:if test=
"a:Line1">
49 <xsl:value-of select=
"a:Line1"/>
52 <xsl:if test=
"a:Line2">
53 <xsl:value-of select=
"a:Line2"/>
56 <xsl:if test=
"a:City">
57 <xsl:value-of select=
"a:City"/>,
<xsl:text xml:
space=
"preserve"> </xsl:text>
59 <xsl:value-of select=
"a:State"/>
60 <xsl:text xml:
space=
"preserve"> </xsl:text>
61 <xsl:value-of select=
"a:PostalCode"/>
66 <xsl:for-each select=
"a:Telephone">
67 <xsl:if test=
"a:Type/a:Text">
68 <xsl:value-of select=
"a:Type/a:Text"/> Phone:
<xsl:text xml:
space=
"preserve"> </xsl:text>
70 <xsl:value-of select=
"a:Value"/>
72 <xsl:for-each select=
"a:EMail">
73 Email:
<xsl:text xml:
space=
"preserve"> </xsl:text><xsl:value-of select=
"a:Value"/>