<?xml version="1.0" encoding="utf-8"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
  <xsl:output method="text" encoding="utf-8"/>

  <xsl:variable name="new_line" select="'&#xA;'"/>

  <xsl:template match="/">
    <xsl:if test="facilitor/relaties/relatie">BEDRIJFSNAAM;LEVERANCIERNUMMER;BEZOEK_ADRES;BEZOEK_POSTCODE;BEZOEK_PLAATS;BEZOEK_LAND;POST_ADRES;POST_POSTCODE;POST_PLAATS;POST_LAND;BEDRIJF_TELEFOON;BEDRIJF_FAX;BEDRIJF_EMAIL;CONTACTPERSOON;CONTACT_TELEFOON;CONTACT_FAX;BEDRIJF_XSL;BEDRIJF_ORDER_ADRES;LEVERANCIER;UITVOERENDE;CONTRACTANT;HUURDER;TOONINGIDS;UURLOON;OVEREENKOMSTNUMMER;OVEREENKOMSTDATUM;OPMERKING;DIENST;LOCATIECODE;GEBOUWCODE<xsl:value-of select="$new_line"/></xsl:if>
    <xsl:for-each select="facilitor/relaties/relatie">
      <xsl:value-of select="bedrijfsnaam"/>;<xsl:value-of select="leveranciernummer"/>;<xsl:value-of select="bezoek_adres"/>;<xsl:value-of select="bezoek_postcode"/>;<xsl:value-of select="bezoek_plaats"/>;<xsl:value-of select="bezoek_land"/>;<xsl:value-of select="post_adres"/>;<xsl:value-of select="post_postcode"/>;<xsl:value-of select="post_plaats"/>;<xsl:value-of select="post_land"/>;<xsl:value-of select="bedrijf_telefoon"/>;;<xsl:value-of select="bedrijf_email"/>;;;;;;;J;J;;;;;;;;;<xsl:value-of select="$new_line"/>
    </xsl:for-each>
  </xsl:template>

  <xsl:template name="escape_quote">
    <xsl:param name="string"/>
    <xsl:choose>
      <xsl:when test="contains($string, '&quot;')">
        <xsl:value-of select="substring-before($string, '&quot;')"/>&quot;&quot;<xsl:call-template name="escape_quote">
          <xsl:with-param name="string" select="substring-after($string, '&quot;')"/>
        </xsl:call-template>
      </xsl:when>
      <xsl:otherwise><xsl:value-of select="$string"/></xsl:otherwise>
    </xsl:choose>
  </xsl:template>
</xsl:stylesheet>
