Merge 2016.3 Gold D changes

svn path=/Website/trunk/; revision=33357

APPL/API2/api2_rest.inc

@@ -854,7 +854,7 @@ function RequestJSON()
     }
     catch (e)
     {
-        __DoLog("JSON eval faalt met: {0}<br>{1}".format(e.description, jvraag), "ffff00");
+        __DoLog("JSON eval faalt met: '{0}'\n{1}".format(e.description||e.message, jvraag), "ffff00");
         return { error: e.description };
     }
     return { json: vraag };

APPL/API2/model_appointments.inc

@@ -138,10 +138,10 @@ function model_appointments()
         }
         else
         {
-            if (!params.isNew)
+            if (params.isNew)
             {
                 // Pak de default actie of de alfabetisch eerste
-                var sqla = "SELECT bsez_actie_key"
+                var sqla = "SELECT bez_actie_key"
                          + "     , bez_actie_omschrijving"
                          + "  FROM bez_actie"
                          + " ORDER BY bez_actie_default DESC NULLS LAST, bez_actie_omschrijving";

APPL/API2/model_reservations.inc

@@ -89,7 +89,8 @@ function model_reservations(rsv_key, params)
                                           enable_update: true
                                         },
                 "reservationconsumables": { model: model_reservationconsumables,
-                                           joinfield: "reservation"
+                                           joinfield: "reservation",
+                                          enable_update: true
                                          },
                 "tracking": {
                                   model: new model_tracking(['reservering', 'xreservering']),

APPL/AUT/Login.inc

@@ -1039,7 +1039,7 @@ function jwt_create(perslid_key, aud)
             + " WHERE fac_sp_audience = " + safe.quoted_sql(aud); // TODO ook issuer meenemen?
     var oRs = Oracle.Execute(sql);
     if (oRs.Eof)
-        shared.internal_error("Service provider for '{0}' is not configured for {1}".format(aud, customerId));
+        shared.internal_error("Service provider for '{0}' is not configured for {1}".format(safe.html(aud), customerId));
     sp_key = oRs("fac_sp_key").value;
     var params = {
                    usermapping: oRs("fac_sp_usermapping").Value,
@@ -1242,7 +1242,7 @@ function trySSO(ssocode)
             + " WHERE fac_idp_code = " + safe.quoted_sql_upper(ssocode); // een trigger zorgt dat fac_idp_code uppercase is
     var oRs = Oracle.Execute(sql);
     if (oRs.Eof)
-        shared.internal_error("Identity provider '{0}' is not configured for {1}".format(ssocode, customerId));
+        shared.internal_error("Identity provider '{0}' is not configured for {1}".format(safe.html(ssocode), customerId));
 
     var isFACFACinternal = oRs("fac_idp_internal").Value != 0;
     var ip_restrict = oRs("fac_idp_ipfilter").Value;

APPL/PDA/melding_new.asp

@@ -145,6 +145,7 @@ if (srtdisc_key > 0)
                           , bld_key: user.alg_gebouw_key({withcurrent:true})
                           , perslidKey: user_key // altijd voor jezelf via mobile
                           , autfunctionKey: auth_key
+                          , show_expired: false
                           };
         var filtcode = urole.toUpperCase();
         if (action == "forward")
@@ -154,6 +155,28 @@ if (srtdisc_key > 0)
         }
         var filtClause = getFiltClauseStdmelding(filtcode, filt_params);
 
+        // Voor disciplines die alleen in MLDUSE zitten moet de stdmelding gecontroleerd worden op stdmelding_notfrontend.
+        var check_notfrontend = " AND sm.mld_stdmelding_notfrontend = "
+                                  + " CASE WHEN EXISTS (SELECT 1"
+                                                    + "   FROM ( SELECT ins_discipline_key"
+                                                    + "               , prs_perslid_key"
+                                                    + "            FROM fac_v_webgebruiker w"
+                                                    + "               , fac_functie f"
+                                                    + "           WHERE f.fac_functie_key = w.fac_functie_key"
+                                                    + "             AND f.fac_functie_code = 'WEB_MLDUSE'"
+                                                    + "          MINUS"
+                                                    + "          SELECT distinct ins_discipline_key"
+                                                    + "               , prs_perslid_key"
+                                                    + "            FROM fac_v_webgebruiker"
+                                                    + "           WHERE fac_functie_key NOT IN (" + auth_key.join(",") + ")"
+                                                    + "         ) x"
+                                                    + "   WHERE x.ins_discipline_key = sm.mld_ins_discipline_key"
+                                                    + "     AND x.prs_perslid_key = " + user_key
+                                                    + ")"
+                                  + "      THEN 0"
+                                  + "      ELSE sm.mld_stdmelding_notfrontend"
+                                  + " END";
+
         mySTDsql = "SELECT mld_stdmelding_key"
                  + ","+    lcl.xsqla('sm.mld_stdmelding_omschrijving','sm.mld_stdmelding_key')
                  + ","+    lcl.xsqla('mld_stdmelding_hint', 'sm.mld_stdmelding_key')
@@ -165,9 +188,8 @@ if (srtdisc_key > 0)
                  + " WHERE sm.mld_ins_discipline_key = di.ins_discipline_key"
                  + "   AND di.ins_srtdiscipline_key = sd.ins_srtdiscipline_key"
                  + "   AND sm.mld_stdmelding_verwijder IS NULL"
-                 + "   AND (sm.mld_stdmelding_vervaldatum IS NULL OR"
-                 + "        sm.mld_stdmelding_vervaldatum > SYSDATE)"
                  + filtClause.where
+                 + check_notfrontend;
         // Selector mode vakgroep/melding voor de frontend. {0(=default)=vakgroep en melding (beide eerst te kiezen), 1=vakgroep readonly, 2=alleen melding}
         if (S("mld_selector_mode")==0) {
             mySTDsql += " ORDER BY UPPER("+lcl.xsql('di.ins_discipline_omschrijving', 'di.ins_discipline_key')+"), UPPER("+lcl.xsql('sm.mld_stdmelding_omschrijving','sm.mld_stdmelding_key')+")";

APPL/Shared/default.inc

@@ -105,9 +105,9 @@ settings =
             // paden ten opzichte van de root toe
             if (n == "flexfilespath" || n == "fg_dwf_path")
             {
-                if (v.substr(0,1) == '*') // *_DATA wordt /branch20163_DATA of FPlace5i_DATA
+                if (v.substr(0,1) == '*') // *_DATA wordt branch20163_DATA of FPlace5i_DATA
                 {
-                    v = Server.MapPath(rooturl) + v.substr(1) + "/" + customerId;
+                    v = Server.MapPath(rooturl || "/") + v.substr(1) + "/" + customerId;
                     var fso = Server.CreateObject("Scripting.FileSystemObject");
                     v = fso.GetAbsolutePathName(v); // Technisch niet nodig maar toch '..' wegwerken
                     __Log("Path {0} is set to {1}".format(n, v));

APPL/Shared/expired.asp

@@ -14,6 +14,16 @@
 <% // GEEN install.inc hier! We hebben al genoeg problemen
 // Merk op dat deze logging hier niet zinvol is: de customerId is niet bekend
 // en Session("logging") zal ook leeg zijn
+
+var host = String(Request.ServerVariables("HTTP_HOST"));
+var trycust = host.substring(0,4).toUpperCase();
+Response.Write(trycust)
+if (trycust)
+{
+    var hsts_maxage = parseInt(Application("SET_" + trycust + "_hsts_maxage"));
+    if  (hsts_maxage >=0 && Request.ServerVariables("SERVER_PORT") != "80")
+        Response.AddHeader("Strict-Transport-Security", "max-age=" + hsts_maxage);
+}
 %>
 <html>
  <head>

CUST/ASTE/xsl/cust.xsl

@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:msxml="urn:schemas-microsoft-com:xslt">
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:msxml="urn:schemas-microsoft-com:xslt" version="1.0">
   <xsl:import href="../../../appl/shared/default.xsl"/>
   <xsl:variable name="Rev">
     <!-- Revision van deze cust.xsl -->
@@ -461,6 +461,71 @@ Your kind words have been shared with other members of the Facilities team and w
       </xsl:if>
     </table>
   </xsl:template>
+  
+			<xsl:template match="rapport" mode="default">
+				<html>
+					<xsl:choose>
+						<xsl:when test="@view='aste_v_rap_meldingenbeh'">
+						  <xsl:variable name="sorted">
+							  <xsl:for-each select="rapport_data/data_row">
+								  <xsl:sort select="number(CALL_NUMBER)" order="ascending" data-type="number"/>
+								  <xsl:copy-of select="."/>
+							  </xsl:for-each>
+						  </xsl:variable>							
+							<body>
+								<table width="100%" class="DefResultsetTable" cellpadding="0" cellspacing="0">
+									<thead>
+										<tr>
+											<th style="text-align: left;">Number</th>
+											<th style="text-align: left">Date</th>
+											<th style="text-align: left">Time</th>
+											<th style="text-align: left">Place</th>
+											<th style="text-align: left">Discipline</th>												
+											<th style="text-align: left">Call</th>										
+											<th style="text-align: left">Description</th>
+											<th style="text-align: left">Requestor</th>
+											<th style="text-align: left">Update</th>																																		
+										</tr>											
+									</thead>
+									<tbody>
+									<xsl:for-each select="msxml:node-set($sorted)/data_row">
+									  <xsl:variable name="prev_call">
+										  <xsl:choose>
+											  <xsl:when test="position()=1">Quqelequ</xsl:when>
+											  <xsl:otherwise><xsl:value-of select="preceding-sibling::data_row[1]/CALL_NUMBER"/></xsl:otherwise>
+										  </xsl:choose>
+									  </xsl:variable>
+				            <xsl:variable name="this_call">
+				              <xsl:value-of select="CALL_NUMBER"/>
+				            </xsl:variable>
+          
+		            							
+										<tr>
+            				<xsl:if test="$this_call!=$prev_call">													
+											<td style="mso-number-format:General!important;"><xsl:value-of select="number(CALL_NUMBER)"/></td>
+											<td style="white-space: nowrap"><xsl:value-of select="CALL_DATE"/></td>
+											<td><xsl:value-of select="CALL_TIME"/></td>
+											<td><xsl:value-of select="PLACE"/></td>
+											<td style="white-space: nowrap"><xsl:value-of select="DISCIPLINE"/></td>											
+											<td><xsl:value-of select="CALL"/></td>
+											<td><xsl:value-of select="DESCRIPTION"/></td>
+											<td><xsl:value-of select="REQUESTOR"/></td>
+											<td>
+												<xsl:for-each select="msxml:node-set($sorted)/data_row[CALL_NUMBER=$this_call]">
+													<i><xsl:value-of select="UPDATE_DAT"/>&#xA0;<xsl:value-of select="UPDATE_NAME"/></i>&#xA0;<xsl:value-of select="UPDATE_DESC"/><br style="mso-data-placement:same-cell;" />
+												</xsl:for-each>
+											</td>
+										</xsl:if>
+										</tr>
+								</xsl:for-each>				
+								</tbody>
+								<tfoot>
+								</tfoot>
+							</table>
+						</body>
+					</xsl:when>
+				</xsl:choose>
+			</html>
 		</xsl:template>  
 </xsl:stylesheet>
 <!-- Stylus Studio meta-information - (c) 2004-2007. Progress Software Corporation. All rights reserved.

CUST/CSUN/xsl/yask.xsl

@@ -0,0 +1,33 @@
+<?xml version="1.0" encoding="utf-8"?>
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
+  <xsl:output method="xml" indent="yes" encoding="utf-8" />
+  <xsl:decimal-format name="european" decimal-separator="," grouping-separator="." />
+  <xsl:param name="mode" />
+  <xsl:variable name="Rev">
+    <xsl:value-of select="substring(translate('$Revision$', '$ ', ''), 10)" />
+  </xsl:variable>
+
+
+	<!-- Uitpakken inkomende SOAP envelope -->
+	<xsl:template match="soap:Envelope">
+			<xsl:copy-of select="soap:Body/node()"/>
+	</xsl:template>
+
+  <xsl:template match="facilitor">
+		<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+			<soap:Body>
+			  <facilitor>
+        <xsl:copy-of select="./node()"/>
+				</facilitor>				
+			</soap:Body>
+		</soap:Envelope>
+  </xsl:template>
+
+  <xsl:template match="/">
+				<!-- door API gebruikt om de SOAP tags toe te voegen aan te versturen bericht -->
+				<xsl:apply-templates select="facilitor"/>
+				<!-- door API gebruikt om de soap tags te verwijderen uit inkomend bericht -->
+				<xsl:apply-templates select="soap:Envelope"/>
+  </xsl:template>
+
+</xsl:stylesheet>

CUST/MARX/import/ScanMail2Api.js

@@ -197,6 +197,6 @@ try {
 }
 catch (e)
 {
-    WScript.Echo("Serieuze fout in MaasStatusResponse.js: " + e.description)
+    WScript.Echo("Serieuze fout in ScanMail2Api.js: " + e.description)
     WScript.Quit(1);
 }

CUST/NYBU/xsl/cust.xsl

@@ -245,7 +245,7 @@
 								</tr>
 								<tr>
 									<td height="10px" align="right" width="45%">Toegangsdeur | Entrance door</td>
-									<td height="10px" style="text-align:left" width="10%">€250,00</td>
+									<td height="10px" style="text-align:left" width="10%">€255,00</td>
 									<td height="10px" style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Deurschilden | Door plates']!=''">
@@ -259,7 +259,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Deurkruk | Doorhandle</td>
-									<td style="text-align:left" width="10%">€10,00</td>
+									<td style="text-align:left" width="10%">€10,20</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Deurkruk | Doorhandle']!=''">
@@ -273,7 +273,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Deurschilden | Door plates</td>
-									<td style="text-align:left" width="10%">€7,50</td>
+									<td style="text-align:left" width="10%">€7,65</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Deurschilden | Door plates']!=''">
@@ -287,7 +287,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Sluitplaat | Locking Plate</td>
-									<td style="text-align:left" width="10%">€2,50</td>
+									<td style="text-align:left" width="10%">€2,55</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Sluitplaat | Locking Plate']!=''">
@@ -301,7 +301,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Slot | Lock</td>
-									<td style="text-align:left" width="10%">€25,00</td>
+									<td style="text-align:left" width="10%">€25,50</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Slot | Lock']!=''">
@@ -313,6 +313,20 @@
 										</xsl:choose>
 									</td>
 								</tr>
+								<tr>
+									<td align="right" width="45%">1 zijde deur schilderen</td>
+									<td style="text-align:left" width="10%">€44,90</td>
+									<td style="text-align:center" width="45%">
+										<xsl:choose>
+											<xsl:when test="kenmerk[@naam='1 zijde deur schilderen']!=''">
+												<xsl:value-of select="kenmerk[@naam='1 zijde deur schilderen']"/>
+											</xsl:when>
+											<xsl:otherwise>
+												O
+											</xsl:otherwise>
+										</xsl:choose>
+									</td>
+								</tr>
 								<tr>
 									<td colspan="3" height="30px" align="right" width="45%" style="vertical-align:text-bottom">
 										<b>Woonkamer / Living room</b>
@@ -348,7 +362,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">TL balk | TL light</td>
-									<td style="text-align:left" width="10%">€25,00</td>
+									<td style="text-align:left" width="10%">€25,50</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='TL balk | TL light']!=''">
@@ -360,23 +374,9 @@
 										</xsl:choose>
 									</td>
 								</tr>
-								<tr>
-									<td align="right" width="45%">CAI Aansluiting | CAI connection</td>
-									<td style="text-align:left" width="10%">€15,00</td>
-									<td style="text-align:center" width="45%">
-										<xsl:choose>
-											<xsl:when test="kenmerk[@naam='CAI Aansluiting | CAI connection']!=''">
-												<xsl:value-of select="kenmerk[@naam='CAI Aansluiting | CAI connection']"/>
-											</xsl:when>
-											<xsl:otherwise>
-												O
-											</xsl:otherwise>
-										</xsl:choose>
-									</td>
-								</tr>
 								<tr>
 									<td align="right" width="45%">Stopcontact | Wall Outlet</td>
-									<td style="text-align:left" width="10%">€10,00</td>
+									<td style="text-align:left" width="10%">€10,20</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Stopcontact | Wall Outlet']!=''">
@@ -395,7 +395,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Deur badkamer | Bathroom door</td>
-									<td style="text-align:left" width="10%">€105,00</td>
+									<td style="text-align:left" width="10%">€107,10</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Deur badkamer | Bathroom door']!=''">
@@ -409,7 +409,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Douchegordijn | Showercurtain</td>
-									<td style="text-align:left" width="10%">€15,00</td>
+									<td style="text-align:left" width="10%">€15,50</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Douchegordijn | Showercurtain']!=''">
@@ -423,7 +423,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Deurkruk badkamer | Bathroom doorhandle</td>
-									<td style="text-align:left" width="10%">€10,00</td>
+									<td style="text-align:left" width="10%">€10,20</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Deurkruk badkamer | Bathroom doorhandle']!=''">
@@ -437,7 +437,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Armatuur badkamer | Bathroom armature</td>
-									<td style="text-align:left" width="10%">€33,00</td>
+									<td style="text-align:left" width="10%">€33,70</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Armatuur badkamer | Bathroom armature']!=''">
@@ -451,7 +451,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Lamp badkamer | Bathroom Lightbowl</td>
-									<td style="text-align:left" width="10%">€3,50</td>
+									<td style="text-align:left" width="10%">€3,60</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Lamp badkamer | Bathroom Lightbowl']!=''">
@@ -465,7 +465,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Slot badkamer | Bathroom lock</td>
-									<td style="text-align:left" width="10%">€30,00</td>
+									<td style="text-align:left" width="10%">€30,60</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Slot badkamer | Bathroom lock']!=''">
@@ -477,12 +477,26 @@
 										</xsl:choose>
 									</td>
 								</tr>
+								<tr>
+									<td align="right" width="45%">1 zijde deur schilderen</td>
+									<td style="text-align:left" width="10%">€44,90</td>
+									<td style="text-align:center" width="45%">
+										<xsl:choose>
+											<xsl:when test="kenmerk[@naam='1 zijde deur schilderen']!=''">
+												<xsl:value-of select="kenmerk[@naam='1 zijde deur schilderen']"/>
+											</xsl:when>
+											<xsl:otherwise>
+												O
+											</xsl:otherwise>
+										</xsl:choose>
+									</td>
+								</tr>
 							</table>
 						</div>
 						<div id="footer" style="width: 100%; height: 10mm; text-align: center;">
 							<table width="100%" cellpadding="0" cellspacing="0" style="border-top: 1px solid black; border-bottom: 1px solid black;">
 								<tr>
-									<td style="text-align:right">2015-2016
+									<td style="text-align:right">2017-2018
 									</td>
 									<td style="text-align:center">campus@nyenrode.nl
 									</td>
@@ -509,7 +523,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%" style="vertical-align:text-bottom">Extra cleaning</td>
-									<td style="text-align:left" width="10%">€25,00</td>
+									<td style="text-align:left" width="10%">€25,50</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Extra cleaning']!=''">
@@ -561,7 +575,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Order new key</td>
-									<td style="text-align:left" width="10%">€80,00</td>
+									<td style="text-align:left" width="10%">€82,00</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Order new key']!=''">
@@ -582,7 +596,7 @@
 								</tr>
 								<tr>
 									<td align="right" width="45%">Order new mailbox key</td>
-									<td style="text-align:left" width="10%">€10,50</td>
+									<td style="text-align:left" width="10%">€10,70</td>
 									<td style="text-align:center" width="45%">
 										<xsl:choose>
 											<xsl:when test="kenmerk[@naam='Order new mailbox key']!=''">
@@ -621,17 +635,17 @@
 										<br/>
 										<br/>
 										<br/>
-										<b>Paraaf Campusbeheerder / Initials Campus Supervisor:</b>
+										<b>Paraaf Campusbeheerder / Initials Campus Supervisor:_________________________________</b>
 										<br/>
 										<br/>
 										<br/>
-										<b>Handtekening / Signature Student:</b>
+										<b>Handtekening Student / Signature Student:__________________________________________</b>
 										<br/>
 										<br/>
 										<i>Of / of</i>
 										<br/>
 										<br/>
-										<b>Handtekening / Signature authorized representative:</b>
+										<b>Handtekening gemachtigde / Signature authorized representative:________________________</b>
 										<br/>
 										<br/>
 										<br/>
@@ -644,7 +658,7 @@
 						<div id="footer" style="width: 100%; height: 10mm; text-align: center;">
 							<table width="100%" cellpadding="0" cellspacing="0" style="border-top: 1px solid black; border-bottom: 1px solid black;">
 								<tr>
-									<td style="text-align:right">2015-2016
+									<td style="text-align:right">2017-2018
 									</td>
 									<td style="text-align:center">campus@nyenrode.nl
 									</td>

CUST/UWVA/xsl/cust.xsl

@@ -10,7 +10,7 @@
 	<xsl:variable name="lcletters">abcdefghijklmnopqrstuvwxyz</xsl:variable>
 	<xsl:variable name="ucletters">ABCDEFGHIJKLMNOPQRSTUVWXYZ</xsl:variable>
 
-	<xsl:variable name="Xsrtnotificatiecode">INSIN2</xsl:variable>
+	<xsl:variable name="Xsrtnotificatiecode">CUST19</xsl:variable>
 
 	<xsl:template name="adres">
 	 <tr>
@@ -9669,94 +9669,70 @@ function startAutoRefreshTim() {
 					</xsl:choose>
 				</table>
 			</xsl:when>
-			<!-- Abonnementen notificaties (CUST15 t/m CUST20, waarbij CUST19 nooit zal worden genotificeerd, -->
+			<!-- Abonnementen notificaties (CUST15 t/m CUST20, waarvan CUST16/17/18 deprecated)! -->
-			<!-- want fac.trackaction notificeert namelijk - nog? - niet automatisch over contract-xmlnodes)! -->
 			<xsl:when test="discipline/key = 360 and substring($srtnotificatiecode,1,4)='CUST'">
 				<table border="0" width="100%">
 					<tr>
-						<td valign="bottom">
+						<td>
 							<table>
 								<xsl:choose>
 									<xsl:when test="$mode='email'">
-										<tr>
+										<tr><td><img src="cid:uwv_teken.gif"/></td></tr>
-											<td>
-												<img src="cid:uwv_teken.gif"/>
-											</td>
-										</tr>
 									</xsl:when>
 									<xsl:otherwise>
-										<tr>
+										<tr><td><xsl:element name="img"><xsl:attribute name="src">../../cust/<xsl:value-of select="//header/custId"/>/uwv_teken.gif</xsl:attribute></xsl:element></td></tr>
-											<td>
-												<xsl:element name="img">
-													<xsl:attribute name="src">../../cust/<xsl:value-of select="//header/custId"/>/uwv_teken.gif</xsl:attribute>
-												</xsl:element>
-											</td>
-										</tr>
 									</xsl:otherwise>
 								</xsl:choose>
-								<tr>
+						    <xsl:choose>
-									<td class="tekstkop">Aan</td>
+							    <xsl:when test="$srtnotificatiecode='CUST19'">
-								</tr>
+								    <tr><td class="tekstkop">Aan</td></tr>
-								<tr>
+							    	<tr><td class="tekst">Postma &amp; Cohen</td></tr>
-									<td class="tekst">
+							    </xsl:when>
-										<xsl:value-of select="beheerder/naam_friendly"/>
+							    <xsl:otherwise>
-									</td>
+								    <tr><td class="tekstkop">Aan</td></tr>
-								</tr>
+							    	<tr><td class="tekst"><xsl:value-of select="beheerder/naam_friendly"/></td></tr>
-								<tr>
+							    	<tr><td class="tekst"><xsl:value-of select="beheerder/afdeling/omschrijving"/></td></tr>
-									<td class="tekst">
+							    </xsl:otherwise>
-										<xsl:value-of select="beheerder/afdeling/omschrijving"/>
+						    </xsl:choose>
-									</td>
-								</tr>
 							</table>
 						</td>
 						<td align="left" valign="top">
 							<table>
-								<tr>
+								<tr><td class="tekstkop">Datum</td></tr>
-									<td class="tekstkop">Datum</td>
+								<tr><td class="tekst"><xsl:value-of select="//facilitor/header/dateDay"/>-<xsl:value-of select="//facilitor/header/dateMonth"/>-<xsl:value-of select="//facilitor/header/dateYear"/></td></tr>
-								</tr>
+								<tr><td class="tekstkop" style="padding-top:20px;">Van</td></tr>
-								<tr>
+								<tr><td class="tekst">Telefoon: <xsl:value-of select="beheerder/descendant::*/bedrijf/telefoon"/></td></tr>
-									<td class="tekst">
+								<tr><td class="tekst"><xsl:value-of select="descendant::*/bedrijf/email"/></td></tr>
-										<xsl:value-of select="//facilitor/header/dateDay"/>-<xsl:value-of select="//facilitor/header/dateMonth"/>-<xsl:value-of select="//facilitor/header/dateYear"/></td>
-								</tr>
-								<tr>
-									<td class="tekstkop" style="padding-top:20px;">Van</td>
-								</tr>
-								<tr>
-									<td class="tekst">Telefoon: <xsl:value-of select="beheerder/descendant::*/bedrijf/telefoon"/></td>
-								</tr>
-								<tr>
-									<td class="tekst"><xsl:value-of select="descendant::*/bedrijf/email"/></td>
-								</tr>
 							</table>
 						</td>
 					</tr>
 				</table>
 				<table border="0" width="100%">
-					<tr>
+					<tr><td class="tekstkop" style="padding-top:20px;">Onderwerp</td></tr>
-						<td class="tekstkop" style="padding-top:20px;">Onderwerp</td>
-					</tr>
 					<tr>
 						<xsl:choose>
-							<xsl:when test="$srtnotificatiecode = 'CUST15'">
+							<xsl:when test="$srtnotificatiecode='CUST15'">
-								<td class="tekst">Verlengen of stopzetten abonnement</td>
+								<td class="tekst">Aflopen abonnement</td>
 							</xsl:when>
-							<xsl:when test="$srtnotificatiecode = 'CUST16'">
+							<xsl:when test="$srtnotificatiecode='CUST16'">
+								<!-- Per overgang naar P&C vervallen! -->
 								<td class="tekst"><i>Herinnering:</i><xsl:text> </xsl:text>verlengen of stopzetten abonnement</td>
 							</xsl:when>
-							<xsl:when test="$srtnotificatiecode = 'CUST17'">
+							<xsl:when test="$srtnotificatiecode='CUST17'">
+								<!-- Per overgang naar P&C vervallen! -->
 								<td class="tekst">Abonnement verlengd</td>
 							</xsl:when>
-							<xsl:when test="$srtnotificatiecode = 'CUST18'">
+							<xsl:when test="$srtnotificatiecode='CUST18'">
+								<!-- Per overgang naar P&C vervallen! -->
 								<td class="tekst">Abonnement stopgezet</td>
 							</xsl:when>
-							<xsl:when test="$srtnotificatiecode = 'CUST19'">
+							<xsl:when test="$srtnotificatiecode='CUST19'">
-								<td class="tekst">Doorvoering adreswijziging abonnement</td>
+								<td class="tekst">Adreswijziging abonnement</td>
 							</xsl:when>
-							<xsl:when test="$srtnotificatiecode = 'CUST20'">
+							<xsl:when test="$srtnotificatiecode='CUST20'">
 								<td class="tekst">Abonnement gesloten/geannuleerd</td>
 							</xsl:when>
-							<xsl:otherwise>
+							<xsl:otherwise/>
-							</xsl:otherwise>
 						</xsl:choose>
 					</tr>
 					<tr>
@@ -9764,61 +9740,35 @@ function startAutoRefreshTim() {
 					</tr>
 					<tr>
 						<xsl:choose>
-							<xsl:when test="$srtnotificatiecode = 'CUST15'">
+							<xsl:when test="$srtnotificatiecode='CUST15'">
-								<td class="tekst">Je hebt in Facilitor één of meerdere abonnementen op vakinhoudelijke informatie of nieuwsvoorziening op jouw naam staan (bijvoorbeeld het Financieel dagblad). Eén van deze abonnementen – zie onderstaande gegevens – loopt binnenkort af.
+								<td class="tekst">Je hebt één of meerdere abonnementen op vakinhoudelijke informatie of nieuwsvoorziening op jouw naam staan (bijvoorbeeld het Financieel dagblad). Eén van deze abonnementen – zie onderstaande gegevens – loopt binnenkort af.
-									<br/>
+									<br/><br/>Voortzetting van dit abonnement kan alleen door tijdig het betreffende product opnieuw in Facilitor te bestellen.
-									<br/>In het abonnementencontract kun je, nadat het potloodje is aangeklikt, bij de optie ‘Verlengen’ aangeven of je het betreffende abonnement wel (keuze ‘ja’) of niet (keuze ‘nee’) wilt verlengen met één jaar. Via <xsl:element name="a"><xsl:attribute name="href">http://<xsl:value-of select="$FacilitorRoot"/>/?JumpTo=appl/cnt/cnt_contract.asp%3Furole%3Dbo%26cnt_key%3D<xsl:value-of select="key"/></xsl:attribute>deze link</xsl:element> kom je rechtstreeks bij het contract voor dit abonnement in Facilitor.
+									<br/><br/>Wil je meer weten over abonnementen op vakinhoudelijke informatie en nieuwsvoorziening? Via <xsl:element name="a"><xsl:attribute name="href">https://digitalewerkplek.sharepoint.uwv.nl/services/informatievoorzieningen-archivering/Paginas/abonnement-nieuwsvakinformatie-bestellen.aspx</xsl:attribute>deze link</xsl:element> kom je op de intranetinformatiepagina van deze productgroep. Op deze pagina kun je ook de werkinstructie vinden.
-									<br/>
+									<br/><br/>Heb je nog vragen, dan kun je contact opnemen met het Service Center van het Facilitair Bedrijf.</td>
-									<br/>Je kunt jouw keuze in het contract aangeven tot de ‘opzegdatum’ van het abonnement. Wanneer je voor de opzegdatum jouw keuze niet hebt aangegeven, dan wordt het abonnement stopgezet en vanaf de einddatum niet meer geleverd aan de abonnee.
-									<br/>
-									<br/>Wil je meer weten over abonnementen op vakinhoudelijke informatie en nieuwsvoorziening? Via <xsl:element name="a"><xsl:attribute name="href">https://digitalewerkplek.sharepoint.uwv.nl/services/informatievoorzieningen-archivering/Paginas/abonnement-nieuwsvakinformatie-bestellen.aspx</xsl:attribute>deze link</xsl:element> kom je op de intranetinformatiepagina van deze productgroep. Op deze pagina kun je ook de werkinstructie vinden.
-									<br/>
-									<br/>Heb je nog vragen, dan kun je contact opnemen met het Service Center van het Facilitair Bedrijf.</td>
 							</xsl:when>
-							<xsl:when test="$srtnotificatiecode = 'CUST16'">
+							<xsl:when test="$srtnotificatiecode='CUST16'">
-								<td class="tekst"><b>Let op: dit is een herinneringsmail!</b>
+								<!-- Per overgang naar P&C vervallen! -->
-									<br/>
+								<td class="tekst"/>
-									<br/>Je hebt in Facilitor één of meerdere abonnementen op vakinhoudelijke informatie of nieuwsvoorziening op jouw naam staan (bijvoorbeeld het Financieel dagblad). Eén van deze abonnementen – zie onderstaande gegevens – loopt binnenkort af.
-									<br/>
-									<br/>In het abonnementencontract kun je, nadat het potloodje is aangeklikt, bij de optie ‘Verlengen’ aangeven of je het betreffende abonnement wel (keuze ‘ja’) of niet (keuze ‘nee’) wilt verlengen met één jaar. Via <xsl:element name="a"><xsl:attribute name="href">http://<xsl:value-of select="$FacilitorRoot"/>/?JumpTo=appl/cnt/cnt_contract.asp%3Furole%3Dbo%26cnt_key%3D<xsl:value-of select="key"/></xsl:attribute>deze link</xsl:element> kom je rechtstreeks bij het contract voor dit abonnement in FACILITOR.
-									<br/>
-									<br/>Je kunt jouw keuze in het contract aangeven tot de ‘opzegdatum’ van het abonnement. Wanneer je voor de opzegdatum jouw keuze niet hebt aangegeven, dan wordt het abonnement stopgezet en vanaf de einddatum niet meer geleverd aan de abonnee.
-									<br/>
-									<br/>Wil je meer weten over abonnementen op vakinhoudelijke informatie en nieuwsvoorziening? Via <xsl:element name="a"><xsl:attribute name="href">https://digitalewerkplek.sharepoint.uwv.nl/services/informatievoorzieningen-archivering/Paginas/abonnement-nieuwsvakinformatie-bestellen.aspx</xsl:attribute>deze link</xsl:element> kom je op de intranetinformatiepagina van deze productgroep. Op deze pagina kun je ook de werkinstructie vinden.
-									<br/>
-									<br/>Heb je nog vragen, dan kun je contact opnemen met het Service Center van het Facilitair Bedrijf.</td>
 							</xsl:when>
-							<xsl:when test="$srtnotificatiecode = 'CUST17'">
+							<xsl:when test="$srtnotificatiecode='CUST17'">
-								<td class="tekst">Je hebt in Facilitor één of meerdere abonnementen op vakinhoudelijke informatie of nieuwsvoorziening op jouw naam staan (bijvoorbeeld het Financieel dagblad).
+								<!-- Per overgang naar P&C vervallen! -->
-									<br/>
+								<td class="tekst"/>
-									<br/>Een tijd terug heb je aangegeven dat onderstaand abonnement mag worden verlengd. Vandaag is de opzegtermijn van het abonnement aangebroken en is de leverancier van de verlenging op de hoogte gebracht. Het abonnement is verlengd met één jaar. Deze e-mail brengt je van deze actie op de hoogte.
-									<br/>
-									<br/>Via <xsl:element name="a"><xsl:attribute name="href">http://<xsl:value-of select="$FacilitorRoot"/>/?JumpTo=appl/cnt/cnt_contract.asp%3Furole%3Dbo%26cnt_key%3D<xsl:value-of select="key"/></xsl:attribute>deze link</xsl:element> kom je rechtstreeks bij het contract voor dit abonnement in Facilitor. Hier kun je alle gegevens inzien die horen bij dit abonnement (inclusief de nieuwe einddatum).
-									<br/>
-									<br/>Wil je meer weten over abonnementen op vakinhoudelijke informatie en nieuwsvoorziening? Via <xsl:element name="a"><xsl:attribute name="href">https://digitalewerkplek.sharepoint.uwv.nl/services/informatievoorzieningen-archivering/Paginas/abonnement-nieuwsvakinformatie-bestellen.aspx</xsl:attribute>deze link</xsl:element> kom je op de intranetinformatiepagina van deze productgroep. Op deze pagina kun je ook de werkinstructie vinden.
-									<br/>
-									<br/>Heb je nog vragen, dan kun je contact opnemen met het Service Center van het Facilitair Bedrijf.</td>
 							</xsl:when>
-							<xsl:when test="$srtnotificatiecode = 'CUST18'">
+							<xsl:when test="$srtnotificatiecode='CUST18'">
-								<td class="tekst">Je hebt in Facilitor één of meerdere abonnementen op vakinhoudelijke informatie of nieuwsvoorziening op jouw naam staan (bijvoorbeeld het Financieel dagblad).
+								<!-- Per overgang naar P&C vervallen! -->
-									<br/>
+								<td class="tekst"/>
-									<br/>Een tijd terug heb je aangegeven dat onderstaand abonnement mag worden stopgezet. Vandaag is de opzegtermijn van het abonnement aangebroken en is de leverancier hiervan op de hoogte gesteld. Het abonnement is stopgezet. Vanaf de einddatum van het abonnement zal het niet meer worden geleverd aan de abonnee. Deze e-mail brengt je van deze actie op de hoogte.
-									<br/>
-									<br/>Via <xsl:element name="a"><xsl:attribute name="href">http://<xsl:value-of select="$FacilitorRoot"/>/?JumpTo=appl/cnt/cnt_contract.asp%3Furole%3Dbo%26cnt_key%3D<xsl:value-of select="key"/></xsl:attribute>deze link</xsl:element> kom je rechtstreeks bij het contract voor dit abonnement in Facilitor. Hier kun je alle gegevens inzien die horen bij dit stopgezette abonnement.
-									<br/>
-									<br/>Wil je meer weten over abonnementen op vakinhoudelijke informatie en nieuwsvoorziening? Via <xsl:element name="a"><xsl:attribute name="href">https://digitalewerkplek.sharepoint.uwv.nl/services/informatievoorzieningen-archivering/Paginas/abonnement-nieuwsvakinformatie-bestellen.aspx</xsl:attribute>deze link</xsl:element> kom je op de intranetinformatiepagina van deze productgroep. Op deze pagina kun je ook de werkinstructie vinden.
-									<br/>
-									<br/>Heb je nog vragen, dan kun je contact opnemen met het Service Center van het Facilitair Bedrijf.</td>
 							</xsl:when>
-							<xsl:when test="$srtnotificatiecode = 'CUST19'">
+							<xsl:when test="$srtnotificatiecode='CUST19'">
-								<!-- Geen tekst voor aangeleverd en zal ook nooit worden genotificeerd! -->
 								<td class="tekst">
+								  Voor onderstaande abonnement graag het volgende nieuwe afleveradres in uw administratie doorvoeren:<br/>
+								  <xsl:value-of select="eigenaar/werkplek[myvolgnr='2']/plaats/regio/district/locatie/gebouw/afleveradres/bezoek_adres"/><br/>
+								  <xsl:value-of select="eigenaar/werkplek[myvolgnr='2']/plaats/regio/district/locatie/gebouw/afleveradres/bezoek_postcode"/>&#xA0;
+								  <xsl:value-of select="eigenaar/werkplek[myvolgnr='2']/plaats/regio/district/locatie/gebouw/afleveradres/bezoek_plaats"/>
 								</td>
 							</xsl:when>
-							<xsl:when test="$srtnotificatiecode = 'CUST20'">
+							<xsl:when test="$srtnotificatiecode='CUST20'">
 								<td class="tekst">Je hebt in Facilitor één of meerdere abonnementen op vakinhoudelijke informatie of nieuwsvoorziening op jouw naam staan (bijvoorbeeld het Financieel dagblad).
-									<br/>
+									<br/><br/>Een van deze abonnementen – zie onderstaande gegevens – is door het Inkoop Supportbureau inactief gemaakt. Dit gebeurt in de volgende gevallen:
-									<br/>Een van deze abonnementen – zie onderstaande gegevens – is door het Inkoop Supportbureau inactief gemaakt. Dit gebeurt in de volgende gevallen:
 									<table border="0" width="100%">
 										<tr>
 											<td class="tekst">1.</td>
@@ -9830,15 +9780,11 @@ function startAutoRefreshTim() {
 										</tr>
 									</table>
 									<br/>Deze e-mail is van één van bovenstaande acties een bevestiging.
-									<br/>
+									<br/><br/>Via <xsl:element name="a"><xsl:attribute name="href">http://<xsl:value-of select="$FacilitorRoot"/>/?JumpTo=appl/cnt/cnt_contract.asp%3Furole%3Dbo%26cnt_key%3D<xsl:value-of select="key"/></xsl:attribute>deze link</xsl:element> kom je rechtstreeks bij het contract voor dit abonnement in Facilitor. Hier kun je alle gegevens inzien die horen bij dit geannuleerde of vervallen abonnement.
-									<br/>Via <xsl:element name="a"><xsl:attribute name="href">http://<xsl:value-of select="$FacilitorRoot"/>/?JumpTo=appl/cnt/cnt_contract.asp%3Furole%3Dbo%26cnt_key%3D<xsl:value-of select="key"/></xsl:attribute>deze link</xsl:element> kom je rechtstreeks bij het contract voor dit abonnement in Facilitor. Hier kun je alle gegevens inzien die horen bij dit geannuleerde of vervallen abonnement.
+									<br/><br/>Wil je meer weten over abonnementen op vakinhoudelijke informatie en nieuwsvoorziening? Via <xsl:element name="a"><xsl:attribute name="href">https://digitalewerkplek.sharepoint.uwv.nl/services/informatievoorzieningen-archivering/Paginas/abonnement-nieuwsvakinformatie-bestellen.aspx</xsl:attribute>deze link</xsl:element> kom je op de intranetinformatiepagina van deze productgroep. Op deze pagina kun je ook de werkinstructie vinden.
-									<br/>
+									<br/><br/>Heb je nog vragen, dan kun je contact opnemen met het Service Center van het Facilitair Bedrijf.</td>
-									<br/>Wil je meer weten over abonnementen op vakinhoudelijke informatie en nieuwsvoorziening? Via <xsl:element name="a"><xsl:attribute name="href">https://digitalewerkplek.sharepoint.uwv.nl/services/informatievoorzieningen-archivering/Paginas/abonnement-nieuwsvakinformatie-bestellen.aspx</xsl:attribute>deze link</xsl:element> kom je op de intranetinformatiepagina van deze productgroep. Op deze pagina kun je ook de werkinstructie vinden.
-									<br/>
-									<br/>Heb je nog vragen, dan kun je contact opnemen met het Service Center van het Facilitair Bedrijf.</td>
 							</xsl:when>
-							<xsl:otherwise>
+							<xsl:otherwise/>
-							</xsl:otherwise>
 						</xsl:choose>
 					</tr>
 					<tr>
@@ -9857,26 +9803,18 @@ function startAutoRefreshTim() {
 									<td class="label">
 										<xsl:choose>
 											<xsl:when test="$srtnotificatiecode = 'CUST15'">
-												<br/><b>Verlengen of stopzetten abonnement</b>
+												<br/><b>Aflopen abonnement</b><xsl:text> </xsl:text>(<xsl:value-of select="eigenaar/naam_friendly"/> - <xsl:value-of select="omschrijving"/>)
-												<xsl:text> </xsl:text>(<xsl:value-of select="eigenaar/naam_friendly"/> - <xsl:value-of select="omschrijving"/>)</xsl:when>
+											</xsl:when>
-											<xsl:when test="$srtnotificatiecode = 'CUST16'">
+											<xsl:when test="$srtnotificatiecode = 'CUST16'"/>
-												<br/><b><i>Herinnering:</i><xsl:text> </xsl:text>verlengen of stopzetten abonnement</b>
+											<xsl:when test="$srtnotificatiecode = 'CUST17'"/>
-												<xsl:text> </xsl:text>(<xsl:value-of select="eigenaar/naam_friendly"/> - <xsl:value-of select="omschrijving"/>)</xsl:when>
+											<xsl:when test="$srtnotificatiecode = 'CUST18'"/>
-											<xsl:when test="$srtnotificatiecode = 'CUST17'">
-												<br/><b>Abonnement verlengd</b>
-												<xsl:text> </xsl:text>(<xsl:value-of select="eigenaar/naam_friendly"/> - <xsl:value-of select="omschrijving"/>)</xsl:when>
-											<xsl:when test="$srtnotificatiecode = 'CUST18'">
-												<br/><b>Abonnement stopgezet</b>
-												<xsl:text> </xsl:text>(<xsl:value-of select="eigenaar/naam_friendly"/> - <xsl:value-of select="omschrijving"/>)</xsl:when>
 											<xsl:when test="$srtnotificatiecode = 'CUST19'">
-												<!-- Geen tekst voor aangeleverd en zal ook nooit worden genotificeerd! -->
+												<br/><b>Adreswijziging abonnement</b><xsl:text> </xsl:text>(<xsl:value-of select="eigenaar/naam_friendly"/> - <xsl:value-of select="omschrijving"/>)
-												<br/><b>Doorvoering adreswijziging abonnement</b>
+											</xsl:when>
-												<xsl:text> </xsl:text>(<xsl:value-of select="eigenaar/naam_friendly"/> - <xsl:value-of select="omschrijving"/>)</xsl:when>
 											<xsl:when test="$srtnotificatiecode = 'CUST20'">
-												<br/><b>Abonnement gesloten/geannuleerd</b>
+												<br/><b>Abonnement gesloten/geannuleerd</b><xsl:text> </xsl:text>(<xsl:value-of select="eigenaar/naam_friendly"/> - <xsl:value-of select="omschrijving"/>)
-												<xsl:text> </xsl:text>(<xsl:value-of select="eigenaar/naam_friendly"/> - <xsl:value-of select="omschrijving"/>)</xsl:when>
+											</xsl:when>
-											<xsl:otherwise>
+											<xsl:otherwise/>
-											</xsl:otherwise>
 										</xsl:choose>
 									</td>
 								</tr>
@@ -9887,142 +9825,101 @@ function startAutoRefreshTim() {
 						<td colspan="2">
 							<table width="100%">
 								<tr>
-									<td class="label" colspan="2">
+									<td class="label" colspan="2"><br/><b>Algemene gegevens</b></td>
-										<br/><b>Algemene gegevens</b>
-									</td>
 								</tr>
 								<tr>
 									<td class="label" width="30%">Contractsoort:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="discipline/omschrijving"/></td>
-										<xsl:value-of select="discipline/omschrijving"/>
-									</td>
 								</tr>
 								<tr>
 									<td class="label">Beschrijving:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="omschrijving"/></td>
-										<xsl:value-of select="omschrijving"/>
-									</td>
 								</tr>
 								<tr>
 									<td class="label">Contractnummer:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="nummer_intern"/></td>
-										<xsl:value-of select="nummer_intern"/>
-									</td>
 								</tr>
 								<tr>
 									<td class="label">Extern nummer:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="substring-after(document, ': ')"/></td>
-										<xsl:value-of select="substring-after(document, ': ')"/>
-									</td>
 								</tr>
 								<tr>
 									<td class="label">Contractbeheerder:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="beheerder/naam_friendly"/></td>
-										<xsl:value-of select="beheerder/naam_friendly"/>
-									</td>
 								</tr>
 								<tr>
 									<td class="label">Contractafdeling:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="eigenaar_afd/naam6"/></td>
-										<xsl:value-of select="eigenaar_afd/naam6"/>
-									</td>
 								</tr>
 								<tr>
 									<td class="label">Abonnee:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="eigenaar/naam_friendly"/></td>
-										<xsl:value-of select="eigenaar/naam_friendly"/>
-									</td>
 								</tr>
 								<tr>
 									<td class="label">Afleveradres:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="eigenaar/werkplek[myvolgnr='2']/plaats/plaatsaanduiding"/></td>
-										<xsl:value-of select="eigenaar/werkplek[myvolgnr='2']/plaats/plaatsaanduiding"/>
-									</td>
 								</tr>
 								<tr>
-									<td class="label" colspan="2">
+									<td class="label" colspan="2"><xsl:text>&#xA0;</xsl:text></td>
-										<xsl:text>&#xA0;</xsl:text>
-									</td>
 								</tr>
 								<tr>
-									<td class="label" colspan="2">
+									<td class="label" colspan="2"><b>Opmerkingen</b></td>
-										<b>Opmerkingen</b>
-									</td>
 								</tr>
 								<tr>
-									<td colspan="2">
+									<td colspan="2"><xsl:value-of select="opmerking"/><br/></td>
-										<xsl:value-of select="opmerking"/>
+								</tr>
-									</td>
+								<tr>
+									<td class="label" colspan="2"><xsl:text>&#xA0;</xsl:text></td>
 								</tr>
 							</table>
 						</td>
 						<td colspan="2">
 							<table width="100%">
 								<tr>
-									<td class="label" colspan="2">
+									<td class="label" colspan="2"><br/><b>Data</b></td>
-										<br/><b>Data</b>
-									</td>
 								</tr>
 								<tr>
 									<td class="label" width="30%">Ingangsdatum:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="looptijd_van/datum"/></td>
-										<xsl:value-of select="looptijd_van/datum"/>
-									</td>
 								</tr>
 								<tr>
 									<td class="label">Einddatum:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="looptijd_tot/datum"/></td>
-										<xsl:value-of select="looptijd_tot/datum"/>
-									</td>
 								</tr>
 								<tr>
 									<td class="label">Opzegdatum:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="opzegdatum/datum"/></td>
-										<xsl:value-of select="opzegdatum/datum"/>
-									</td>
 								</tr>
 								<tr>
 									<td class="label">Rappeldatum:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="rappeldatum/datum"/></td>
-										<xsl:value-of select="rappeldatum/datum"/>
-									</td>
 								</tr>
 								<tr>
-									<td class="label" colspan="2">
+									<td class="label" colspan="2"><xsl:text>&#xA0;</xsl:text></td>
-										<xsl:text>&#xA0;</xsl:text>
-									</td>
 								</tr>
 								<tr>
-									<td class="label" colspan="2">
+									<td class="label" colspan="2"><b>Financiële gegevens</b></td>
-										<b>Financiële gegevens</b>
-									</td>
 								</tr>
 								<tr>
 									<td class="label" width="30%">Kostenplaats:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="kostenplaats/nr"/>-<xsl:value-of select="kostenplaats/omschrijving"/></td>
-										<xsl:value-of select="kostenplaats/nr"/>-<xsl:value-of select="kostenplaats/omschrijving"/></td>
 								</tr>
 								<tr>
 									<td class="label">Contractbedrag:</td>
-									<td class="value">
+									<td class="value">€ <xsl:value-of select="format-number(kosten, '0,00', 'european')"/></td>
-										€ <xsl:value-of select="format-number(kosten, '0,00', 'european')"/>
-									</td>
 								</tr>
 								<tr>
-									<td class="label" colspan="2">
+									<td class="label" colspan="2"><xsl:text>&#xA0;</xsl:text></td>
-										<xsl:text>&#xA0;</xsl:text>
-									</td>
 								</tr>
 								<tr>
-									<td class="label" colspan="2">
+									<td class="label" colspan="2"><b>Contractpartij</b></td>
-										<b>Contractpartij</b>
-									</td>
 								</tr>
 								<tr>
 									<td class="label" width="30%">Bedrijf:</td>
-									<td class="value">
+									<td class="value"><xsl:value-of select="bedrijf/naam"/></td>
-										<xsl:value-of select="bedrijf/naam"/>
+								</tr>
-									</td>
+								<tr>
+									<td class="label" colspan="2"><xsl:text>&#xA0;</xsl:text></td>
 								</tr>
 							</table>
 						</td>

CUST/VLKC/import/readsoft.xsl

@@ -37,7 +37,7 @@
     </xsl:choose>
   </xsl:variable>
   <xsl:variable name="btwpct">
-    <xsl:value-of select="Invoice/Fields/Field[@Name='BTW%']"/>
+    <xsl:value-of select="substring-before(Invoice/Fields/Field[@Name='BTW%'], '%')"/>
   </xsl:variable>
   <xsl:variable name="btwbedrag">
     <xsl:choose>
@@ -73,7 +73,7 @@
     <xsl:value-of select="Field[@Name='LI_Bedrag']"/>
   </xsl:variable>
   <xsl:variable name="li_btwpct">
-    <xsl:value-of select="Field[@Name='LI_BTWCode']"/>
+    <xsl:value-of select="substring-before(Field[@Name='LI_BTWCode'], '%')"/>
   </xsl:variable>
 <xsl:value-of select="$levnr"/>;<xsl:value-of select="$factnr"/>;<xsl:value-of select="$factdat"/>;<xsl:value-of select="$li_ordernr"/>;;;<xsl:value-of select="Field[@Name='LI_ArtikelOmschrijving']"/><xsl:if test="Field[@Name='LI_Aantal']!='' and Field[@Name='LI_EenheidsPrijs']!='' and Field[@Name='LI_EenheidsPrijs']!=Field[@Name='LI_Bedrag']"> (<xsl:value-of select="Field[@Name='LI_Aantal']"/> * <xsl:value-of select="Field[@Name='LI_EenheidsPrijs']"/>)</xsl:if>;;<xsl:value-of select="$li_kostprijs"/>;;<xsl:value-of select="$li_btwpct"/>;;;<xsl:value-of select="$levnaam"/> (<xsl:value-of select="$levnr"/>);;;;;;;<xsl:value-of select="$new_line"/>
 </xsl:for-each>

CUST/VLKC/xsl/cust.xsl

@@ -696,7 +696,10 @@ Kempen & Co N.V. is statutair gevestigd aan de Beethovenstraat 300, 1077 WZ
             <td width="18%"><br/><b><xsl:value-of select="//lcl/FAC/aanvrager"/>:</b></td>
             <td width="32%"><br/><xsl:value-of select="melding/voor/naam_friendly"/> </td>
             <td width="18%"><br/><b><xsl:value-of select="//lcl/FAC/kostenplaats"/>:</b></td>
-            <td width="32%"><br/><xsl:value-of select="kostenplaats/nr"/>&#xA0;<xsl:value-of select="kostenplaats/omschrijving"/></td>
+                                  <xsl:choose>
+                           <xsl:when test="$vlkc='vl'"><td width="32%"><br/><xsl:value-of select="kostenplaats/nr"/></td></xsl:when>
+                           <xsl:otherwise><td width="32%"><br/><xsl:value-of select="kostenplaats/nr"/>&#xA0;<xsl:value-of select="kostenplaats/omschrijving"/></td></xsl:otherwise>
+                     </xsl:choose>
           </tr>
           <tr>
             <td><br/><b><xsl:value-of select="//lcl/FAC/locatie"/>:</b></td>
@@ -1202,7 +1205,10 @@ Uw offerte dient uiterlijk 5 werkdagen na ontvangst van deze aanvraag ingediend
             <td width="18%"><br/><b><xsl:value-of select="//lcl/FAC/aanvrager"/>:</b></td>
             <td width="32%"><br/><xsl:value-of select="melding/voor/naam_friendly"/> </td>
             <td width="18%"><br/><b><xsl:value-of select="//lcl/FAC/kostenplaats"/>:</b></td>
-            <td width="32%"><br/><xsl:value-of select="kostenplaats/nr"/>&#xA0;<xsl:value-of select="kostenplaats/omschrijving"/></td>
+                      <xsl:choose>
+                           <xsl:when test="$vlkc='vl'"><td width="32%"><br/><xsl:value-of select="kostenplaats/nr"/></td></xsl:when>
+                           <xsl:otherwise><td width="32%"><br/><xsl:value-of select="kostenplaats/nr"/>&#xA0;<xsl:value-of select="kostenplaats/omschrijving"/></td></xsl:otherwise>
+                     </xsl:choose>
           </tr>
           <tr>
             <td><br/><b><xsl:value-of select="//lcl/FAC/locatie"/>:</b></td>

CUST/YKPN/SAML/default.asp

@@ -47,7 +47,8 @@
     }
     else
     {   // Automatisch naar het inlogscherm
-        __DoLog("SAML inlog niet gelukt (Login:" + uname);
+        var newUrl = rooturl + "/?sso=0";
+        __DoLog("SAML inlog niet gelukt (Login:" + uname + ")");
     }
     Response.Redirect(newUrl);
 %>

CUST/YKPN/export/bookVC.js

@@ -0,0 +1,265 @@
+// Deze functie stuurt informatie van videoconferentie boekingen naar Talk & Vision
+// Videoconferentie boekingen zijn reserveringen met als activiteit Videoconferentie
+// Bij nieuwe boekingen wordt de soap action BookMeeting aangeroepen als resultaat 
+// krijgen we dan een boekingsnummer terug. Dit nummer wordt opgeslagen in kenmerk vc_id
+// en wordt getracked bij de reservering.
+// Bij wijzigingen hebben we al een vc_id en roepen we de soap actie ModifyMeeting aan.
+
+
+function timestamp () {
+    var date = new Date();
+    var hours = date.getHours();
+    var days = date.getDay(); 
+    var minutes = date.getMinutes();
+    var ampm = hours >= 12 ? 'pm' : 'am';
+    hours = hours % 12;
+    hours = hours ? hours : 12; // the hour '0' should be '12'
+    minutes = minutes < 10 ? '0'+minutes : minutes;
+    var strTime = date + ' ' + hours + ':' + minutes + ' ' + ampm;
+    return strTime;
+}
+
+
+try {
+  var v_timestamp = timestamp();
+  WScript.Echo("Start bookVC.js om " + v_timestamp);
+  var udlstr = 'File Name=../oracle.udl';
+  var Oracle = new ActiveXObject("ADODB.Connection");
+  Oracle.Open(udlstr);
+
+  var sql = "BEGIN fac.initsession('NL'); END;";
+  Oracle.Execute(sql);
+
+  var objXMLHTTP = new ActiveXObject("MSXML2.ServerXMLHTTP.6.0")
+  var SXH_OPTION_SELECT_CLIENT_SSL_CERT = 3;
+  var SXH_PROXY_SET_PROXY = 2;
+  
+  var v_type = '';
+
+  debugFiddler = 0;
+  if (debugFiddler)
+  {
+    var SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = 13056
+    objXMLHTTP.setProxy(SXH_PROXY_SET_PROXY, "127.0.0.1:8888")
+    objXMLHTTP.setOption(2) = SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS
+  }
+
+  // first do the login part
+  var XMLReq = '<?xml version="1.0" encoding="utf-8"?>'
+              +'<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">'
+              +'  <soap:Body>'
+              +'    <Login xmlns="http://tempuri.org/">'
+              +'      <username>kpntest</username>'
+              +'      <password>waL3aejujz</password>'
+              +'    </Login>'
+              +'  </soap:Body>'
+              +'</soap:Envelope>';
+
+  objXMLHTTP.open("POST",
+                  "http://talkandvision.com//webservice/portal.asmx"
+                  );
+  //WScript.Echo("Set header");
+  objXMLHTTP.setRequestHeader("Content-Type", "text/xml; charset=utf-8");
+
+  WScript.Echo("Send XML");
+  objXMLHTTP.send(XMLReq);
+  WScript.Echo("XML received");
+  if (objXMLHTTP.status==200)
+  {
+    v_cookie = objXMLHTTP.getResponseHeader("Set-Cookie");
+    var xmlResp = new ActiveXObject("MSXML2.DOMDocument.6.0");
+    xmlResp.setProperty("SelectionNamespaces", 'xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:tv="http://tempuri.org/"');
+    xmlResp.resolveExternals = false; // van mij hoef je geen DTD's te controleren
+    xmlResp.validateOnParse = false; // van mij hoef je geen DTD's te controleren
+    xmlResp.loadXML(objXMLHTTP.responseText); // for parsing
+    var responseText = objXMLHTTP.responseText;  // for debugging
+    v_status = xmlResp.selectSingleNode("/soap:Envelope/soap:Body/tv:LoginResponse/tv:LoginResult");
+    
+    WScript.Echo("Gelukt, status = " + v_status.text);
+    
+    if (v_status.text == 'true') 
+    {
+      
+      sql = "SELECT res_reservering_key, SUM (vertrouwelijk) vertrouwelijk "
+          + "  FROM ykpn_v_vc_gegevens "  
+          + " WHERE last_upd > last_sync "
+    //      + "   AND last_upd < SYSDATE - 1/96 "    // we wachten een kwartier na de laatste update
+          + " GROUP BY res_reservering_key "
+          + " ORDER BY res_reservering_key";      
+      WScript.Echo("SQL reservering = " + sql);
+      var oRs_res = Oracle.Execute(sql);
+  
+      var v_res_key_prev = -1;
+      while (!oRs_res.eof)
+      {
+        v_reservering_key = oRs_res("res_reservering_key").Value;
+        v_vertrouwelijk = oRs_res("vertrouwelijk").Value;
+
+         sql = "SELECT t_van, "
+             + "       t_tot, "
+             + "       omschrijving, "
+             + "       ruimte, "
+             + "       contact_naam, "
+             + "       contact_telefoon, "
+             + "       contact_email, "
+             + "       res_reservering_key, "
+             + "       res_rsv_ruimte_key, "
+             + "       IdNummerTnF, "
+             + "       SIP_IP, "
+             + "       ipadres, "
+             + "       vc_id "
+             + "  FROM ykpn_v_vc_gegevens "  
+             + " WHERE res_reservering_key = " + v_reservering_key
+             + " ORDER BY res_rsv_ruimte_volgnr";      
+
+         WScript.Echo("SQL rsv ruimte = " + sql); 
+         var oRs_rsv = Oracle.Execute(sql);
+     
+         //var v_count = 0;
+         var v_res_key_prev = -1;
+         var v_xml_header = "";
+         var v_xml_footer = "";
+         var v_xml_body = "";
+         var v_xml_loc = "";
+         while (!oRs_rsv.eof)
+         {
+           v_van = oRs_rsv("t_van").Value;
+           v_tot = oRs_rsv("t_tot").Value;
+           v_omschrijving = oRs_rsv("omschrijving").Value;
+           v_ruimte = oRs_rsv("ruimte").Value;
+           v_contact_naam = oRs_rsv("contact_naam").Value;
+           v_contact_telefoon = oRs_rsv("contact_telefoon").Value;
+           v_contact_email = oRs_rsv("contact_email").Value;
+           v_rsv_ruimte_key = oRs_rsv("res_rsv_ruimte_key").Value;
+           v_idNummerTnF = oRs_rsv("idNummerTnF").Value;
+           v_sip_ip = oRs_rsv("sip_ip").Value;
+           v_ipadres = oRs_rsv("ipadres").Value; 
+           v_vc_id = oRs_rsv("vc_id").Value;       
+           
+           WScript.Echo("v_rsv_ruimte_key = " + v_rsv_ruimte_key); 
+           
+           if (v_vc_id) 
+           {
+              v_type = 'ModifyMeeting';
+           }
+           else 
+           {
+              v_type = 'BookMeeting';
+           }
+           
+           if (!v_xml_header) 
+           {
+             v_xml_header =   '<?xml version="1.0" encoding="utf-8"?> '
+                            + ' <soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">'
+                            + '   <soap:Body>'
+                            + '     <' + v_type + ' xmlns="http://tempuri.org/">'
+                            + '       <booking>'
+                            + '         <id>' + v_vc_id + '</id>'
+                            + '         <mcid>' + v_reservering_key + '</mcid>'
+                            + '         <start>' + v_van + '</start>'
+                            + '         <end>' + v_tot + '</end>'
+                            + '         <company>KPN</company>'
+                            + '         <title>' + v_omschrijving + '</title>'
+                            + '         <contactname>' + v_contact_naam + '</contactname>'
+                            + '         <contactphone>' + v_contact_telefoon + '</contactphone>'
+                            + '         <contactemail>' + v_contact_email + '</contactemail>'
+                            + '         <confidential>' + (v_vertrouwelijk==0?'false':'true') + '</confidential>'
+                            + '         <locations>';
+
+             v_xml_footer =   '         </locations>'
+                            + '       </booking>'
+                            + '     </' + v_type + '>'
+                            + '   </soap:Body>'
+                            + ' </soap:Envelope>';
+
+           }
+
+           v_xml_loc = v_xml_loc 
+                     + '          <Location>'
+                     + (!v_sip_ip?' <id>' + v_idNummerTnF + '</id>':'')
+                     + '            <contactphone></contactphone>'
+                     + '            <external>' + (v_sip_ip?'true':'false') + '</external>'
+                     + (v_sip_ip == 'IP'?'<extip>' + v_ipadres + '</extip>':'')
+                     + (v_sip_ip == 'SIP'?'<sip>' + v_ipadres + '</sip>':'')
+                     + '          </Location>';
+
+           oRs_rsv.MoveNext();
+
+         }
+
+         
+         var objXMLHTTP = new ActiveXObject("MSXML2.ServerXMLHTTP.6.0")
+         var SXH_OPTION_SELECT_CLIENT_SSL_CERT = 3;
+         var SXH_PROXY_SET_PROXY = 2;
+      
+         if (debugFiddler)
+         {
+           var SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = 13056
+           objXMLHTTP.setProxy(SXH_PROXY_SET_PROXY, "127.0.0.1:8888")
+           objXMLHTTP.setOption(2) = SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS
+         }
+
+         objXMLHTTP.open("POST",
+                         "http://talkandvision.com//webservice/portal.asmx"
+                         );
+
+         objXMLHTTP.setRequestHeader("Content-Type", "text/xml; charset=utf-8");
+         objXMLHTTP.setRequestHeader ("SOAPAction", "http://tempuri.org/" + v_type);
+         objXMLHTTP.setRequestHeader ("Cookie", v_cookie);
+         WScript.Echo("Cookie = " + v_cookie);
+
+         XMLReq = v_xml_header + v_xml_loc + v_xml_footer;         
+         
+         WScript.Echo("Send XML: " + XMLReq);
+         objXMLHTTP.send(XMLReq);
+         WScript.Echo("XML received");
+         if (objXMLHTTP.status==200)
+         {         
+           var responseText = objXMLHTTP.responseText;
+           WScript.Echo("Response.text:" + responseText);
+          var xmlResp = new ActiveXObject("MSXML2.DOMDocument.6.0");
+          xmlResp.setProperty("SelectionNamespaces", 'xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:tv="http://tempuri.org/"');
+          xmlResp.resolveExternals = false; // van mij hoef je geen DTD's te controleren
+          xmlResp.validateOnParse = false; // van mij hoef je geen DTD's te controleren
+          xmlResp.loadXML(objXMLHTTP.responseText); // for parsing
+          var responseText = objXMLHTTP.responseText;  // for debugging
+          v_result = xmlResp.selectSingleNode("/soap:Envelope/soap:Body/tv:" + v_type + "Response/tv:" + v_type + "Result");
+          if (v_result)
+          { 
+            if (v_type == 'BookMeeting')
+            {
+               WScript.Echo("v_vc_id:" + v_result.text);
+               sql = "BEGIN ykpn.set_vc_status(" + v_reservering_key + ",'" + v_result.text +"'); END;";
+               WScript.Echo("sql:" + sql);
+               Oracle.Execute(sql);
+            }
+            else
+            {
+               WScript.Echo("resultaat van update:" + v_result.text);
+               sql = "BEGIN ykpn.set_vc_status(" + v_reservering_key + ",'" + v_vc_id +"'); END;";
+               WScript.Echo("sql:" + sql);
+               Oracle.Execute(sql);               
+            }
+          }
+        }
+        else
+        {
+          WScript.Echo("Request = " + XMLReq);
+          var response = objXMLHTTP.responseXML;
+          WScript.Echo("Response = " + response);
+          WScript.Echo("Mislukt, status = " + objXMLHTTP.status);
+          WScript.Echo(objXMLHTTP.statusText);
+        }
+        
+        oRs_res.MoveNext();
+      }
+   }
+   }
+       
+}
+catch (e)
+{
+	 // WScript.Echo("Response.text" + responseText);
+    WScript.Echo("Serieuze fout in bookVC.js: " + e.description)
+    WScript.Quit(1);
+}

CUST/YKPN/export/gen_export_bezoekers_com.bat

@@ -0,0 +1,27 @@
+REM GEN_EXPORT_BEZOEKERS_COM.BAT
+REM
+REM Roept scripts aan die dagelijks uitgevoerd moeten worden
+REM
+REM Context : roep deze file aan indien nodig, of schedule deze
+REM Verseist: de randvoorwaarde voor het gebruik van gen_export
+REM
+REM $Revision$
+REM $Id$
+REM
+REM (c) 2009, SG facilitor, +31 (53) 4800710, helpdesk@sgfacilitor.nl
+REM
+
+REM Zorgt voor de notificatie richting de bezoeker op moment van aanmaken
+REM en bij wijzigingen.
+REM Zorgt voor SMS bericht met pin code 3 uur van tevoren 
+CALL ..\..\..\utils\gen_export\gen_export.bat BEZOEKERS_COM
+
+REM Meldt de bezoeker aan bij het Nedap systeem indien de bezoeker een parkeerplaats
+REM geboekt heeft die onder het Nedap toegangssysteem valt.
+cscript pincode2nedap.js >> pincode2nedap.log
+
+REM en dan doen we de communicatie naar Talk & Vision er ook maar direct bij
+cscript bookVC.js >> bookVC.log
+
+
+

CUST/YKPN/export/pincode2nedap.js

@@ -0,0 +1,175 @@
+
+function timestamp () {
+    var date = new Date();
+    var hours = date.getHours();
+    var days = date.getDay(); 
+    var minutes = date.getMinutes();
+    var ampm = hours >= 12 ? 'pm' : 'am';
+    hours = hours % 12;
+    hours = hours ? hours : 12; // the hour '0' should be '12'
+    minutes = minutes < 10 ? '0'+minutes : minutes;
+    var strTime = date + ' ' + hours + ':' + minutes + ' ' + ampm;
+    return strTime;
+}
+
+try {
+  var v_timestamp = timestamp();
+  WScript.Echo("Start pincode2nedap.js om " + v_timestamp);
+  var udlstr = 'File Name=../oracle.udl';
+  var Oracle = new ActiveXObject("ADODB.Connection");
+  WScript.Echo("Oracle.Open");
+  Oracle.Open(udlstr);
+
+  WScript.Echo("Initsession");
+  var sql = "BEGIN fac.initsession('NL'); END;";
+  Oracle.Execute(sql);
+  
+  sql =   "SELECT naam, "
+        + "       pincode, "
+        + "       v_van, "
+        + "       v_tot, "
+        + "       template, "
+        + "       countergroup, "
+        + "       bez_bezoekers_key "
+        + "  FROM ykpn_v_parkeerplaats_nedap "
+  WScript.Echo("sql:" + sql);
+  var oRs = Oracle.Execute(sql);
+  
+    while (!oRs.eof)
+    {
+        v_naam = oRs("naam").Value;
+        v_pincode = oRs("pincode").Value;
+        v_van = oRs("v_van").Value;
+        v_tot = oRs("v_tot").Value;
+        v_template = oRs("template").Value;
+        v_countergroup = oRs("countergroup").Value;
+        v_bez_bezoekers_key = oRs("bez_bezoekers_key").Value;
+
+        var XMLReq=  '<?xml version="1.0" encoding="utf-8"?>'
+                    +'<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">'
+                    +'  <soap:Body>'
+                    +'    <import xmlns="https://www.nedapstadstoegang.net/AeosImportService/">'
+                    +'      <usr>adminfacilitor</usr>'
+                    +'      <pwd>fac8463#t@ned</pwd>'
+                    +'      <dbname>aeosdb21</dbname>'
+                    +'      <items>'
+                    +'        <importItem>'
+                    +'          <key>import_function</key>'
+                    +'          <value>5</value>'
+                    +'        </importItem>'
+                    +'        <importItem>'
+                    +'          <key>carriertype</key>'
+                    +'          <value>2</value>'
+                    +'        </importItem>'
+                    +'        <importItem>'
+                    +'          <key>lastname</key>'
+                    +'          <value>'+v_naam+'</value>'
+                    +'        </importItem>'
+                    +'        <importItem>'
+                    +'          <key>personnelnr</key>'
+                    +'          <value>xy'+v_pincode+'</value>'
+                    +'        </importItem>'
+                    +'        <importItem>'
+                    +'          <key>arrivaldatetime</key>'
+                    +'          <value>'+v_van+'</value>'
+                    +'        </importItem>'
+                    +'        <importItem>'
+                    +'          <key>leavedatetime</key>'
+                    +'          <value>'+v_tot+'</value>'
+                    +'        </importItem>'
+                    +'        <importItem>'
+                    +'          <key>badgetype</key>'
+                    +'          <value>PIN</value>'
+                    +'        </importItem>'
+                    +'        <importItem>'
+                    +'          <key>badgenumber</key>'
+                    +'          <value>'+v_pincode+'</value>'
+                    +'        </importItem>'
+                    +'        <importItem>'
+                    +'          <key>template</key>'
+                    +'          <value>'+v_template+'</value>'
+                    +'        </importItem>'
+                    +'        <importItem>'
+                    +'          <key>countgroup</key>'
+                    +'          <value>'+v_countergroup+'</value>'
+                    +'        </importItem>'
+                    +'      </items>'
+                    +'    </import>'
+                    +'  </soap:Body>'
+                    +'</soap:Envelope>';
+
+        //WScript.Echo("Bericht = " + XMLReq);
+
+        var objXMLHTTP = new ActiveXObject("MSXML2.ServerXMLHTTP.6.0")
+        var SXH_OPTION_SELECT_CLIENT_SSL_CERT = 3;
+        var SXH_PROXY_SET_PROXY = 2;
+
+        debugFiddler = 0;
+        if (debugFiddler)
+        {
+          var SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = 13056
+          objXMLHTTP.setProxy(SXH_PROXY_SET_PROXY, "127.0.0.1:8888")
+          objXMLHTTP.setOption(2) = SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS
+        }
+
+        //WScript.Echo("Open connection");
+        objXMLHTTP.open("POST",
+                        "https://www.nedapstadstoegang.net/AeosImportService/service.asmx"
+                       );
+        //WScript.Echo("Set header");
+        objXMLHTTP.setRequestHeader("Content-Type", "text/xml; charset=utf-8");
+        objXMLHTTP.setRequestHeader ("SOAPAction", "https://www.nedapstadstoegang.net/AeosImportService/import");
+
+        //WScript.Echo("Send XML");
+        objXMLHTTP.send(XMLReq);
+        //WScript.Echo("XML received");
+        if (objXMLHTTP.status==200)
+        {
+          //WScript.Echo("Gelukt, status = " + objXMLHTTP.status);
+      
+          var xmlResp = new ActiveXObject("MSXML2.DOMDocument.6.0");
+          xmlResp.setProperty("SelectionNamespaces", 'xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:nedap="https://www.nedapstadstoegang.net/AeosImportService/"');
+          xmlResp.resolveExternals = false; // van mij hoef je geen DTD's te controleren
+          xmlResp.validateOnParse = false; // van mij hoef je geen DTD's te controleren
+          xmlResp.loadXML(objXMLHTTP.responseText); // for parsing
+          var responseText = objXMLHTTP.responseText;  // for debugging
+          v_nedap_id = xmlResp.selectSingleNode("/soap:Envelope/soap:Body/nedap:importResponse/nedap:importResult");
+          if (v_nedap_id)
+          {
+            WScript.Echo("v_nedap_id:" + v_nedap_id.text);
+            if (v_nedap_id.text >= 0)
+            {
+              sql = "BEGIN ykpn.set_nedap_status("+v_bez_bezoekers_key+",'" + v_nedap_id.text +"'); END;";
+              Oracle.Execute(sql);
+            }
+            else
+            {
+              WScript.Echo("Request = " + XMLReq);             
+            }
+          }                 
+          else
+          {
+            WScript.Echo("Request = " + XMLReq);
+            WScript.Echo("Response = " + responseText);
+            WScript.Echo("v_nedap_id: NULL");
+          }
+
+
+        }
+        else
+        {
+          WScript.Echo("Request = " + XMLReq);
+          WScript.Echo("Mislukt, status = " + objXMLHTTP.status);
+          WScript.Echo(objXMLHTTP.statusText);
+        }
+        
+        oRs.MoveNext();
+   }
+       
+}
+catch (e)
+{
+	 // WScript.Echo("Response.text" + responseText);
+    WScript.Echo("Serieuze fout in pincode2nedap.js: " + e.description)
+    WScript.Quit(1);
+}

UTILS/PutOrders/puo_settings.js

@@ -122,6 +122,16 @@ var settings = { // defaults voordat parameters gelezen zijn; fouten gaan nog al
                                         break;
                                 }
                             }
+                            else
+                            {
+                                if (n == "flexfilespath" && v.substr(0,1) == '*') // *_DATA wordt branch20163_DATA of FPlace5i_DATA
+                                {
+                                    var fso = new ActiveXObject("Scripting.FileSystemObject");
+                                    v = fso.GetAbsolutePathName(custabspath + "../../..")
+                                                 + v.substr(1) + "/" + customerId;
+                                    __Log("Path {0} is set to {1}".format(n, v));
+                                }
+                            }
                             this[n]= {v: v, t: t};
                             oRs.MoveNext();
                         }