Skip to content
Snippets Groups Projects
Commit 79b06164 authored by Martin de la Iglesia's avatar Martin de la Iglesia
Browse files

Upload New File

parent c17270d6
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 375 additions and 0 deletions
itinerar.xsl 0 → 100644
+ 375
− 0
View file @ 79b06164
<?xml version="1.0" encoding="UTF-8"?>
<!-- Dieses Stylesheet verknüpft Datums- und Ortsangaben aus der TEI/XML-Datei eines Reiseberichts und generiert daraus eine KML-Datei, die in den DARIAH Geo-Browser hochgeladen werden kann, um ein kartografisches Intinerar zu erzeugen (<https://hainhofer.hab.de/informationen-zur-edition/kartografische-itinerare>). -->
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:tei="http://www.tei-c.org/ns/1.0" xmlns:wgs84_pos="http://www.w3.org/2003/01/geo/wgs84_pos#" xmlns:xhtml="http://www.w3.org/1999/xhtml" xmlns:wdt="http://www.wikidata.org/prop/direct/" xmlns:foaf="http://xmlns.com/foaf/0.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:gn="http://www.geonames.org/ontology#" xmlns:geo="http://www.opengis.net/ont/geosparql#" xmlns:owl="http://www.w3.org/2002/07/owl#" xmlns:ps="http://www.wikidata.org/prop/statement/" exclude-result-prefixes="xs" version="2.0">
<xsl:variable name="transcrpath" select="'https://hainhofer.hab.de/reiseberichte/'"/>
<xsl:variable name="regpath" select="'https://hainhofer.hab.de/register/'"/>
<xsl:template match="/">
<xsl:variable name="title" select="tei:TEI/tei:teiHeader/tei:fileDesc/tei:titleStmt/tei:title"/>
<xsl:variable name="filename" select="replace(replace(replace(replace(lower-case($title),'ä','ae'),'ö','oe'),'ü','ue'),' ','')"/>
<xsl:result-document href="{$filename}.kml" method="xml" encoding="utf-8" indent="yes">
<kml xmlns="http://www.opengis.net/kml/2.2" xmlns:atom="http://www.w3.org/2005/Atom">
<xsl:apply-templates select="tei:TEI/tei:text//tei:date">
<xsl:with-param name="title" select="$title"/>
<xsl:with-param name="filename" select="$filename"/>
</xsl:apply-templates>
</kml>
</xsl:result-document>
</xsl:template>
<xsl:template match="tei:date">
<xsl:param name="title"/>
<xsl:param name="filename"/>
<xsl:choose>
<xsl:when test="following::tei:date">
<xsl:apply-templates select="following::tei:date/preceding::tei:rs[@role = 'present'][preceding::tei:date[1] = current()]">
<xsl:with-param name="title" select="$title"/>
<xsl:with-param name="filename" select="$filename"/>
</xsl:apply-templates>
</xsl:when>
<xsl:otherwise>
<xsl:apply-templates select="following::tei:rs[@role = 'present']">
<xsl:with-param name="title" select="$title"/>
<xsl:with-param name="filename" select="$filename"/>
</xsl:apply-templates>
</xsl:otherwise>
</xsl:choose>
</xsl:template>
<xsl:template match="tei:rs[(@type ne 'place') and (@type ne 'work')]"> </xsl:template>
<xsl:template name="insertDate">
<TimeStamp xmlns="http://www.opengis.net/kml/2.2">
<xsl:choose>
<xsl:when test="preceding::tei:date[1]/@notBefore-custom">
<xsl:choose>
<xsl:when test="preceding::tei:date[1]/@datingMethod = '#gregorian'">
<when>
<xsl:value-of select="preceding::tei:date[1]/@notBefore-custom"/>
</when>
</xsl:when>
<xsl:when test="preceding::tei:date[1]/@datingMethod = '#julian'">
<xsl:value-of select="number(substring(preceding::tei:date[1]/@notBefore-custom, 9, 2)) + 10"/>
</xsl:when>
</xsl:choose>
</xsl:when>
<xsl:when test="preceding::tei:date[1]/@when-custom and preceding::tei:date[1]/@datingMethod = '#gregorian'">
<when>
<xsl:value-of select="preceding::tei:date[1]/@when-custom"/>
</when>
</xsl:when>
</xsl:choose>
</TimeStamp>
</xsl:template>
<xsl:template name="insertDateDesc">
<xsl:choose>
<xsl:when test="preceding::tei:date[1]/@notBefore-custom">
<xsl:choose>
<xsl:when test="preceding::tei:date[1]/@datingMethod = '#gregorian'">
<xsl:value-of select="format-date(preceding::tei:date[1]/@notBefore-custom,'[D]. [MNn] [Y]','de',(),())"/>
</xsl:when>
<xsl:when test="preceding::tei:date[1]/@datingMethod = '#julian'">
<xsl:value-of select="number(substring(preceding::tei:date[1]/@notBefore-custom, 9, 2)) + 10"/>
</xsl:when>
</xsl:choose>
</xsl:when>
<xsl:when test="preceding::tei:date[1]/@when-custom and preceding::tei:date[1]/@datingMethod = '#gregorian'">
<xsl:value-of select="format-date(preceding::tei:date[1]/@when-custom,'[D]. [MNn] [Y]','de',(),())"/>
</xsl:when>
</xsl:choose>
</xsl:template>
<xsl:template name="description">
<xsl:param name="title"/>
<xsl:param name="filename"/>
<xsl:param name="fol"/>
<xsl:param name="placeid"/>
<xsl:param name="workid"/>
<description xmlns="http://www.opengis.net/kml/2.2">
<xsl:call-template name="insertDateDesc"/>
<xsl:text> (greg.) | Textstelle: &lt;a href='</xsl:text>
<xsl:value-of select="$transcrpath"/>
<xsl:value-of select="$filename"/>
<xsl:text>#fol</xsl:text>
<xsl:value-of select="$fol"/>
<xsl:text>'&gt;fol. </xsl:text>
<xsl:value-of select="$fol"/>
<xsl:text>&lt;/a&gt; | &lt;a href='</xsl:text>
<xsl:value-of select="$regpath"/>
<xsl:choose>
<xsl:when test="$placeid ne ''">
<xsl:text>orte/</xsl:text>
<xsl:value-of select="$placeid"/>
<xsl:text>'&gt;Eintrag im Ortsregister&lt;/a&gt;</xsl:text>
</xsl:when>
<xsl:when test="$workid ne ''">
<xsl:text>objekte/</xsl:text>
<xsl:value-of select="$workid"/>
<xsl:text>'&gt;Eintrag im Werkregister&lt;/a&gt;</xsl:text>
</xsl:when>
</xsl:choose>
</description>
</xsl:template>
<xsl:template match="tei:rs[@type = 'place']">
<xsl:param name="title"/>
<xsl:param name="filename"/>
<xsl:variable name="placeid" select="substring-after(@ref, 'plc:')"/>
<xsl:variable name="geonamesuri" select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:idno[@type = 'URI'][contains(., 'geonames')]"/>
<xsl:variable name="gndurl" select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:idno[@type = 'URI'][contains(., 'd-nb.info')][1]"/>
<xsl:variable name="gndrdfurl" select="concat($gndurl, '/about/lds.rdf')"/>
<xsl:variable name="fol" select="substring-after(preceding::tei:pb[1]/@n,'fol. ')"/>
<xsl:if test="not(preceding::tei:rs[@type = 'place'][@role = 'present'][substring-after(@ref, 'plc:') = $placeid][preceding::tei:date[1] = current()/preceding::tei:date[1]])">
<xsl:choose>
<xsl:when test="document($gndrdfurl)//geo:asWKT and not(document($gndrdfurl)//rdf:type[contains(@rdf:resource, 'd-nb.info/standards/elementset/gnd#MemberState')]) and not(document($gndrdfurl)//rdf:type[contains(@rdf:resource,'d-nb.info/standards/elementset/gnd#Country')]) and not(document($gndrdfurl)//rdf:type[contains(@rdf:resource, 'd-nb.info/standards/elementset/gnd#NaturalGeographicUnit')])">
<Placemark xmlns="http://www.opengis.net/kml/2.2">
<address>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
</address>
<xsl:call-template name="description">
<xsl:with-param name="title" select="$title"/>
<xsl:with-param name="filename" select="$filename"/>
<xsl:with-param name="fol" select="$fol"/>
<xsl:with-param name="placeid" select="$placeid"/>
</xsl:call-template>
<xsl:call-template name="insertDate"/>
<Point>
<coordinates>
<xsl:value-of select="substring-before(substring-after(document($gndrdfurl)//geo:asWKT, 'Point ( +'), ' +')"/>
<xsl:text>,</xsl:text>
<xsl:value-of select="substring-before(substring-after(substring-after(document($gndrdfurl)//geo:asWKT, 'Point ( +'), ' +'), ')')"/>
</coordinates>
</Point>
</Placemark>
</xsl:when>
<xsl:when test="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:idno[@type = 'URI'][contains(., 'geonames')] and not(document(concat($geonamesuri, 'about.rdf'))//gn:featureClass[contains(@rdf:resource, 'www.geonames.org/ontology#A')]) and not(document(concat($geonamesuri, 'about.rdf'))//gn:featureClass[contains(@rdf:resource, 'www.geonames.org/ontology#L')])">
<Placemark xmlns="http://www.opengis.net/kml/2.2">
<address>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
</address>
<xsl:call-template name="description">
<xsl:with-param name="title" select="$title"/>
<xsl:with-param name="filename" select="$filename"/>
<xsl:with-param name="fol" select="$fol"/>
<xsl:with-param name="placeid" select="$placeid"/>
</xsl:call-template>
<xsl:call-template name="insertDate"/>
<Point>
<coordinates>
<xsl:value-of select="document(concat($geonamesuri, 'about.rdf'))//wgs84_pos:long"/>
<xsl:text>,</xsl:text>
<xsl:value-of select="document(concat($geonamesuri, 'about.rdf'))//wgs84_pos:lat"/>
</coordinates>
</Point>
</Placemark>
</xsl:when>
<xsl:when test="doc-available($gndrdfurl)">
<xsl:variable name="wpurl" select="document($gndrdfurl)//foaf:page[contains(./@rdf:resource, 'wikipedia')]/@rdf:resource"/>
<xsl:variable name="wdurl" select="document($gndrdfurl)//owl:sameAs[contains(./@rdf:resource, 'wikidata')]/@rdf:resource"/>
<xsl:if test="doc-available($wdurl)">
<xsl:if test="document($wdurl)//ps:P625 and count(document($wdurl)//ps:P31[@rdf:resource = ('http://www.wikidata.org/entity/Q5107', 'http://www.wikidata.org/entity/Q82794', 'http://www.wikidata.org/entity/Q6256', 'http://www.wikidata.org/entity/Q3024240', 'http://www.wikidata.org/entity/Q182547', 'http://www.wikidata.org/entity/Q107390')]) = 0">
<Placemark xmlns="http://www.opengis.net/kml/2.2">
<address>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
</address>
<xsl:call-template name="description">
<xsl:with-param name="title" select="$title"/>
<xsl:with-param name="filename" select="$filename"/>
<xsl:with-param name="fol" select="$fol"/>
<xsl:with-param name="placeid" select="$placeid"/>
</xsl:call-template>
<xsl:call-template name="insertDate"/>
<Point>
<coordinates>
<xsl:value-of select="concat(substring-before(substring-after(document($wdurl)//ps:P625[1], 'Point('), ' '), ',', substring-after(substring-before(document($wdurl)//ps:P625[1], ')'), ' '))"/>
</coordinates>
</Point>
</Placemark>
</xsl:if>
</xsl:if>
</xsl:when>
</xsl:choose>
</xsl:if>
</xsl:template>
<xsl:template match="tei:rs[@type = 'work']">
<xsl:param name="title"/>
<xsl:param name="filename"/>
<xsl:variable name="fol" select="substring-after(preceding::tei:pb[1]/@n,'fol. ')"/>
<xsl:variable name="workid" select="substring-after(@ref, 'wrk:')"/>
<xsl:if test="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:idno[@type = 'URI'][contains(., 'd-nb.info')] and not(preceding::tei:rs[@ref = current()/@ref][preceding::tei:date[1] = current()/preceding::tei:date[1]])">
<xsl:variable name="gndurl" select="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:idno[@type = 'URI'][contains(., 'd-nb.info')]"/>
<xsl:variable name="gndrdfurl" select="concat($gndurl, '/about/lds.rdf')"/>
<xsl:if test="doc-available($gndrdfurl)">
<xsl:variable name="wpurl" select="document($gndrdfurl)//foaf:page[contains(./@rdf:resource, 'wikipedia')]/@rdf:resource"/>
<xsl:variable name="wdurl" select="document($gndrdfurl)//owl:sameAs[contains(./@rdf:resource, 'wikidata')]/@rdf:resource"/>
<xsl:choose>
<xsl:when test="doc-available($wdurl)">
<xsl:if test="document($wdurl)//ps:P625 and count(document($wdurl)//ps:P31[@rdf:resource = ('http://www.wikidata.org/entity/Q5107', 'http://www.wikidata.org/entity/Q82794', 'http://www.wikidata.org/entity/Q6256', 'http://www.wikidata.org/entity/Q3024240', 'http://www.wikidata.org/entity/Q182547', 'http://www.wikidata.org/entity/Q107390')]) = 0">
<Placemark xmlns="http://www.opengis.net/kml/2.2">
<address>
<xsl:if test="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location'] and tei:objectType[@n eq '1'][@ref eq '#architektur']">
<xsl:choose>
<xsl:when test="starts-with(substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' '), '#')">
<xsl:variable name="workid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' #')"/>
<xsl:if test="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']">
<xsl:choose>
<xsl:when test="starts-with(substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' '), '#')">
<xsl:variable name="workid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' #')"/>
<xsl:if test="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' plc:')"/>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
<xsl:text>, </xsl:text>
</xsl:if>
<xsl:value-of select="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:name[@type = 'preferred']/tei:term"/>
</xsl:when>
<xsl:when test="starts-with(substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' '), 'plc:')">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' plc:')"/>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
</xsl:when>
</xsl:choose>
<xsl:text>, </xsl:text>
</xsl:if>
<xsl:value-of select="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:name[@type = 'preferred']/tei:term"/>
<xsl:text>, </xsl:text>
</xsl:when>
<xsl:when test="starts-with(substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' '), 'plc:')">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' plc:')"/>
<xsl:if test="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']">
<xsl:choose>
<xsl:when test="starts-with(substring-after(document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']/@target, ' '), '#')">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']/@target, ' #')"/>
<xsl:if test="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']/@target, ' #')"/>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
<xsl:text>, </xsl:text>
</xsl:if>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
</xsl:when>
<xsl:when test="starts-with(substring-after(document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']/@target, ' '), 'wrk:')">
<xsl:variable name="workid" select="substring-after(document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']/@target, ' wrk:')"/>
<xsl:if test="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' plc:')"/>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
<xsl:text>, </xsl:text>
</xsl:if>
<xsl:value-of select="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:name[@type = 'preferred']/tei:term"/>
</xsl:when>
</xsl:choose>
<xsl:text>, </xsl:text>
</xsl:if>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
<xsl:text>, </xsl:text>
</xsl:when>
</xsl:choose>
</xsl:if>
<xsl:value-of select="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:name[@type = 'preferred']/tei:term"/>
</address>
<xsl:call-template name="description">
<xsl:with-param name="title" select="$title"/>
<xsl:with-param name="filename" select="$filename"/>
<xsl:with-param name="fol" select="$fol"/>
<xsl:with-param name="workid" select="$workid"/>
</xsl:call-template>
<xsl:call-template name="insertDate"/>
<Point>
<coordinates>
<xsl:value-of select="concat(substring-before(substring-after(document($wdurl)//ps:P625[1], 'Point('), ' '), ',', substring-after(substring-before(document($wdurl)//ps:P625[1], ')'), ' '))"/>
</coordinates>
</Point>
</Placemark>
</xsl:if>
</xsl:when>
<xsl:when test="doc-available($wpurl)">
<xsl:variable name="wdurl" select="concat(substring-before(document($wpurl)//a[text() = 'Wikidata-Datenobjekt']/@href, 'Page'), 'Data', substring-after(document($wpurl)//a[text() = 'Wikidata-Datenobjekt']/@href, 'Page'))"/>
<xsl:if test="document($wdurl)//ps:P625 and count(document($wdurl)//ps:P31[@rdf:resource = ('http://www.wikidata.org/entity/Q5107', 'http://www.wikidata.org/entity/Q82794', 'http://www.wikidata.org/entity/Q6256', 'http://www.wikidata.org/entity/Q3024240', 'http://www.wikidata.org/entity/Q182547', 'http://www.wikidata.org/entity/Q107390')]) = 0">
<Placemark xmlns="http://www.opengis.net/kml/2.2">
<address>
<xsl:if test="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location'] and tei:objectType[@n eq '1'][@ref eq '#architektur']">
<xsl:choose>
<xsl:when test="starts-with(substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' '), '#')">
<xsl:variable name="workid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' #')"/>
<xsl:if test="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']">
<xsl:choose>
<xsl:when test="starts-with(substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' '), '#')">
<xsl:variable name="workid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' #')"/>
<xsl:if test="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' plc:')"/>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
<xsl:text>, </xsl:text>
</xsl:if>
<xsl:value-of select="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:name[@type = 'preferred']/tei:term"/>
</xsl:when>
<xsl:when test="starts-with(substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' '), 'plc:')">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' plc:')"/>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
</xsl:when>
</xsl:choose>
<xsl:text>, </xsl:text>
</xsl:if>
<xsl:value-of select="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:name[@type = 'preferred']/tei:term"/>
<xsl:text>, </xsl:text>
</xsl:when>
<xsl:when test="starts-with(substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' '), 'plc:')">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' plc:')"/>
<xsl:if test="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']">
<xsl:choose>
<xsl:when test="starts-with(substring-after(document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']/@target, ' '), '#')">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']/@target, ' #')"/>
<xsl:if test="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']/@target, ' #')"/>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
<xsl:text>, </xsl:text>
</xsl:if>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
</xsl:when>
<xsl:when test="starts-with(substring-after(document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']/@target, ' '), 'wrk:')">
<xsl:variable name="workid" select="substring-after(document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P89_falls_within']/@target, ' wrk:')"/>
<xsl:if test="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']">
<xsl:variable name="placeid" select="substring-after(document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:linkGrp/tei:link[@ana = 'http://erlangen-crm.org/current/P53_has_former_or_current_location']/@target, ' plc:')"/>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
<xsl:text>, </xsl:text>
</xsl:if>
<xsl:value-of select="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:name[@type = 'preferred']/tei:term"/>
</xsl:when>
</xsl:choose>
<xsl:text>, </xsl:text>
</xsl:if>
<xsl:value-of select="document('../Register/register-place.xml')//tei:place[@xml:id eq $placeid]/tei:placeName[@type = 'preferred']/tei:term"/>
<xsl:text>, </xsl:text>
</xsl:when>
</xsl:choose>
</xsl:if>
<xsl:value-of select="document('../Register/register-work.xml')//tei:item[@xml:id eq $workid]/tei:name[@type = 'preferred']/tei:term"/>
</address>
<xsl:call-template name="description">
<xsl:with-param name="title" select="$title"/>
<xsl:with-param name="filename" select="$filename"/>
<xsl:with-param name="fol" select="$fol"/>
<xsl:with-param name="workid" select="$workid"/>
</xsl:call-template>
<xsl:call-template name="insertDate"/>
<Point>
<coordinates>
<xsl:value-of select="concat(substring-before(substring-after(document($wdurl)//ps:P625[1], 'Point('), ' '), ',', substring-after(substring-before(document($wdurl)//ps:P625[1], ')'), ' '))"/>
</coordinates>
</Point>
</Placemark>
</xsl:if>
</xsl:when>
</xsl:choose>
</xsl:if>
</xsl:if>
</xsl:template>
</xsl:stylesheet>
\ No newline at end of file
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment