Index: vhUnitTest/EXT/Unishop/PurchaseOrder001/BestandVerwerker/VerwerkBestand/Test.cls.xml
===================================================================
diff -u -r53993 -r54219
--- vhUnitTest/EXT/Unishop/PurchaseOrder001/BestandVerwerker/VerwerkBestand/Test.cls.xml	(.../Test.cls.xml)	(revision 53993)
+++ vhUnitTest/EXT/Unishop/PurchaseOrder001/BestandVerwerker/VerwerkBestand/Test.cls.xml	(.../Test.cls.xml)	(revision 54219)
@@ -164,7 +164,8 @@
 	Do ..Arrange()
 	
 	Set ..Resultaat.Exceptie = ##class(TECH.Exceptions.GeneralErrorException).%New($$$DummyString)
-	
+
+	Do ..MailMock.VerwachtMethodCall("VoegToeOntvanger", "ICT_Meldingen@vanhoecke.be")
 	Do ..MailMock.VerwachtMethodCall("ZetOnderwerp","EDI bestelling van '"_..DummyKlant.GeefNaam()_"' ontvangen, maar er was een probleem, dus de klant krijgt zijn goederen wellicht niet!")
 	Do ..MailMock.VerwachtMethodCall("ZetInhoud","Er werd een EDI bestelling van '"_..DummyKlant.GeefNaam()_"' ontvangen met volgend probleem, dat je aan ICT moet melden, tenzij je dit probleem vanuit BIDI kan oplossen! :"_$$$CRLF_"Bestand:'"_ ..BestandVolledigeNaam _"'. "_$$$CRLF_..Resultaat.Exceptie.ToString())
 	
@@ -203,7 +204,6 @@
 	Set ..MailMock = ##class(vhTest.Mock.TECH.Mail.Mail).%New()
 	Do ..MailMock.VerwachtMethodCall("ZetVerzender", $$$SystemMail("EDI Bestelling"))
 	Do ..MailMock.VerwachtMethodCall("VoegToeOntvanger", ..DummyGebruiker.GeefEmailAdres())
-	Do ..MailMock.VerwachtMethodCall("VoegToeOntvanger", "ICT_Meldingen@vanhoecke.be")
 	Set ..MailApiMock = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
 	Do ..MailApiMock.VerwachtMethodCall("VerstuurMail", ..MailMock)
 	Do ..MailApiMock.VerwachtMethodCall("MaakNieuwMail").DanReturn(..MailMock)
Index: EXT/Unishop/PurchaseOrder001/BestandVerwerker.cls.xml
===================================================================
diff -u -r53993 -r54219
--- EXT/Unishop/PurchaseOrder001/BestandVerwerker.cls.xml	(.../BestandVerwerker.cls.xml)	(revision 53993)
+++ EXT/Unishop/PurchaseOrder001/BestandVerwerker.cls.xml	(.../BestandVerwerker.cls.xml)	(revision 54219)
@@ -120,12 +120,12 @@
 	Do ##class(TECH.Context.RuntimeContext).Instance().ZetPersonalityID(##class(DOM.common.enu.Personality).VanHoecke())
 	Do ##class(TECH.Context.RuntimeContext).Instance().ZetGebruikerID($$$SystemUser)
 	Do Mail.VoegToeOntvanger(Klant.GeefInterneVerantwoordelijke().GeefEmailAdres())
-	Do Mail.VoegToeOntvanger("ICT_Meldingen@vanhoecke.be")
 	#dim Inhoud As %String = "Er werd een EDI bestelling van '"_Klant.GeefNaam()_"' ontvangen"
 	#dim Onderwerp As %String = "EDI bestelling van '"_Klant.GeefNaam()_"' ontvangen"
 	If $$$HasLength(ProbleemTekst){
 		Set Inhoud = Inhoud _" met volgend probleem, dat je aan ICT moet melden, tenzij je dit probleem vanuit BIDI kan oplossen! :"_ $$$CRLF _ ProbleemTekst
 		Set Onderwerp = Onderwerp_", maar er was een probleem, dus de klant krijgt zijn goederen wellicht niet!"
+		Do Mail.VoegToeOntvanger("ICT_Meldingen@vanhoecke.be")
 	} Else {
 		Set Inhoud = Inhoud _ " en ze werd goed verwerkt"
 	}