Index: APPS/VKP/impl/Offerte.cls.xml
===================================================================
diff -u -r39115 -r39713
--- APPS/VKP/impl/Offerte.cls.xml	(.../Offerte.cls.xml)	(revision 39115)
+++ APPS/VKP/impl/Offerte.cls.xml	(.../Offerte.cls.xml)	(revision 39713)
@@ -180,6 +180,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsVhisie4">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $$$Not(..ExterneId="")
+]]></Implementation>
+</Method>
+
 <Method name="ZetBestelStatus">
 <FormalSpec>BestelStatus:APPS.VKP.Offerte.enu.BestelStatus,UpdateDatum:%TimeStamp</FormalSpec>
 <Implementation><![CDATA[
Index: APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender.cls.xml
===================================================================
diff -u -r37035 -r39713
--- APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender.cls.xml	(.../MailVerzender.cls.xml)	(revision 37035)
+++ APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender.cls.xml	(.../MailVerzender.cls.xml)	(revision 39713)
@@ -37,7 +37,11 @@
 	#dim BestelReferentie As %String = Offerte.GeefDocumentReferenties().OrderReferentie
 	#dim CommissieReferentie As %String = Offerte.GeefDocumentReferenties().CommissieReferentie
 	#dim Inhoud As %String = $$$CRLF _ Titel _ $$$CRLF _ $$$CRLF _ ..GeefVerwerkOfferteLink(Offerte.GeefID())
-	
+
+	If Offerte.IsVhisie4(){
+		Set Inhoud = $$$CRLF _ "NIEUWE VHISIE 4 WINKELKAR -- DIT IS WAARSCHIJNLIJK EEN TEST!" _ $$$CRLF _Inhoud
+	}
+
 	If $$$Not(Offerte.BestelOpmerking = "") {
 		Set Inhoud = Inhoud _ $$$CRLF _ $$$CRLF _ "Bestelopmerking : " _ $$$CRLF _ Offerte.BestelOpmerking	
 	}
Index: APPS/VKP/Offerte.cls.xml
===================================================================
diff -u -r39115 -r39713
--- APPS/VKP/Offerte.cls.xml	(.../Offerte.cls.xml)	(revision 39115)
+++ APPS/VKP/Offerte.cls.xml	(.../Offerte.cls.xml)	(revision 39713)
@@ -83,6 +83,11 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="IsVhisie4">
+<Abstract>1</Abstract>
+<ReturnType>%Boolean</ReturnType>
+</Method>
+
 <Method name="ZetBestelStatus">
 <Abstract>1</Abstract>
 <FormalSpec>BestelStatus:APPS.VKP.Offerte.enu.BestelStatus,UpdateDatum:%TimeStamp</FormalSpec>
Index: vhTest/Mock/APPS/VKP/Offerte.cls.xml
===================================================================
diff -u -r39115 -r39713
--- vhTest/Mock/APPS/VKP/Offerte.cls.xml	(.../Offerte.cls.xml)	(revision 39115)
+++ vhTest/Mock/APPS/VKP/Offerte.cls.xml	(.../Offerte.cls.xml)	(revision 39713)
@@ -153,6 +153,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsVhisie4">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("IsVhisie4")
+]]></Implementation>
+</Method>
+
 <Method name="KoppelAanOfferteVanHandel">
 <FormalSpec>OfferteVanHandel:APPS.VKP.Offerte</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("KoppelAanOfferteVanHandel",OfferteVanHandel)