Merge 2017.1 Gold F patches

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

APPL/API2/api2.inc

@@ -891,11 +891,14 @@ api2 = {
                             existing_includes[inckey].found = true;
                         }
                     }
-                    for (oldi in existing_includes)
+                    if (!incmodel.keyfield) // niet voor custom_fields
                     {
-                        if (!existing_includes[oldi].found)
+                        for (oldi in existing_includes)
                         {
-                            incmodel.REST_DELETE(params, oldi);
+                            if (!existing_includes[oldi].found)
+                            {
+                                incmodel.REST_DELETE(params, oldi);
+                            }
                         }
                     }
                 }

CUST/AKZA/custfunctions.wsc

@@ -153,9 +153,9 @@ mld_postsave = function (mld_melding, pResult)
 
       // Eerst controleren of de drive, folder en het bestand aanwezig zijn. Anders niet kopieeren.
       // Als het kopie al aanwezig is dan, dan niet opnieuw kopieeren
-      if (fso.DriveExists("d:") && fso.FolderExists("e:\\ptw") && fso.FileExists("e:\\ptw\\TEST.xlsm") && !fso.FileExists("e:\\ptw\\ptw-" + mld_melding + ".xlsm"))
+      if (fso.DriveExists("d:") && fso.FolderExists("d:\\ptw") && fso.FileExists("d:\\ptw\\PTW Master 20170701 (Dutch).xlsm") && !fso.FileExists("d:\\ptw\\ptw-" + mld_melding + ".xlsm"))
       {
-        fso.CopyFile("e:\\ptw\\PTW Master 20170701 (Dutch).xlsm", "e:\\ptw\\ptw-" + mld_melding + ".xlsm");
+        fso.CopyFile("d:\\ptw\\PTW Master 20170701 (Dutch).xlsm", "d:\\ptw\\ptw-" + mld_melding + ".xlsm");
 
               // TODO: Kenmerkwaarde werkvergunning (km961) vullen met locatie nieuwe bestand.
               // Controleren of er al een kenmerkmelding record aanwezig is voor kenmerk 961.

CUST/BLCC/export/gen_export_PWRBI.bat

@@ -2,7 +2,7 @@ REM GEN_EXPORT_PWRBI.BAT
 REM
 REM BLCC
 REM
-REM Exporteert 5-tal PowerBI-bestanden als CSV (BLCC#41180).
+REM Exporteert 6-tal PowerBI-bestanden als CSV (BLCC#41180 en BLCC#42928).
 REM
 REM Context : roep deze file aan indien nodig, of schedule deze
 REM Vereist : de randvoorwaarde voor het gebruik van gen_export
@@ -28,5 +28,7 @@ CALL ..\..\..\utils\gen_export\gen_export.bat PWRBI_ORDTRK
 
 CALL ..\..\..\utils\gen_export\gen_export.bat PWRBI_MLD
 
+CALL ..\..\..\utils\gen_export\gen_export.bat PWRBI_KOSTEN
+
 REM ================================================== transfer file to BLCC ftp
 ftp.exe -ni -s:ftp_blcc2pwrbi.scr

CUST/KFSG/xsl/KFSG.xsl

@@ -2685,8 +2685,8 @@ Wij verzoeken u de met de uitvoeringsdatum en de werkzaamheden gespecificeerde f
 						<td style="width:33%;text-align:left;font-size: 12pt;padding-left:10px;padding-top:5px">
 						<xsl:value-of select="GASTHEER"/><br/>
 						<xsl:value-of select="VOORZIENING_AANTAL"/>&#160;<xsl:value-of select="VOORZIENING_PRODUCT"/><br/>
-						<xsl:value-of select="substring-before(VAN,'T')"/>&#160;<xsl:value-of select="substring-after(VAN,'T')"/><br/>
+						<xsl:value-of select="substring(VAN,9,2)"/>-<xsl:value-of select="substring(VAN,6,2)"/>-<xsl:value-of select="substring(VAN,1,4)"/><br/>
-						<xsl:value-of select="substring(substring-after(TOT,'T'),1,5)"/><br/>
+						<xsl:value-of select="substring(substring-after(VAN,'T'),1,5)"/>-<xsl:value-of select="substring(substring-after(TOT,'T'),1,5)"/><br/>
 						<xsl:choose>
 							<xsl:when test="substring(RES_OMSCHRIJVING, 1, 5) = 'Afl: '">
 						 		<xsl:value-of select="GEBOUW"/>-<xsl:value-of select="substring-after(RES_OMSCHRIJVING, 'Afl: ')"/><br/>
@@ -3070,6 +3070,35 @@ Wij verzoeken u de met de uitvoeringsdatum en de werkzaamheden gespecificeerde f
     </table>
   </xsl:template>	
 
+  <xsl:template match="reservering" mode="outlook">
+BEGIN:VCALENDAR
+VERSION:2.0
+METHOD:REQUEST
+BEGIN:VEVENT
+UID:FCLTRES<xsl:value-of select="rsv_ruimte/key"/>
+DTSTAMP:<xsl:value-of select="datum/utcdatum"/>T<xsl:value-of select="datum/utctijd"/>Z
+DTSTART:<xsl:value-of select="rsv_ruimte/van/utcdatum"/>T<xsl:value-of select="rsv_ruimte/van/utctijd"/>Z
+DTEND:<xsl:value-of select="rsv_ruimte/tot/utcdatum"/>T<xsl:value-of select="rsv_ruimte/tot/utctijd"/>Z
+SUMMARY;ENCODING=QUOTED-PRINTABLE:<xsl:value-of select="rsv_ruimte/res_activiteit/omschrijving"/>: <xsl:value-of select="rsv_ruimte/id"/>-<xsl:value-of select="rsv_ruimte/omschrijving"/>
+DESCRIPTION;ENCODING=QUOTED-PRINTABLE:<xsl:value-of select="rsv_ruimte/res_activiteit/opmerking"/>
+LOCATION;ENCODING=QUOTED-PRINTABLE:<xsl:value-of select="rsv_ruimte/res_ruimte/nr"/>
+ORGANIZER;CN=<xsl:value-of select="rsv_ruimte/contact_user/naam_full"/>:MAILTO:reservering-noreply@facilitor.nl
+<xsl:for-each select="rsv_ruimte/afspraak/bezoeker">
+ATTENDEE;ROLE=REQ-PARTICIPANT;PARTSTAT=TENTATIVE;CN=<xsl:value-of select="naam"/>
+<xsl:if test="string(bedrijf)!=''"> (<xsl:value-of select="bedrijf"/>)</xsl:if>:MAILTO:<xsl:if test="boolean(intern_user)">
+<xsl:value-of select="intern_user/email"/></xsl:if></xsl:for-each>
+SEQUENCE:<xsl:for-each select="rsv_ruimte/tracking/track">
+           <xsl:sort select="./datum/timestamp" data-type="number" order="descending"/>
+           <xsl:if test="position() = 1">
+             <xsl:value-of select="./datum/timestamp"/>
+           </xsl:if>
+         </xsl:for-each>
+PRIORITY:5
+END:VEVENT
+END:VCALENDAR
+  </xsl:template>
+
+
 	<xsl:template match="rapport">
    <html>
     <xsl:call-template name="htmlhead"/>
@@ -3944,4 +3973,4 @@ Wij verzoeken u de met de uitvoeringsdatum en de werkzaamheden gespecificeerde f
    </html>
 	</xsl:template>
 </xsl:stylesheet>
-<!-- Stylesheet edited using Stylus Studio - (c) 2004-2009. Progress Software Corporation. All rights reserved. --><!-- Stylesheet edited using Stylus Studio - (c) 2004-2009. Progress Software Corporation. All rights reserved. -->
+<!-- Stylesheet edited using Stylus Studio - (c) 2004-2009. Progress Software Corporation. All rights reserved. --><!-- Stylesheet edited using Stylus Studio - (c) 2004-2009. Progress Software Corporation. All rights reserved. --><!-- Stylesheet edited using Stylus Studio - (c) 2004-2009. Progress Software Corporation. All rights reserved. --><!-- Stylesheet edited using Stylus Studio - (c) 2004-2009. Progress Software Corporation. All rights reserved. -->