Index: WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository.cls.xml
===================================================================
diff -u -r36450 -r36541
--- WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository.cls.xml	(.../VerzendingMogelijkheidRepository.cls.xml)	(revision 36450)
+++ WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository.cls.xml	(.../VerzendingMogelijkheidRepository.cls.xml)	(revision 36541)
@@ -18,6 +18,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerzendBerekenFoutenIndienNodig">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<Implementation><![CDATA[	Do ##class(WSimpl.EC.Unishop.InternationaleZending.BerekeningFoutenMailer).%New().VerzendBerekeningFouten(OfferteID)
+]]></Implementation>
+</Method>
+
 <Method name="GeefViaOfferteIDEnVerzendingMogelijkheidID">
 <FormalSpec>OfferteID:%String,VerzendingMogelijkheidID:%Integer</FormalSpec>
 <ReturnType>TECH.Persistent</ReturnType>
Index: WS/EC/ExterneVerkoopService.cls.xml
===================================================================
diff -u -r36128 -r36541
--- WS/EC/ExterneVerkoopService.cls.xml	(.../ExterneVerkoopService.cls.xml)	(revision 36128)
+++ WS/EC/ExterneVerkoopService.cls.xml	(.../ExterneVerkoopService.cls.xml)	(revision 36541)
@@ -110,7 +110,9 @@
 
 	Do ##class(APPS.EC.impl.ExterneVerkoopService).%New().BestelOfferte(OfferteID,..GeefKlantID(),..GeefPersonalityID())
 	
-	Do ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New().VerwijderViaOfferteID(OfferteID)
+	#dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
+	Do VerzendingMogelijkheidRepository.VerwijderViaOfferteID(OfferteID)
+	Do VerzendingMogelijkheidRepository.VerzendBerekenFoutenIndienNodig(OfferteID)
 ]]></Implementation>
 </Method>
 
Index: vhTest/Mock/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml
===================================================================
diff -u
--- vhTest/Mock/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(revision 0)
+++ vhTest/Mock/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(revision 36541)
@@ -0,0 +1,34 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="BestaatViaOfferteID">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("BestaatViaOfferteID",OfferteID)
+]]></Implementation>
+</Method>
+
+<Method name="GeefViaOfferteID">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefViaOfferteID",OfferteID)
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderViaOfferteID">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwijderViaOfferteID",OfferteID)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/WSimpl/EC/Unishop/InternationaleZending/BerekeningFoutenMailer/VerzendBerekeningFouten/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/EC/Unishop/InternationaleZending/BerekeningFoutenMailer/VerzendBerekeningFouten/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/EC/Unishop/InternationaleZending/BerekeningFoutenMailer/VerzendBerekeningFouten/Test.cls.xml	(revision 36541)
@@ -0,0 +1,47 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.EC.Unishop.InternationaleZending.BerekeningFoutenMailer.VerzendBerekeningFouten.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Mail wordt gemaakt en verzonden als er BerekeningFouten bestaan voor Offerte">
+<Implementation><![CDATA[
+	#Dim DummyOfferteID As %String = "1"
+	
+	#Dim MailAPIMock As vhTest.Mock.TECH.Mail.MailAPI = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
+	#Dim MailDummy As TECH.Mail.Mail = ##class(TECH.Mail.impl.Mail).%New()
+	Do MailAPIMock.VerwachtMethodCall("MaakNieuwMail").DanReturn(MailDummy)
+	Do MailAPIMock.VerwachtMethodCall("VerstuurMail",MailDummy).DanDoeNiks()
+	
+	#Dim BerekeningFoutenRepositoryMock As vhTest.Mock.WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository = ##class(vhTest.Mock.WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository).%New()
+	Do BerekeningFoutenRepositoryMock.VerwachtMethodCall("BestaatViaOfferteID",DummyOfferteID).DanReturn($$$True)
+	
+	#Dim BerekeningFouten As WSdata.EC.ExterneVerkoop.BerekeningFouten.BerekeningFouten	= ##class(WSdata.EC.ExterneVerkoop.BerekeningFouten.BerekeningFouten).%New()
+	Do BerekeningFoutenRepositoryMock.VerwachtMethodCall("GeefViaOfferteID",DummyOfferteID).DanReturn(BerekeningFouten)
+	
+	#Dim BerekeningFoutenMailer As WSimpl.EC.Unishop.InternationaleZending.BerekeningFoutenMailer = ##class(WSimpl.EC.Unishop.InternationaleZending.BerekeningFoutenMailer).%New(MailAPIMock,BerekeningFoutenRepositoryMock)
+	Do BerekeningFoutenMailer.VerzendBerekeningFouten(DummyOfferteID)
+
+	Do MailAPIMock.Verifieer()
+	Do BerekeningFoutenRepositoryMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Mail wordt niet verzonden als er geen BerekeningFouten bestaan voor Offerte">
+<Implementation><![CDATA[
+	#Dim DummyOfferteID As %String = "1"
+	
+	#Dim MailAPIMock As vhTest.Mock.TECH.Mail.MailAPI = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
+
+	#Dim BerekeningFoutenRepositoryMock As vhTest.Mock.WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository = ##class(vhTest.Mock.WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository).%New()
+	Do BerekeningFoutenRepositoryMock.VerwachtMethodCall("BestaatViaOfferteID",DummyOfferteID)
+
+	#Dim BerekeningFoutenMailer As WSimpl.EC.Unishop.InternationaleZending.BerekeningFoutenMailer = ##class(WSimpl.EC.Unishop.InternationaleZending.BerekeningFoutenMailer).%New(MailAPIMock,BerekeningFoutenRepositoryMock)
+	Do BerekeningFoutenMailer.VerzendBerekeningFouten(DummyOfferteID)
+	
+	Do BerekeningFoutenRepositoryMock.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml
===================================================================
diff -u -r36529 -r36541
--- WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(.../BerekeningFoutenRepository.cls.xml)	(revision 36529)
+++ WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(.../BerekeningFoutenRepository.cls.xml)	(revision 36541)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository">
-<Super>TECH.Persistentie.impl.Repository</Super>
+<Super>TECH.Persistentie.impl.Repository,TECH.Mockable</Super>
 
 <Parameter name="DataClassName">
 <Type>%String</Type>
Index: vhTest/Fake/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml
===================================================================
diff -u
--- vhTest/Fake/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(revision 0)
+++ vhTest/Fake/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(revision 36541)
@@ -0,0 +1,32 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository</Super>
+
+<Method name="BestaatViaOfferteID">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefViaOfferteID">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderViaOfferteID">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/EC/Unishop/InternationaleZending/BerekeningFoutenMailer.cls.xml
===================================================================
diff -u
--- WSimpl/EC/Unishop/InternationaleZending/BerekeningFoutenMailer.cls.xml	(revision 0)
+++ WSimpl/EC/Unishop/InternationaleZending/BerekeningFoutenMailer.cls.xml	(revision 36541)
@@ -0,0 +1,51 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.EC.Unishop.InternationaleZending.BerekeningFoutenMailer">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="MailAPI">
+<Type>TECH.Mail.MailAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="BerekeningFoutenRepository">
+<Type>WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>MailAPI:TECH.Mail.MailAPI,BerekeningFoutenRepository:WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..MailAPI = $$$Inject(MailAPI,##class(TECH.Context).Instance().GeefMailAPI())
+	Set ..BerekeningFoutenRepository = $$$Inject(BerekeningFoutenRepository, ##class(WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository).%New())
+
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="VerzendBerekeningFouten">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<Implementation><![CDATA[
+	If ..BerekeningFoutenRepository.BestaatViaOfferteID(OfferteID)
+	{
+		#Dim BerekeningFouten As WSdata.EC.ExterneVerkoop.BerekeningFouten.BerekeningFouten = ..BerekeningFoutenRepository.GeefViaOfferteID(OfferteID)
+		#dim Mail As TECH.Mail.Mail = ..MailAPI.MaakNieuwMail()
+		Do Mail.ZetOnderwerp("TAX Export unishop : Kon geen transportkost bepalen voor offerte " _OfferteID)
+		Do Mail.ZetVerzender("webshop@vanhoecke.be")
+		Do Mail.VoegToeOntvanger($$$SystemMail("OV"))
+		Do Mail.VoegToeOntvangerCC("KCA@VanHoecke.be")
+		Do Mail.ZetIsHTML($$$False)
+		Do Mail.ZetInhoud(BerekeningFouten.Foutmeldingen)
+		Do Mail.ZetOmleiden($$$False)
+		Do ..MailAPI.VerstuurMail(Mail)
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>