Index: vhTest/Mock/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml
===================================================================
diff -u -r54141 -r56252
--- vhTest/Mock/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml	(.../TransportdataVoorKlantBepaler.cls.xml)	(revision 54141)
+++ vhTest/Mock/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml	(.../TransportdataVoorKlantBepaler.cls.xml)	(revision 56252)
@@ -8,6 +8,13 @@
 <Super>APPS.TRANSP.impl.TransportService.Nacalculator.TransportdataVoorKlantBepaler,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
+<Method name="%OnNew">
+<FormalSpec>VerkoopApi:DOM.VKP.VerkoopAPI=""</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="BepaalTransportData">
 <FormalSpec>KlantId:DOM.common.PartijID</FormalSpec>
 <ReturnType>APPS.TRANSP.dto.NacalculatieLijst</ReturnType>
Index: vhDeploy/D20190417xNacalculatieEmailAdressenHaefeleNL.cls.xml
===================================================================
diff -u
--- vhDeploy/D20190417xNacalculatieEmailAdressenHaefeleNL.cls.xml	(revision 0)
+++ vhDeploy/D20190417xNacalculatieEmailAdressenHaefeleNL.cls.xml	(revision 56252)
@@ -0,0 +1,37 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20190417xNacalculatieEmailAdressenHaefeleNL">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Arjan en Alex als ontvanger van de mails instellen</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim LaatstVerwerkteRit As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.TRANSP.TransportService.Nacalculatie.LaatstVerwerkteRit")
+	
+	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("APPS.TRANSP.TransportService.NacalculatieHAEFELENEDERLAND.LaatstVerwerkteRit", LaatstVerwerkteRit)
+	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("APPS.TRANSP.TransportService.NacalculatieHAEFELENEDERLAND.MailOntvangers", $lb("aco@vanhoecke.be","agl@vanhoecke.be"))
+	
+	Do ..VerwijderConfigItem("APPS.TRANSP.TransportService.Nacalculatie.LaatstVerwerkteRit")
+	Do ..VerwijderConfigItem("APPS.TRANSP.TransportService.Nacalculatie.MailOntvangers")
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderConfigItem">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Sleutel:%String</FormalSpec>
+<Implementation><![CDATA[
+	If (##class(TECH.Config.ConfigMgr).Instance().BestaatSleutel(Sleutel))
+	{
+		Do ##class(TECH.Config.ConfigMgr).Instance().WisSleutel(Sleutel)
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml
===================================================================
diff -u -r54460 -r56252
--- APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml	(.../TransportdataVoorKlantBepaler.cls.xml)	(revision 54460)
+++ APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml	(.../TransportdataVoorKlantBepaler.cls.xml)	(revision 56252)
@@ -28,14 +28,33 @@
 <Default>28.68</Default>
 </Parameter>
 
+<Property name="VerkoopApi">
+<Type>DOM.VKP.VerkoopAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>VerkoopApi:DOM.VKP.VerkoopAPI=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..VerkoopApi = $$$Inject(VerkoopApi, ##class(DOM.VKP.impl.VerkoopAPI).%New())
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="BepaalTransportData">
 <FormalSpec>KlantId:DOM.common.PartijID</FormalSpec>
 <ReturnType>APPS.TRANSP.dto.NacalculatieLijst</ReturnType>
 <Implementation><![CDATA[
 	#dim Rit As DOM.TRANSP.impl.DataM.DataMRit
 	#dim NacalculatieDto As APPS.TRANSP.dto.Nacalculatie
+	#dim KlantNaam As %String = ##class(TECH.StringUtils).StringStrippenVanLeestekensSpatiesTabs(..VerkoopApi.GeefKlant(KlantId).GeefNaam())
 	
-	#dim LaatstVerwerkteRit As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.TRANSP.TransportService.Nacalculatie.LaatstVerwerkteRit")
+	#dim LaatstVerwerkteRit As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.TRANSP.TransportService.Nacalculatie"_KlantNaam_".LaatstVerwerkteRit")
 	#dim RitId As %String = LaatstVerwerkteRit
 	
 	Set Resultaat = ##class(APPS.TRANSP.dto.NacalculatieLijst).%New()
@@ -69,7 +88,7 @@
 		Set LaatstVerwerkteRit = RitId
 		}
 	}
-	Do ##class(TECH.Config.ConfigMgr).Instance().SetString("APPS.TRANSP.TransportService.Nacalculatie.LaatstVerwerkteRit",LaatstVerwerkteRit)
+	Do ##class(TECH.Config.ConfigMgr).Instance().SetString("APPS.TRANSP.TransportService.Nacalculatie"_KlantNaam_".LaatstVerwerkteRit",LaatstVerwerkteRit)
 	Quit Resultaat
 ]]></Implementation>
 </Method>
Index: APPS/TRANSP/impl/TransportService/Nacalculator.cls.xml
===================================================================
diff -u -r56248 -r56252
--- APPS/TRANSP/impl/TransportService/Nacalculator.cls.xml	(.../Nacalculator.cls.xml)	(revision 56248)
+++ APPS/TRANSP/impl/TransportService/Nacalculator.cls.xml	(.../Nacalculator.cls.xml)	(revision 56252)
@@ -69,9 +69,9 @@
 
 	Try {
 		//Data ophalen
-		#dim VorigeLaatstVerwerkteRit As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.TRANSP.TransportService.Nacalculatie.LaatstVerwerkteRit")
+		#dim VorigeLaatstVerwerkteRit As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.TRANSP.TransportService.Nacalculatie"_KlantNaam_".LaatstVerwerkteRit")
 		#dim RitDataLijst As APPS.TRANSP.dto.NacalculatieLijst = ..TransportdataVoorKlantBepaler.BepaalTransportData(KlantId)
-		#dim HuidigeLaatstVerwerkteRit As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.TRANSP.TransportService.Nacalculatie.LaatstVerwerkteRit")
+		#dim HuidigeLaatstVerwerkteRit As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.TRANSP.TransportService.Nacalculatie"_KlantNaam_".LaatstVerwerkteRit")
 		//csv maken
 		Do ..RapportGenerator.MaakBestand(..RapportDataFactory.MaakRapportData(RitDataLijst, Bestandsnaam))