Index: APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender/VanHoecke.cls.xml
===================================================================
diff -u -r53985 -r54052
--- APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender/VanHoecke.cls.xml	(.../VanHoecke.cls.xml)	(revision 53985)
+++ APPS/VKP/Offerte/impl/BesteldeOfferteMelder/MailVerzender/VanHoecke.cls.xml	(.../VanHoecke.cls.xml)	(revision 54052)
@@ -64,7 +64,7 @@
 
 	If Offerte.IsVhisie4(){
 		Set Inhoud = "NIEUWE VHISIE 4 WINKELKAR ! " _ $$$CRLF _Titel_$$$CRLF
-		Set Inhoud = $$$CRLF _Inhoud _$$$CRLF _..GeefVerwerkVhisie4OfferteLink(Offerte)
+		Set Inhoud = $$$CRLF _Inhoud _ $$$CRLF _..GeefVerwerkVhisie4OfferteLink(Offerte) _ ..GeefTekstVoorEdiNummer(Offerte, $$$CRLF) 
 		Do ..VoegToeTotaalBedragMelding(.Inhoud, Offerte)
 	} else {
 		Set Inhoud = $$$CRLF _ Titel _ $$$CRLF _$$$CRLF _ ..GeefVerwerkOfferteLink(Offerte.GeefID())
@@ -143,6 +143,21 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefTekstVoorEdiNummer">
+<FormalSpec>Offerte:APPS.VKP.Offerte,TekstPrefix:%String=""</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim TekstVoorEdiNummer As %String = ""
+	If $$$HasLength(Offerte.GeefKlantBestellingId()) {
+		Set TekstVoorEdiNummer = TekstPrefix _ "(EDI-nummer bekend bij handel/eindklant: "_Offerte.GeefEDINummerVoorEindklant()_")"
+	}
+	Else {
+		Set TekstVoorEdiNummer = TekstPrefix _ "(EDI-nummer: "_Offerte.GeefEDINummer()_")"
+	}
+	Quit TekstVoorEdiNummer
+]]></Implementation>
+</Method>
+
 <Method name="GeefVerwerkVhisie4OfferteLink">
 <FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>