Index: vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestKisch.cls.xml
===================================================================
diff -u -r29059 -r45862
--- vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestKisch.cls.xml	(.../TestKisch.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestKisch.cls.xml	(.../TestKisch.cls.xml)	(revision 45862)
@@ -23,7 +23,7 @@
 
 <Method name="GeefKlantData">
 <Private>1</Private>
-<ReturnType>DOM.VKP.impl.KlantData</ReturnType>
+<ReturnType>DOM.common.dto.KlantData</ReturnType>
 <Implementation><![CDATA[	Quit ##class(vhTest.Utils.DOM.common.dto.KlantData.Kisch).%New()
 ]]></Implementation>
 </Method>
Index: vhUnitTest/APPS/VKP/Offerte/impl/BesteldeOfferteMelder/HttpVerzender/dto/OfferteGenerator/Test.cls.xml
===================================================================
diff -u -r45763 -r45862
--- vhUnitTest/APPS/VKP/Offerte/impl/BesteldeOfferteMelder/HttpVerzender/dto/OfferteGenerator/Test.cls.xml	(.../Test.cls.xml)	(revision 45763)
+++ vhUnitTest/APPS/VKP/Offerte/impl/BesteldeOfferteMelder/HttpVerzender/dto/OfferteGenerator/Test.cls.xml	(.../Test.cls.xml)	(revision 45862)
@@ -14,37 +14,39 @@
 <Method name="Test: GeefOfferteDto">
 <Implementation><![CDATA[
 	#dim RandomWinkelkarId As %String = "123"
-	#dim RandomPersonalityId As %String = "12"
-	#dim RandomKlantId As %String = "12345"
+	#dim KlantPersonalityId As %String = "12"
+	#dim KlantIdBijKlantPersonality As %String = "12345"
 	#dim OrderReferentie As %String = "OrderReferentie"
 	#dim LeverDatum As %String = "LeverDatum"
 	#dim BestelOpmerking As %String = "BestelOpmerking"
 	#dim BestelDatum As %Date = $$INTDATE^vhLib.DataTypes("13.08.2016")
 	#dim Url As %String = "Url"
 	#dim KlantNaam As %String = "KlantNaam"
 	#dim KlantCode As %String = "KlantCode"
-	#dim EDINummerVoorEindklant As %String = "EDINummerVoorEindklant"
+	#dim EdiNummer As %String = "EdiNummer"
 
-	#dim VanHoeckePersonality As DOM.common.VanHoeckePersonality = ##class(DOM.common.VanHoeckePersonality).Instance()
-	Do ##class(TECH.Context.RuntimeContext).Instance().ZetPersonalityID(RandomPersonalityId)
+	#dim LeverancierPersonality As DOM.common.Personality = ##class(DOM.common.VanHoeckePersonality).Instance()
+	Do ##class(TECH.Context.RuntimeContext).Instance().ZetPersonalityID(KlantPersonalityId)
 	
-	#dim PersonalityStub As vhTest.Mock.DOM.common.Personality = ##class(vhTest.Mock.DOM.common.Personality).%New()
-	Do PersonalityStub.IndienMethodCall("GeefTaal").DanReturn(##class(DOM.enu.Taal).Frans())
-
+	#dim KlantPersonalityStub As vhTest.Mock.DOM.common.Personality = ##class(vhTest.Mock.DOM.common.Personality).%New()
+	Do KlantPersonalityStub.IndienMethodCall("GeefTaal").DanReturn(##class(DOM.enu.Taal).Frans())
+	Do KlantPersonalityStub.IndienMethodCall("GeefID").DanReturn(KlantPersonalityId)
+	
 	#dim DocumentReferenties As DOM.VKP.DocumentReferenties = ##class(DOM.VKP.DocumentReferenties).%New()
 	Set DocumentReferenties.OrderReferentie = OrderReferentie
 	
 	#dim OfferteStub As vhTest.Mock.APPS.VKP.Offerte = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	Do OfferteStub.IndienMethodCall("GeefWinkelkarID").DanReturn(RandomWinkelkarId)
-	Do OfferteStub.IndienMethodCall("GeefEDINummerVoorEindklant").DanReturn(EDINummerVoorEindklant)
-	Do OfferteStub.IndienMethodCall("GeefKlantID").DanReturn(RandomKlantId)
+	Do OfferteStub.IndienMethodCall("GeefEDINummerVoorEindklant").DanReturn(EdiNummer)
+	Do OfferteStub.IndienMethodCall("GeefKlantID").DanReturn(KlantIdBijKlantPersonality)
+	Do OfferteStub.IndienMethodCall("GeefPersonality").DanReturn(KlantPersonalityStub.GeefID())
 	Do OfferteStub.IndienMethodCall("GeefDocumentReferenties").DanReturn(DocumentReferenties)
 	Do OfferteStub.IndienMethodCall("GeefWensLeverDatum").DanReturn(LeverDatum)
 	Do OfferteStub.IndienMethodCall("GeefBestelOpmerking").DanReturn(BestelOpmerking)
 	Do OfferteStub.IndienMethodCall("GeefBestelDatum").DanReturn(BestelDatum)
 
 	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ##class(DOM.EC.Winkelkar.Winkelkar).%New($$$DummyInteger)
-	Do Winkelkar.ZetPersonalityID(RandomPersonalityId)
+	Do Winkelkar.ZetPersonalityID(KlantPersonalityId)
 	
 	#dim IngegevenKenmerkenAPIStub As vhTest.Mock.DOM.PM.IngegevenKenmerkenAPI = ##class(vhTest.Mock.DOM.PM.IngegevenKenmerkenAPI).%New()
 	Do IngegevenKenmerkenAPIStub.IndienMethodCall("GeefIngegevenKenmerken", $$$ElkeWaarde).DanReturn(##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade())
@@ -57,16 +59,13 @@
 	Set KlantData.Naam = KlantNaam
 	Set KlantData.Code = KlantCode
 	
-	#dim DataServiceStub As vhTest.Mock.APPS.common.DataService = ##class(vhTest.Mock.APPS.common.DataService).%New()
-	Do DataServiceStub.IndienMethodCall("GeefKlantData", RandomKlantId).DanReturn(KlantData)
+	#dim KlantDataBepalerStub As vhTest.Mock.DOM.VKP.KlantDataBepaler = ##class(vhTest.Mock.DOM.VKP.KlantDataBepaler).%New()
+	Do KlantDataBepalerStub.IndienMethodCall("GeefKlantData", KlantPersonalityId, KlantIdBijKlantPersonality).DanReturn(KlantData)
 	
 	#dim DomCommonAPIStub As vhTest.Mock.DOM.common.CommonAPI = ##class(vhTest.Mock.DOM.common.CommonAPI).MockInstance()
-	Do DomCommonAPIStub.IndienMethodCall("GeefPersonality", RandomPersonalityId).DanReturn(PersonalityStub)
-	Do DomCommonAPIStub.IndienMethodCall("GeefPersonality", 1).DanReturn(VanHoeckePersonality)
+	Do DomCommonAPIStub.IndienMethodCall("GeefPersonality", KlantPersonalityId).DanReturn(KlantPersonalityStub)
+	Do DomCommonAPIStub.IndienMethodCall("GeefPersonality", 1).DanReturn(LeverancierPersonality)
 	
-	#dim AppsCommonAPI As vhTest.Mock.APPS.common.CommonAPI = ##class(vhTest.Mock.APPS.common.CommonAPI).MockInstance()
-	Do AppsCommonAPI.IndienMethodCall("GeefDataService", $$$ElkeWaarde).DanReturn(DataServiceStub)
-	
 	#dim WinkelkarServiceStub As vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
 	Do WinkelkarServiceStub.IndienMethodCall("GeefMaatwerkLijnen", RandomWinkelkarId).DanReturn(MaatwerkLijnen)
 	
@@ -84,14 +83,10 @@
 	#dim TotaalEnPrijsBerekenaarStub As vhTest.Mock.APPS.EC.Winkelkar.TotaalEnPrijsBerekenaar = ##class(vhTest.Mock.APPS.EC.Winkelkar.TotaalEnPrijsBerekenaar).%New()
 	Do TotaalEnPrijsBerekenaarStub.IndienMethodCall("Bereken", Winkelkar).DanReturn(TotaalEnPrijsBerekendResultaat)
 	
-	;#dim MaatwerkLangtekstBepalerStub As vhTest.Mock.APPS.VKP.Offerte = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
-	;Do MaatwerkLangtekstBepalerStub.IndienMethodCall("GeefLangtekst",IK,Taal).DanReturn(LegeLangtekstObject)
-	; TO DO : De Stub in de volgende lijn toevoegen aan de %New() 
-
-	#dim OfferteGenerator As APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.dto.OfferteGenerator = ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.dto.OfferteGenerator).%New(WinkelkarServiceStub, WinkelkarRepositoryStub, UrlBepalerStub, TotaalEnPrijsBerekenaarStub)
+	#dim OfferteGenerator As APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.dto.OfferteGenerator = ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.dto.OfferteGenerator).%New(WinkelkarServiceStub, WinkelkarRepositoryStub, UrlBepalerStub, TotaalEnPrijsBerekenaarStub, KlantDataBepalerStub)
 	#dim OfferteDto As APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.dto.Offerte = OfferteGenerator.GeefOfferteDto(OfferteStub)
 
-	Do $$$AssertEquals(OfferteDto.EDINummer, EDINummerVoorEindklant)
+	Do $$$AssertEquals(OfferteDto.EDINummer, EdiNummer)
 	Do $$$AssertEquals(OfferteDto.KlantKorting, 0)
 	Do $$$AssertEquals(OfferteDto.KlantNaam, KlantNaam)
 	Do $$$AssertEquals(OfferteDto.KlantNummer, KlantCode)
Index: vhTest/Mock/APPS/EC/Winkelkar/impl/WinkelkarService/Helper.cls.xml
===================================================================
diff -u -r37589 -r45862
--- vhTest/Mock/APPS/EC/Winkelkar/impl/WinkelkarService/Helper.cls.xml	(.../Helper.cls.xml)	(revision 37589)
+++ vhTest/Mock/APPS/EC/Winkelkar/impl/WinkelkarService/Helper.cls.xml	(.../Helper.cls.xml)	(revision 45862)
@@ -3,30 +3,29 @@
 <Class name="vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService.Helper">
 <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>
+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>APPS.EC.Winkelkar.impl.WinkelkarService.Helper,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
 <Method name="GeefWinkelkarDto">
-<FormalSpec>WinkelkarImpl:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
+<FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefWinkelkarDto",WinkelkarImpl)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefWinkelkarDto",Winkelkar)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefWinkelkarDtoInclusiefLijnen">
-<FormalSpec>WinkelkarImpl:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
+<FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefWinkelkarDtoInclusiefLijnen",WinkelkarImpl)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefWinkelkarDtoInclusiefLijnen",Winkelkar)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefWinkelkarDtoZonderPrijsBerekening">
-<FormalSpec>WinkelkarImpl:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
+<FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefWinkelkarDtoZonderPrijsBerekening",WinkelkarImpl)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefWinkelkarDtoZonderPrijsBerekening",Winkelkar)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/Base.cls.xml
===================================================================
diff -u -r39922 -r45862
--- vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/Base.cls.xml	(.../Base.cls.xml)	(revision 39922)
+++ vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/Base.cls.xml	(.../Base.cls.xml)	(revision 45862)
@@ -63,16 +63,16 @@
 <Implementation><![CDATA[
 	#Define ZomaarEenDatumAlsHorolog "63320"
 	
-	#Dim VerkoopAPIStub As vhTest.Mock.DOM.VKP.VerkoopAPI = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).MockInstance()
-	#Dim KlantDataBepalerStub As vhTest.Mock.DOM.VKP.KlantDataBepaler = ##class(vhTest.Mock.DOM.VKP.KlantDataBepaler).%New()
+	set DataServiceStub = ##class(vhTest.Mock.APPS.EC.DataService).%New()
+	do DataServiceStub.IndienMethodCall("GeefKlantData",..GeefPersonalityID(),..HandelPrefix_"123456").DanReturn(..GeefKlantData())
+	do DataServiceStub.IndienMethodCall("GeefGebruikerData",..GeefPersonalityID(),..HandelPrefix_"DummyGebruiker").DanReturn(..GeefGebruikerData())
+	do ##class(APPS.EC.Rapporteur.impl.IoCContainer).Instance().Register("DataService",DataServiceStub)
+	
 	#Dim DocumentReferenties As DOM.VKP.DocumentReferenties = ##class(DOM.VKP.DocumentReferenties).%New()
 	#Dim OfferteStub As vhTest.Mock.APPS.VKP.Offerte = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	
 	Set DocumentReferenties.OrderReferentie = "DummyOrderRef"
 	
-	Do KlantDataBepalerStub.IndienMethodCall("GeefKlantData", ..Personality, ..HandelPrefix_"123456").DanReturn(..GeefKlantData())
-	Do VerkoopAPIStub.IndienMethodCall("GeefKlantDataBepaler").DanReturn(KlantDataBepalerStub)
-	
 	Do OfferteStub.IndienMethodCall("GeefID").DanReturn($$$DummyString)
 	Do OfferteStub.IndienMethodCall("GeefPersonality").DanReturn(..Personality)
 	Do OfferteStub.IndienMethodCall("GeefKlantID").DanReturn(..HandelPrefix_"123456")
@@ -82,15 +82,21 @@
 	Do OfferteStub.IndienMethodCall("GeefDocumentReferenties").DanReturn(DocumentReferenties)
 	Do OfferteStub.IndienMethodCall("GeefLeverAdres").DanReturn(##class(vhTest.Utils.DOM.VKP.LeverAdres).Geen())
 	
-	#Dim Rapporteur As APPS.EC.Rapporteur.Rapporteur = ##class(APPS.EC.Rapporteur.impl.HandelRapporteur).%New(OfferteStub, ##class(DOM.enu.Taal).Nederlands())
-	#Dim MailAPI As vhUnitTest.TECH.Mail.impl.MailAPIMock = ##class(vhUnitTest.TECH.Mail.impl.MailAPIMock).MockInstance()
+	Set MailApi = ##class(vhUnitTest.TECH.Mail.impl.MailAPIMock).%New()
 	
-	Do Rapporteur.Rapporteer()
+	Set VertaalApi = ##class(vhTest.Mock.DOM.common.Transl.VertaalAPI).%New()
+	do VertaalApi.IndienMethodCall("GeefVertaler",..Personality.GeefTaal(),"Unishop").DanReturn(##class(vhTest.Utils.Vertaler).%New(""))
 	
-	If $$$AssertEquals(MailAPI.GeefAantalVerzondenMails(),1) {
-		#Dim Mail As TECH.Mail.Mail = MailAPI.GeefVerzondenMails().GetAt(1)
+	#Dim Rapporteur As APPS.EC.Rapporteur.Rapporteur = ##class(APPS.EC.Rapporteur.impl.HandelRapporteur).%New(,MailApi,VertaalApi)
+	
+	Do Rapporteur.Rapporteer(OfferteStub)
+	
+	If $$$AssertEquals(MailApi.GeefAantalVerzondenMails(),1) {
+		#Dim Mail As TECH.Mail.Mail = MailApi.GeefVerzondenMails().GetAt(1)
 		Do ..AssertMail(Mail)
 	}
+	
+	Do ##class(APPS.EC.Rapporteur.impl.IoCContainer).Instance().Reset()
 ]]></Implementation>
 </Method>
 
@@ -101,7 +107,7 @@
 	Do $$$AssertEqualsList(Mail.GeefOntvangers(),..GeefVerwachteOntvangers())
 	
 	Do $$$AssertEquals(Mail.GeefVerzender(),"webshop@vanhoecke.be")
-	Do $$$AssertEquals(Mail.GeefOnderwerp(),"Webshop, Bestelling: "_$$$DummyString)
+	Do $$$AssertEquals(Mail.GeefOnderwerp(),"[BesteldeOfferteHandelOnderwerp]: "_$$$DummyString)
 	
 	Do ..AssertInhoud(Mail.GeefInhoud())
 ]]></Implementation>
@@ -124,10 +130,21 @@
 <Method name="GeefKlantData">
 <Abstract>1</Abstract>
 <Private>1</Private>
-<ReturnType>DOM.VKP.impl.KlantData</ReturnType>
+<ReturnType>DOM.common.dto.KlantData</ReturnType>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="GeefGebruikerData">
+<Private>1</Private>
+<ReturnType>DOM.common.dto.GebruikerData</ReturnType>
+<Implementation><![CDATA[
+	set GebruikerData = ##class(DOM.common.dto.GebruikerData).%New()
+	set GebruikerData.ID = ..HandelPrefix_"1234"
+	set GebruikerData.Naam = ..HandelPrefix_"Gebruiker"
+	quit GebruikerData
+]]></Implementation>
+</Method>
+
 <Method name="GeefRef">
 <Abstract>1</Abstract>
 <Private>1</Private>
@@ -141,40 +158,40 @@
 <Implementation><![CDATA[
 	#Dim VerwerkBestellingURL As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("VhisieURL")_"?REF=" _ ..GeefRef()
 		
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Beste, <BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelAanspreking], <BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(), "<BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Er is een bestelling geplaatst op de webshop met volgende gegevens: <BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Bestelling: " _ $$$DummyString _ "<BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Klant: " _ "<BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelIntro]<BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelBestellingLabel]: " _ $$$DummyString _ "<BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelKlantLabel]: " _ "<BR>")
 	
 	Do ..AssertKlantReferentie(Inhoud.ReadLine())
 	
 	Do $$$AssertEquals(Inhoud.ReadLine(), "<BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Referentie: " _ "<BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelReferentieLabel]: " _ "<BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(), "DummyOrderRef" _ "<BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(), "<BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Opmerking: <BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelOpmerkingLabel]: <BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(), $$$DummyString _ "<BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(), "<BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Gewenste leverdatum: <BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelWensLeverDatumLabel]: <BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(), ..#ZomaarEenWensLeverdatum _ "<BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(), "<BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Gelieve alle LEGRABOX/TA'OR BOX tabpagina's te sluiten alvorens te klikken op één van deze links.<BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelSluitWebshop]<BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(), "<BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "U kan deze bestelling verwerken door op volgende link te klikken.<BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelVerwerkBestelling]<BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(), "<a href=""" _ VerwerkBestellingURL _ """>" _ VerwerkBestellingURL _ "</a>" _ "<BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(),"<BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Afdrukken van uw verkooporder: <a href=""" _ ..GeefLink() _ """>" _ ..GeefLink() _ "</a><BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelPrintBestelling]<a href=""" _ ..GeefLink() _ """>" _ ..GeefLink() _ "</a><BR>")
 	Do $$$AssertEquals(Inhoud.ReadLine(), "<BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Met vriendelijke groet<BR>")
-	Do $$$AssertEquals(Inhoud.ReadLine(), "Firma Van Hoecke<BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelSlotFormule]<BR>")
+	Do $$$AssertEquals(Inhoud.ReadLine(), "[BesteldeOfferteHandelOndergetekende]<BR>")
 ]]></Implementation>
 </Method>
 
 <Method name="AssertKlantReferentie">
 <FormalSpec>KlantDataReferentie:%String</FormalSpec>
 <Private>1</Private>
-<Implementation><![CDATA[	Do $$$AssertEquals(KlantDataReferentie,..HandelPrefix_"KLANT_1234 - "_..HandelPrefix_"Gemeente_1234 - TestStraat1 - test@"_..HandelPrefix_".be - Tel: 09/444.55.66 - Fax: 09/111.22.33"_"<BR>")
+<Implementation><![CDATA[	Do $$$AssertEquals(KlantDataReferentie,..HandelPrefix_"Gebruiker"_" - "_..HandelPrefix_"KLANT_1234 - "_..HandelPrefix_"Gemeente_1234 - TestStraat1 - test@"_..HandelPrefix_".be - Tel: 09/444.55.66 - Fax: 09/111.22.33"_"<BR>")
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/VKP/Offerte/impl/BesteldeOfferteMelder/HttpVerzender/dto/OfferteGenerator.cls.xml
===================================================================
diff -u -r45361 -r45862
--- APPS/VKP/Offerte/impl/BesteldeOfferteMelder/HttpVerzender/dto/OfferteGenerator.cls.xml	(.../OfferteGenerator.cls.xml)	(revision 45361)
+++ APPS/VKP/Offerte/impl/BesteldeOfferteMelder/HttpVerzender/dto/OfferteGenerator.cls.xml	(.../OfferteGenerator.cls.xml)	(revision 45862)
@@ -33,6 +33,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="KlantDataBepaler">
+<Type>DOM.VKP.KlantDataBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="TotaalEnPrijsBerekendResultaat">
 <Type>APPS.EC.Winkelkar.impl.TotaalEnPrijsBerekendResultaat</Type>
 <Private>1</Private>
@@ -64,7 +69,7 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>WinkelkarService:APPS.EC.Winkelkar.WinkelkarService="",WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository="",UrlBepaler:APPS.EC.Webshop.impl.OfferteUrlBepaler="",TotaalEnPrijsBerekenaar:APPS.EC.Winkelkar.impl.TotaalEnPrijsBerekenaar=""</FormalSpec>
+<FormalSpec>WinkelkarService:APPS.EC.Winkelkar.WinkelkarService="",WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository="",UrlBepaler:APPS.EC.Webshop.impl.OfferteUrlBepaler="",TotaalEnPrijsBerekenaar:APPS.EC.Winkelkar.impl.TotaalEnPrijsBerekenaar="",KlantDataBepaler:DOM.VKP.KlantDataBepaler</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -76,6 +81,7 @@
 	Set ..TotaalEnPrijsBerekenaar = $$$Inject(TotaalEnPrijsBerekenaar, ##class(APPS.EC.Winkelkar.impl.TotaalEnPrijsBerekenaar).%New())
 	Set ..MaatwerkLangtekstBepaler = ##class(DOM.PM.impl.MaatwerkLangtekstBepaler).%New()
 	Set ..FormatAPI = ##class(TECH.Context).Instance().GeefFormatAPI()
+	Set ..KlantDataBepaler = $$$Inject(KlantDataBepaler , ##class(DOM.VKP.impl.KlantDataBepaler).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -173,8 +179,7 @@
 <FormalSpec>Offerte:APPS.VKP.impl.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim DataService As APPS.common.DataService = ##class(APPS.ApplicatieContext).Instance().GeefCommonAPI().GeefDataService()
-	#dim KlantData As DOM.common.dto.KlantData = DataService.GeefKlantData(Offerte.GeefKlantID())
+	#dim KlantData As DOM.common.dto.KlantData = ..KlantDataBepaler.GeefKlantData(Offerte.GeefPersonality(),Offerte.GeefKlantID())
 	
 	// Opmerking : het KlantData-object zal afhankelijk zijn van de Personality. Is voorlopig enkel voor SFS en zal dus later moeten ge-refactored worden. 
 	Set ..OfferteDto.KlantNummer = KlantData.Code
Index: vhUnitTest/APPS/EC/impl/KlantDataReferentieBepaler/GeefKlantDataReferentie/Test.cls.xml
===================================================================
diff -u -r39917 -r45862
--- vhUnitTest/APPS/EC/impl/KlantDataReferentieBepaler/GeefKlantDataReferentie/Test.cls.xml	(.../Test.cls.xml)	(revision 39917)
+++ vhUnitTest/APPS/EC/impl/KlantDataReferentieBepaler/GeefKlantDataReferentie/Test.cls.xml	(.../Test.cls.xml)	(revision 45862)
@@ -52,12 +52,11 @@
 <Implementation><![CDATA[
 	#dim Personality As DOM.common.Personality = ##class(DOM.DomeinContext).Instance().GeefCommonAPI().GeefPersonality(..#PersonalityID)
 	
-	Set DataServiceStub = ##class(vhTest.Mock.APPS.common.DataService).%New()
-	Do DataServiceStub.IndienMethodCall("GeefKlantData", $$$DummyString).DanReturn(..DummyKlant)
-	Do DataServiceStub.IndienMethodCall("GeefGebruikerData", $$$DummyString).DanReturn(..DummyGebruiker)
+	Set DataServiceStub = ##class(vhTest.Mock.APPS.EC.DataService).%New()
+	Do DataServiceStub.IndienMethodCall("GeefKlantData", Personality.GeefID(), $$$DummyString).DanReturn(..DummyKlant)
+	Do DataServiceStub.IndienMethodCall("GeefGebruikerData", Personality.GeefID(), $$$DummyString).DanReturn(..DummyGebruiker)
 	
 	#dim CommonAPI As vhTest.Mock.APPS.common.CommonAPI = ##class(vhTest.Mock.APPS.common.CommonAPI).MockInstance()
-	Do CommonAPI.IndienMethodCall("GeefDataService",..#PersonalityID).DanReturn(DataServiceStub)
 	Set DummyAdminTekstUtils = ##class(APPS.common.impl.AdminTekstUtils).%New()
 	Do CommonAPI.IndienMethodCall("GeefAdminTekstUtils").DanReturn(DummyAdminTekstUtils)
 	
@@ -67,13 +66,14 @@
 	Do OfferteStub.IndienMethodCall("GeefPersonality").DanReturn(Personality)
 	Do OfferteStub.IndienMethodCall("GeefLeverAdres").DanReturn(..GeenAdres())
 	
-	Set KlantDataReferentieBepaler = ##class(APPS.EC.impl.KlantDataReferentieBepaler).%New()
+	Set KlantDataReferentieBepaler = ##class(APPS.EC.impl.KlantDataReferentieBepaler).%New(,DataServiceStub)
 	quit KlantDataReferentieBepaler.GeefKlantDataReferentie(OfferteStub)
 ]]></Implementation>
 </Method>
 
 <Method name="AssertKlantDataReferentie">
 <Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="GeenAdres">
Index: vhUnitTest/APPS/EC/impl/KlantRapporteur/Rapporteer/Base.cls.xml
===================================================================
diff -u -r29059 -r45862
--- vhUnitTest/APPS/EC/impl/KlantRapporteur/Rapporteer/Base.cls.xml	(.../Base.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/EC/impl/KlantRapporteur/Rapporteer/Base.cls.xml	(.../Base.cls.xml)	(revision 45862)
@@ -6,31 +6,26 @@
 
 <Method name="Test">
 <Implementation><![CDATA[
-	#Dim CommonAPI As vhTest.Mock.APPS.common.CommonAPI = ##class(vhTest.Mock.APPS.common.CommonAPI).MockInstance()
-	#Dim MailAPI As vhUnitTest.TECH.Mail.impl.MailAPIMock = ##class(vhUnitTest.TECH.Mail.impl.MailAPIMock).MockInstance()
-	#Dim DummyKlantData As DOM.common.dto.HandelKlantData = ..GeefDummyKlantData()
-	#Dim DocumentReferenties As DOM.VKP.DocumentReferenties = ..GeefDocumentReferenties()
-	#Dim OfferteStub As vhTest.Mock.APPS.VKP.Offerte = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
-	#Dim DataServiceStub As vhTest.Mock.APPS.common.DataService = ##class(vhTest.Mock.APPS.common.DataService).%New()
+	Set DataServiceStub = ##class(vhTest.Mock.APPS.EC.DataService).%New()
+	Do DataServiceStub.IndienMethodCall("GeefKlantData", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(..GeefDummyKlantData())
+
+	Set MailAPI = ##class(vhUnitTest.TECH.Mail.impl.MailAPIMock).%New()
+	Set Rapporteur = ##class(vhUnitTest.APPS.EC.impl.KlantRapporteur.Rapporteer.Mock).%New(,MailAPI,,,DataServiceStub)
 	
+	Do Rapporteur.IndienMethodCall("IsRapporterenNodig").DanReturn($$$True)
+	Do Rapporteur.VerwachtMethodCall("LogAlsVerzonden")
+
+	#Dim OfferteStub As vhTest.Mock.APPS.VKP.Offerte = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	Do OfferteStub.IndienMethodCall("GeefID").DanReturn($$$DummyString)
 	Do OfferteStub.IndienMethodCall("GeefPersonalityID").DanReturn(..GeefPersonality().GeefID())
 	Do OfferteStub.IndienMethodCall("GeefPersonality").DanReturn(..GeefPersonality())
-	Do OfferteStub.IndienMethodCall("GeefKlantID").DanReturn(DummyKlantData.ID)
-	Do OfferteStub.IndienMethodCall("GeefDocumentReferenties").DanReturn(DocumentReferenties)
+	Do OfferteStub.IndienMethodCall("GeefKlantID").DanReturn(..GeefPersonality().GeefPrefix() _ "DummyKlantID")
+	Do OfferteStub.IndienMethodCall("GeefDocumentReferenties").DanReturn(..GeefDocumentReferenties())
 	Do OfferteStub.IndienMethodCall("GeefBestelOpmerking").DanReturn("DummyBestelOpmerking")
 
-	Do DataServiceStub.IndienMethodCall("GeefKlantData", DummyKlantData.ID).DanReturn(DummyKlantData)
-	
-	Do CommonAPI.IndienMethodCall("GeefDataService", OfferteStub.GeefPersonalityID()).DanReturn(DataServiceStub)
-	Do CommonAPI.IndienMethodCall("GeefDataService","").DanReturn(DataServiceStub)	
-	
-	#Dim Rapporteur As vhUnitTest.APPS.EC.impl.KlantRapporteur.Rapporteer.Mock = ##class(vhUnitTest.APPS.EC.impl.KlantRapporteur.Rapporteer.Mock).%New(OfferteStub)
-	
-	Do Rapporteur.IndienMethodCall("IsRapporterenNodig").DanReturn($$$True)
-	Do Rapporteur.VerwachtMethodCall("LogAlsVerzonden")
-	Do Rapporteur.Rapporteer()
 
+	Do Rapporteur.Rapporteer(OfferteStub)
+
 	If ($$$AssertEquals(MailAPI.GeefAantalVerzondenMails(), 1)) {
 		#Dim Mail As TECH.Mail.Mail = MailAPI.GeefVerzondenMails().GetAt(1)
 		
Index: APPS/VKP/Offerte/impl/BesteldeOfferteMelder.cls.xml
===================================================================
diff -u -r44518 -r45862
--- APPS/VKP/Offerte/impl/BesteldeOfferteMelder.cls.xml	(.../BesteldeOfferteMelder.cls.xml)	(revision 44518)
+++ APPS/VKP/Offerte/impl/BesteldeOfferteMelder.cls.xml	(.../BesteldeOfferteMelder.cls.xml)	(revision 45862)
@@ -3,11 +3,28 @@
 <Class name="APPS.VKP.Offerte.impl.BesteldeOfferteMelder">
 <Super>DOM.common.PersonalityVisitor,APPS.VKP.Offerte.BesteldeOfferteMelder</Super>
 
+<Property name="Rapporteur">
+<Type>APPS.EC.Rapporteur.impl.HandelRapporteur</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Offerte">
 <Type>APPS.VKP.Offerte</Type>
 <Private>1</Private>
 </Property>
 
+<Method name="%OnNew">
+<FormalSpec>Rapporteur:APPS.EC.Rapporteur.impl.HandelRapporteur</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	set ..Rapporteur = $$$Inject(Rapporteur,##class(APPS.EC.Rapporteur.impl.HandelRapporteur).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="VerwittigVerwerker">
 <FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Implementation><![CDATA[
@@ -26,31 +43,31 @@
 
 <Method name="VerwerkDestil">
 <FormalSpec>DestilPersonality:DOM.common.DestilPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..VerwittigHandelOfferteBesteld()
+<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkDupont">
 <FormalSpec>DupontPersonality:DOM.common.DupontPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..VerwittigHandelOfferteBesteld()
+<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkKisch">
 <FormalSpec>KischPersonality:DOM.common.KischPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..VerwittigHandelOfferteBesteld()
+<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkVanRaemdonck">
 <FormalSpec>VanRaemdonckPersonality:DOM.common.VanRaemdonckPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..VerwittigHandelOfferteBesteld()
+<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkDaro">
 <FormalSpec>DaroPersonality:DOM.common.DaroPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..VerwittigHandelOfferteBesteld()
+<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
@@ -63,22 +80,22 @@
 <Method name="VerwerkHaefeleBE">
 <FormalSpec>HaefeleBEPersonality:DOM.common.HaefeleBEPersonality</FormalSpec>
 <Implementation><![CDATA[
-	Do ..VerwittigHandelOfferteBesteld()
+	Do ..Rapporteur.Rapporteer(..Offerte)
 	Do ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.HaefeleBE).%New().Verzend(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkHaefeleNL">
 <FormalSpec>HaefeleNLPersonality:DOM.common.HaefeleNLPersonality</FormalSpec>
 <Implementation><![CDATA[
-	Do ..VerwittigHandelOfferteBesteld()
+	Do ..Rapporteur.Rapporteer(..Offerte)
 	Do ##class(APPS.VKP.Offerte.impl.BesteldeOfferteMelder.HttpVerzender.HaefeleBE).%New().Verzend(..Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkHein">
 <FormalSpec>HeinPersonality:DOM.common.HeinPersonality</FormalSpec>
-<Implementation><![CDATA[	Do ..VerwittigHandelOfferteBesteld()
+<Implementation><![CDATA[	Do ..Rapporteur.Rapporteer(..Offerte)
 ]]></Implementation>
 </Method>
 
@@ -107,13 +124,6 @@
 	}
 ]]></Implementation>
 </Method>
-
-<Method name="VerwittigHandelOfferteBesteld">
-<Implementation><![CDATA[
-	#dim Rapporteur As APPS.EC.Rapporteur.Rapporteur = ##class(APPS.EC.Rapporteur.impl.HandelRapporteur).%New(..Offerte)
-	Do Rapporteur.Rapporteer()
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: APPS/EC/Rapporteur/impl/KlantRapporteur.cls.xml
===================================================================
diff -u -r41632 -r45862
--- APPS/EC/Rapporteur/impl/KlantRapporteur.cls.xml	(.../KlantRapporteur.cls.xml)	(revision 41632)
+++ APPS/EC/Rapporteur/impl/KlantRapporteur.cls.xml	(.../KlantRapporteur.cls.xml)	(revision 45862)
@@ -3,36 +3,58 @@
 <Class name="APPS.EC.Rapporteur.impl.KlantRapporteur">
 <Super>APPS.EC.Rapporteur.impl.Rapporteur</Super>
 
+<Property name="WebshopURLBepaler">
+<Type>APPS.EC.Webshop.impl.UrlBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="WebshopSessionService">
+<Type>APPS.EC.WebshopSessionService</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="DataService">
+<Type>APPS.EC.DataService</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="HandelKlantData">
 <Type>DOM.common.dto.HandelKlantData</Type>
 <Private>1</Private>
 </Property>
 
-<Property name="WebshopURLBepaler">
-<Type>APPS.EC.Webshop.impl.UrlBepaler</Type>
-<Private>1</Private>
+<Property name="Type">
+<Type>APPS.EC.enu.RapporteurType</Type>
+<InitialExpression>##class(APPS.EC.enu.RapporteurType).Klant()</InitialExpression>
+<ReadOnly>1</ReadOnly>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>Offerte:APPS.VKP.Offerte,WebshopURLBepaler:APPS.EC.Webshop.impl.UrlBepaler</FormalSpec>
+<FormalSpec>CommonApi:DOM.common.CommonAPI,MailApi:TECH.Mail.MailAPI,VertaalApi:DOM.common.Transl.VertaalAPI,WebshopURLBepaler:APPS.EC.Webshop.impl.UrlBepaler,DataService:APPS.EC.DataService</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..HandelKlantData = ##class(APPS.ApplicatieContext).Instance().GeefCommonAPI().GeefDataService(Offerte.GeefPersonalityID()).GeefKlantData(Offerte.GeefKlantID())	
-	Set ..Taal = ..HandelKlantData.Taal
-	Set ..Type = ##class(APPS.EC.enu.RapporteurType).Klant()
-	Set ..WebshopURLBepaler = $$$Implementation(WebshopURLBepaler, ##class(APPS.EC.Webshop.impl.UrlBepaler).%New())
+	do ##super(.CommonApi,.MailApi,.VertaalApi)
 	
-	Do ##super(Offerte)
-	
+	Set ..WebshopURLBepaler = $$$Implementation(WebshopURLBepaler, ##class(APPS.EC.Webshop.impl.UrlBepaler).%New())
+	Set ..DataService = $$$Inject(DataService,##class(APPS.EC.Rapporteur.impl.IoCContainer).Instance().Resolve("DataService"))
+	Set ..WebshopSessionService = ##class(APPS.EC.impl.WebshopSessionService).%New(..DataService)
+
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="Rapporteer">
-<Implementation><![CDATA[	Do ..Offerte.GeefPersonality().Accept($this)
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
+<Implementation><![CDATA[
+	Set ..Offerte = Offerte
+	Set ..HandelKlantData = ..DataService.GeefKlantData(Offerte.GeefPersonalityID(),Offerte.GeefKlantID())	
+	
+	Set ..Vertaler = ..VertaalApi.GeefVertaler(..HandelKlantData.Taal,##class(DOM.common.Transl.enu.VertaalGroep).Unishop())
+	
+	Do ..Offerte.GeefPersonality().Accept($this)
 ]]></Implementation>
 </Method>
 
@@ -115,7 +137,7 @@
 <FormalSpec>Verzender:%String,PersonalityNaam:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set ..Mail = ##class(TECH.Context).Instance().GeefMailAPI().MaakNieuwMail()
+	Set ..Mail = ..MailApi.MaakNieuwMail()
 	
 	Do ..Mail.ZetIsHTML(1)
 	Do ..Mail.ZetVerzender(Verzender)
@@ -182,13 +204,12 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#Dim WebshopSessionService As APPS.EC.WebshopSessionService = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWebshopSessionService()
-	#Dim DomeinVerwerker As APPS.EC.enu.WebShopVerwerker = WebshopSessionService.GeefDomeinVerwerkerVoorPersonality(..Offerte.GeefPersonalityID())	
+	#Dim DomeinVerwerker As APPS.EC.enu.WebShopVerwerker = ..WebshopSessionService.GeefDomeinVerwerkerVoorPersonality(..Offerte.GeefPersonalityID())	
 	#Dim RefSessieData As APPS.EC.dto.RefSessieData = ..GeefRefSessieData(DomeinVerwerker)
 	#Dim Taal As DOM.enu.Taal = ..HandelKlantData.Taal
 	#Dim GebruikerID As %String = ##class(TECH.Context.RuntimeContext).Instance().GeefGebruikerID()
 	
-	Quit WebshopSessionService.GeefWebshopUrlMetIngelogdeGebruiker(RefSessieData, GebruikerID, Taal)
+	Quit ..WebshopSessionService.GeefWebshopUrlMetIngelogdeGebruiker(RefSessieData, GebruikerID, Taal)
 ]]></Implementation>
 </Method>
 
Index: vhTest/Mock/DOM/VKP/impl/KlantDataBepaler.cls.xml
===================================================================
diff -u -r41754 -r45862
--- vhTest/Mock/DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 41754)
+++ vhTest/Mock/DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 45862)
@@ -3,8 +3,7 @@
 <Class name="vhTest.Mock.DOM.VKP.impl.KlantDataBepaler">
 <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
-</Description>
+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>DOM.VKP.impl.KlantDataBepaler,vhTest.Mock.DOM.VKP.KlantDataBepaler</Super>
 <Inheritance>right</Inheritance>
Index: APPS/EC/Rapporteur/impl/Rapporteur.cls.xml
===================================================================
diff -u -r29059 -r45862
--- APPS/EC/Rapporteur/impl/Rapporteur.cls.xml	(.../Rapporteur.cls.xml)	(revision 29059)
+++ APPS/EC/Rapporteur/impl/Rapporteur.cls.xml	(.../Rapporteur.cls.xml)	(revision 45862)
@@ -4,6 +4,21 @@
 <Abstract>1</Abstract>
 <Super>DOM.common.PersonalityUnishopVisitor,APPS.EC.Rapporteur.Rapporteur</Super>
 
+<Property name="CommonApi">
+<Type>DOM.common.CommonAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="MailApi">
+<Type>TECH.Mail.MailAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="VertaalApi">
+<Type>DOM.common.Transl.VertaalAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Mail">
 <Type>TECH.Mail.Mail</Type>
 <Private>1</Private>
@@ -19,38 +34,36 @@
 <Private>1</Private>
 </Property>
 
-<Property name="Taal">
-<Type>DOM.enu.Taal</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="Type">
 <Type>APPS.EC.enu.RapporteurType</Type>
+<Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
+<FormalSpec>CommonApi:DOM.common.CommonAPI,MailApi:TECH.Mail.MailAPI,VertaalApi:DOM.common.Transl.VertaalAPI</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..Offerte = Offerte
-	Set ..Vertaler = ##class(DOM.DomeinContext).Instance().GeefVertaalAPI().GeefVertaler(..Taal, ##class(DOM.common.Transl.enu.VertaalGroep).Unishop())
-	
+	set ..CommonApi = $$$Inject(CommonApi,##class(DOM.DomeinContext).Instance().GeefCommonAPI())
+	set ..MailApi = $$$Inject(MailApi,##class(TECH.Context).Instance().GeefMailAPI())
+	set ..VertaalApi = $$$Inject(VertaalApi,##class(DOM.DomeinContext).Instance().GeefVertaalAPI())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="Verzend">
 <Private>1</Private>
 <Implementation><![CDATA[
+	Do ..MailApi.VerstuurMail(..Mail)
+	
 	#Dim Onderwerp As TECH.String = "Mail" _ ..Type
 	#Dim Ontvangers As TECH.String = ##class(TECH.ListUtils).ListToPieces(..Mail.GeefOntvangers(), ", ")
 	#Dim Omschrijving As TECH.String = "Mail voor " _ ..Type _ "'" _ ..Mail.GeefOnderwerp() _ "' is verzonden naar: " _ Ontvangers
 	
-	Do ##class(TECH.Context).Instance().GeefMailAPI().VerstuurMail(..Mail)
-	Do ##class(DOM.DomeinContext).Instance().GeefCommonAPI().VoegToeLogItem(Onderwerp, ..Offerte.GeefID(), Omschrijving)
+	
+	Do ..CommonApi.VoegToeLogItem(Onderwerp, ..Offerte.GeefID(), Omschrijving)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestDupont.cls.xml
===================================================================
diff -u -r29059 -r45862
--- vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestDupont.cls.xml	(.../TestDupont.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestDupont.cls.xml	(.../TestDupont.cls.xml)	(revision 45862)
@@ -24,7 +24,7 @@
 
 <Method name="GeefKlantData">
 <Private>1</Private>
-<ReturnType>DOM.VKP.impl.KlantData</ReturnType>
+<ReturnType>DOM.common.dto.KlantData</ReturnType>
 <Implementation><![CDATA[	Quit ##class(vhTest.Utils.DOM.common.dto.KlantData.Dupont).%New()
 ]]></Implementation>
 </Method>
Index: vhTest/Utils/DOM/common/dto/KlantData.cls.xml
===================================================================
diff -u -r45819 -r45862
--- vhTest/Utils/DOM/common/dto/KlantData.cls.xml	(.../KlantData.cls.xml)	(revision 45819)
+++ vhTest/Utils/DOM/common/dto/KlantData.cls.xml	(.../KlantData.cls.xml)	(revision 45862)
@@ -19,6 +19,21 @@
 	Quit Klant
 ]]></Implementation>
 </Method>
+
+<Method name="SFS">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.common.dto.KlantData</ReturnType>
+<Implementation><![CDATA[
+	Set Klant = ##class(DOM.common.dto.KlantData).%New()
+	
+	Set Klant.Naam = "SFS"
+	Set Klant.ID = "K||12486"
+	Set Klant.Code = "12486"
+	Set Klant.Taal = "D"
+	
+	Quit Klant
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/EC/Rapporteur/impl/IoCContainer.cls.xml
===================================================================
diff -u
--- APPS/EC/Rapporteur/impl/IoCContainer.cls.xml	(revision 0)
+++ APPS/EC/Rapporteur/impl/IoCContainer.cls.xml	(revision 45862)
@@ -0,0 +1,14 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.EC.Rapporteur.impl.IoCContainer">
+<Super>TECH.IoC.Container</Super>
+
+<Method name="Initialization">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[	#execute set ^TECH.Config.IoC.Container("APPS.EC.Rapporteur.impl.IoCContainer","DataService")="APPS.EC.impl.DataService"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/EC/impl/KlantDataReferentieBepaler/GeefKlantDataReferentie/TestVanHoeckeMetGekoppeldeOfferte.cls.xml
===================================================================
diff -u -r39962 -r45862
--- vhUnitTest/APPS/EC/impl/KlantDataReferentieBepaler/GeefKlantDataReferentie/TestVanHoeckeMetGekoppeldeOfferte.cls.xml	(.../TestVanHoeckeMetGekoppeldeOfferte.cls.xml)	(revision 39962)
+++ vhUnitTest/APPS/EC/impl/KlantDataReferentieBepaler/GeefKlantDataReferentie/TestVanHoeckeMetGekoppeldeOfferte.cls.xml	(.../TestVanHoeckeMetGekoppeldeOfferte.cls.xml)	(revision 45862)
@@ -3,42 +3,39 @@
 <Class name="vhUnitTest.APPS.EC.impl.KlantDataReferentieBepaler.GeefKlantDataReferentie.TestVanHoeckeMetGekoppeldeOfferte">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="TestAllesIngevuld">
+<Method name="Test: De offerte voor de leverancier bevat de leveradres gegevens van de bestelling bij de klant">
 <Implementation><![CDATA[
-	#dim HandelKlantData As DOM.common.dto.HandelKlantData = ..InitKlant()
-	#dim GebruikerData = ##class(DOM.common.dto.GebruikerData).%New()
+	#dim KlantPersonality As DOM.common.DestilPersonality = ##class(DOM.common.DestilPersonality).Instance()
+	#dim LeverancierPersonality As DOM.common.VanHoeckePersonality = ##class(DOM.common.VanHoeckePersonality).Instance()
 	
-	Set OfferteStub = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
-	Do OfferteStub.IndienMethodCall("GeefKlantID").DanReturn($$$DummyString)
-	Do OfferteStub.IndienMethodCall("GeefAangemaaktDoor").DanReturn($$$DummyString)
-	Do OfferteStub.IndienMethodCall("GeefPersonality").DanReturn(##class(DOM.common.VanHoeckePersonality).Instance())
-	Do OfferteStub.IndienMethodCall("GeefLeverAdres").DanReturn(##class(vhTest.Utils.DOM.VKP.LeverAdres).Geen())
+	Set LeverancierOfferteStub = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
+	Do LeverancierOfferteStub.IndienMethodCall("GeefKlantID").DanReturn($$$DummyString)
+	Do LeverancierOfferteStub.IndienMethodCall("GeefAangemaaktDoor").DanReturn($$$DummyString)
+	Do LeverancierOfferteStub.IndienMethodCall("GeefPersonality").DanReturn(LeverancierPersonality)
+	Do LeverancierOfferteStub.IndienMethodCall("GeefLeverAdres").DanReturn(##class(vhTest.Utils.DOM.VKP.LeverAdres).Geen())
 	
-	Set GekoppeldeOfferteStub = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
-	Do GekoppeldeOfferteStub.IndienMethodCall("GeefKlantID").DanReturn($$$DummyString)
-	Do GekoppeldeOfferteStub.IndienMethodCall("GeefAangemaaktDoor").DanReturn("")
-	Do GekoppeldeOfferteStub.IndienMethodCall("GeefPersonality").DanReturn(##class(DOM.common.DestilPersonality).Instance())
-	Do GekoppeldeOfferteStub.IndienMethodCall("GeefLeverAdres").DanReturn(##class(vhTest.Utils.DOM.VKP.LeverAdres).Belgisch())
+	Set BestellingBijKlantStub = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
+	Do BestellingBijKlantStub.IndienMethodCall("GeefKlantID").DanReturn($$$DummyString)
+	Do BestellingBijKlantStub.IndienMethodCall("GeefAangemaaktDoor").DanReturn("")
+	Do BestellingBijKlantStub.IndienMethodCall("GeefPersonality").DanReturn(KlantPersonality)
+	Do BestellingBijKlantStub.IndienMethodCall("GeefLeverAdres").DanReturn(##class(vhTest.Utils.DOM.VKP.LeverAdres).Belgisch())
 	
 	Set OfferteServiceStub = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
-	Do OfferteServiceStub.IndienMethodCall("HeeftOfferteVanHandel",OfferteStub).DanReturn($$$true)
-	Do OfferteServiceStub.IndienMethodCall("GeefOfferteVanHandel",OfferteStub).DanReturn(GekoppeldeOfferteStub)
+	Do OfferteServiceStub.IndienMethodCall("HeeftOfferteVanHandel",LeverancierOfferteStub).DanReturn($$$true)
+	Do OfferteServiceStub.IndienMethodCall("GeefOfferteVanHandel",LeverancierOfferteStub).DanReturn(BestellingBijKlantStub)
 
-	Set DataServiceStub = ##class(vhTest.Mock.APPS.common.DataService).%New()
-	Do DataServiceStub.IndienMethodCall("GeefKlantData", $$$DummyString).DanReturn(HandelKlantData)
-	Do DataServiceStub.IndienMethodCall("GeefGebruikerData", $$$DummyString).DanReturn(GebruikerData)
+	Set DataServiceStub = ##class(vhTest.Mock.APPS.EC.DataService).%New()
+	Do DataServiceStub.IndienMethodCall("GeefKlantData", KlantPersonality.GeefID(), $$$DummyString).DanReturn(..GeefKlantData())
+	Do DataServiceStub.IndienMethodCall("GeefGebruikerData", KlantPersonality.GeefID() ,$$$DummyString).DanReturn(##class(DOM.common.dto.GebruikerData).%New())
 	
-	#dim CommonAPI As vhTest.Mock.APPS.common.CommonAPI = ##class(vhTest.Mock.APPS.common.CommonAPI).MockInstance()
-	Do CommonAPI.IndienMethodCall("GeefDataService", $$$ElkeWaarde).DanReturn(DataServiceStub)
+	Set KlantDataReferentieBepaler = ##class(APPS.EC.impl.KlantDataReferentieBepaler).%New(OfferteServiceStub,DataServiceStub)
 	
-	Set KlantDataReferentieBepaler = ##class(APPS.EC.impl.KlantDataReferentieBepaler).%New(OfferteServiceStub)
-	
 	#dim VerwachteKlantDataReferentie As %String = "Dummy Naam - DummyGemeente - DummyStraat - DummyEmailAdres - Tel: DummyTelefoonNummer - Fax: DummyFaxNummer - Adres: Een Belg, Ankerstraat 91, 9100 Sint-Niklaas, BE"
-	Do $$$AssertEquals(KlantDataReferentieBepaler.GeefKlantDataReferentie(OfferteStub),VerwachteKlantDataReferentie)
+	Do $$$AssertEquals(KlantDataReferentieBepaler.GeefKlantDataReferentie(LeverancierOfferteStub),VerwachteKlantDataReferentie)
 ]]></Implementation>
 </Method>
 
-<Method name="InitKlant">
+<Method name="GeefKlantData">
 <Private>1</Private>
 <ReturnType>DOM.common.dto.HandelKlantData</ReturnType>
 <Implementation><![CDATA[
Index: APPS/EC/Winkelkar/impl/Logger.cls.xml
===================================================================
diff -u -r33667 -r45862
--- APPS/EC/Winkelkar/impl/Logger.cls.xml	(.../Logger.cls.xml)	(revision 33667)
+++ APPS/EC/Winkelkar/impl/Logger.cls.xml	(.../Logger.cls.xml)	(revision 45862)
@@ -8,6 +8,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="DataService">
+<Type>APPS.EC.impl.DataService</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
 <Private>1</Private>
@@ -16,6 +21,7 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..Winkelkar = Winkelkar
+	Set ..DataService = ##class(APPS.EC.impl.DataService).%New()
 	quit $$$OK
 ]]></Implementation>
 </Method>
@@ -24,8 +30,8 @@
 <FormalSpec>OorspronkelijkAantalVanLijn:%Integer,IngegevenKenmerkenStream:%Stream,GewijzigdeKenmerkenStream:%Stream,Lijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
 <Implementation><![CDATA[
 	#dim VolledigeOmschrijving As %Stream = ##class(%GlobalCharacterStream).%New()
-	#dim DataService As APPS.common.DataService = ##class(APPS.ApplicatieContext).Instance().GeefCommonAPI().GeefDataService(..Winkelkar.GeefPersonalityID())
-	#dim KlantData As DOM.common.dto.KlantData = DataService.GeefKlantData(..Winkelkar.GeefKlantID())
+	
+	#dim KlantData As DOM.common.dto.KlantData = ..DataService.GeefKlantData(..Winkelkar.GeefPersonalityID(),..Winkelkar.GeefKlantID())
 	#dim WinkelkarParent As APPS.EC.Winkelkar.Parent = ..GeefParent()
 	
 	Do VolledigeOmschrijving.WriteLine("Klant : "_KlantData.Naam_" ("_..Winkelkar.GeefKlantID()_")")
Index: vhTest/Utils/DOM/common/dto/PersonalityData.cls.xml
===================================================================
diff -u
--- vhTest/Utils/DOM/common/dto/PersonalityData.cls.xml	(revision 0)
+++ vhTest/Utils/DOM/common/dto/PersonalityData.cls.xml	(revision 45862)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Utils.DOM.common.dto.PersonalityData">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="SFS">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.common.dto.PersonalityData</ReturnType>
+<Implementation><![CDATA[
+	set Data = ##class(DOM.common.dto.PersonalityData).%New()
+	set Data.ID = 3
+	set Data.Code = 3
+	Set Data.Naam = "SFS"
+	Quit Data
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/EC/Rapporteur/impl/HandelRapporteur.cls.xml
===================================================================
diff -u -r44518 -r45862
--- APPS/EC/Rapporteur/impl/HandelRapporteur.cls.xml	(.../HandelRapporteur.cls.xml)	(revision 44518)
+++ APPS/EC/Rapporteur/impl/HandelRapporteur.cls.xml	(.../HandelRapporteur.cls.xml)	(revision 45862)
@@ -8,27 +8,42 @@
 <Private>1</Private>
 </Property>
 
+<Property name="KlantDataReferentieBepaler">
+<Type>APPS.EC.KlantDataReferentieBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="EcommerceApi">
+<Type>APPS.EC.ECommerceAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Type">
+<Type>APPS.EC.enu.RapporteurType</Type>
+<InitialExpression>##class(APPS.EC.enu.RapporteurType).Handel()</InitialExpression>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>Offerte:APPS.VKP.Offerte,Taal:DOM.enu.Taal=""</FormalSpec>
+<FormalSpec>CommonApi:DOM.common.CommonAPI,MailApi:TECH.Mail.MailAPI,VertaalApi:DOM.common.Transl.VertaalAPI</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	#define StringImplements(%v,%i)   $select($length(%v):%v,1:%i)
-	
-	Set ..Type = ##class(APPS.EC.enu.RapporteurType).Handel()
-	Set ..Taal =  $$$StringImplements(Taal,Offerte.GeefPersonality().GeefTaal())
+	do ##super(.CommonApi,.MailApi,.VertaalApi)
 	Set ..OfferteUrlBepaler = ##class(APPS.EC.Webshop.impl.OfferteUrlBepaler).%New()
-
-	Do ##super(Offerte) 
-	
+	set ..KlantDataReferentieBepaler = ##class(APPS.EC.impl.KlantDataReferentieBepaler).%New()
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="Rapporteer">
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Implementation><![CDATA[
+	Set ..Offerte = Offerte
+	Set ..Vertaler = ..VertaalApi.GeefVertaler(Offerte.GeefPersonality().GeefTaal(),##class(DOM.common.Transl.enu.VertaalGroep).Unishop())
+
 	Do ..MaakMail()
 	Do ..MaakBody()
 	Do ..Verzend()
@@ -38,7 +53,7 @@
 <Method name="MaakMail">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set ..Mail = ##class(TECH.Context).Instance().GeefMailAPI().MaakNieuwMail()
+	Set ..Mail = ..MailApi.MaakNieuwMail()
 	
 	Do ..Offerte.GeefPersonality().Accept($this)
 	
@@ -51,7 +66,6 @@
 <Method name="MaakBody">
 <Private>1</Private>
 <Implementation><![CDATA[
-	#Dim ECommerceAPI As APPS.EC.ECommerceAPI = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI()
 	#Dim VerwerkBestellingURL As TECH.String = ..OfferteUrlBepaler.GeefURL(..Offerte, ##class(APPS.EC.enu.WebshopModus).Vrijgave())
 	#Dim AlleenLezenURL As TECH.String = ..OfferteUrlBepaler.GeefURL(..Offerte, ##class(APPS.EC.enu.WebshopModus).AlleenLezen())
 
@@ -60,7 +74,7 @@
 	Do ..Mail.VoegToeLijn(..GeefVertaling("Intro"))
 	Do ..Mail.VoegToeLijn(..GeefVertaling("BestellingLabel") _ ": " _ ..Offerte.GeefID())
 	Do ..Mail.VoegToeLijn(..GeefVertaling("KlantLabel") _ ": ")
-	Do ..Mail.VoegToeLijn(ECommerceAPI.GeefKlantDataReferentieBepaler().GeefKlantDataReferentie(..Offerte))
+	Do ..Mail.VoegToeLijn(..KlantDataReferentieBepaler.GeefKlantDataReferentie(..Offerte))
 
 	If $$$Not(..Offerte.GeefDocumentReferenties().OrderReferentie = "") {
 		Do ..Mail.VoegToeLijn("")
@@ -97,8 +111,8 @@
 <Method name="Verzend">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do ##class(TECH.Context).Instance().GeefMailAPI().VerstuurMail(..Mail)
-	Do ##class(DOM.DomeinContext).Instance().GeefCommonAPI().VoegToeLogItem("MailHandel", ..Offerte.GeefID(), "Mail voor handel """_..Mail.GeefOnderwerp()_""" is verzonden")
+	Do ..MailApi.VerstuurMail(..Mail)
+	Do ..CommonApi.VoegToeLogItem("MailHandel", ..Offerte.GeefID(), "Mail voor handel """_..Mail.GeefOnderwerp()_""" is verzonden")
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestVanRaemdonck.cls.xml
===================================================================
diff -u -r29059 -r45862
--- vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestVanRaemdonck.cls.xml	(.../TestVanRaemdonck.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestVanRaemdonck.cls.xml	(.../TestVanRaemdonck.cls.xml)	(revision 45862)
@@ -40,7 +40,7 @@
 
 <Method name="GeefKlantData">
 <Private>1</Private>
-<ReturnType>DOM.VKP.impl.KlantData</ReturnType>
+<ReturnType>DOM.common.dto.KlantData</ReturnType>
 <Implementation><![CDATA[	Quit ##class(vhTest.Utils.DOM.common.dto.KlantData.VanRaemdonck).%New()
 ]]></Implementation>
 </Method>
Index: vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestDestil.cls.xml
===================================================================
diff -u -r29059 -r45862
--- vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestDestil.cls.xml	(.../TestDestil.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestDestil.cls.xml	(.../TestDestil.cls.xml)	(revision 45862)
@@ -25,7 +25,7 @@
 
 <Method name="GeefKlantData">
 <Private>1</Private>
-<ReturnType>DOM.VKP.impl.KlantData</ReturnType>
+<ReturnType>DOM.common.dto.KlantData</ReturnType>
 <Implementation><![CDATA[	Quit ##class(vhTest.Utils.DOM.common.dto.KlantData.Destil).%New()
 ]]></Implementation>
 </Method>
Index: vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestDaro.cls.xml
===================================================================
diff -u -r36568 -r45862
--- vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestDaro.cls.xml	(.../TestDaro.cls.xml)	(revision 36568)
+++ vhUnitTest/APPS/EC/impl/HandelRapporteur/Rapporteer/TestDaro.cls.xml	(.../TestDaro.cls.xml)	(revision 45862)
@@ -40,7 +40,7 @@
 
 <Method name="GeefKlantData">
 <Private>1</Private>
-<ReturnType>DOM.VKP.impl.KlantData</ReturnType>
+<ReturnType>DOM.common.dto.KlantData</ReturnType>
 <Implementation><![CDATA[	Quit ##class(vhTest.Utils.DOM.common.dto.KlantData.Daro).%New()
 ]]></Implementation>
 </Method>
Index: APPS/EC/Rapporteur/Rapporteur.cls.xml
===================================================================
diff -u -r36334 -r45862
--- APPS/EC/Rapporteur/Rapporteur.cls.xml	(.../Rapporteur.cls.xml)	(revision 36334)
+++ APPS/EC/Rapporteur/Rapporteur.cls.xml	(.../Rapporteur.cls.xml)	(revision 45862)
@@ -2,10 +2,11 @@
 <Export generator="Cache" version="24">
 <Class name="APPS.EC.Rapporteur.Rapporteur">
 <Abstract>1</Abstract>
-<Super>TECH.Interface,DOM.common.PersonalityUnishopVisitor</Super>
+<Super>TECH.Interface</Super>
 
 <Method name="Rapporteer">
 <Abstract>1</Abstract>
+<FormalSpec>Offerte:APPS.VKP.Offerte,Taal:DOM.enu.Taal</FormalSpec>
 </Method>
 </Class>
 
Index: vhUnitTest/APPS/EC/impl/KlantRapporteur/Rapporteer/Mock.cls.xml
===================================================================
diff -u -r29059 -r45862
--- vhUnitTest/APPS/EC/impl/KlantRapporteur/Rapporteer/Mock.cls.xml	(.../Mock.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/EC/impl/KlantRapporteur/Rapporteer/Mock.cls.xml	(.../Mock.cls.xml)	(revision 45862)
@@ -3,6 +3,18 @@
 <Class name="vhUnitTest.APPS.EC.impl.KlantRapporteur.Rapporteer.Mock">
 <Super>APPS.EC.Rapporteur.impl.KlantRapporteur,Tools.Mock.MockClassBase</Super>
 
+<Method name="%OnNew">
+<FormalSpec>CommonApi:DOM.common.CommonAPI,MailApi:TECH.Mail.MailAPI,VertaalApi:DOM.common.Transl.VertaalAPI,WebshopURLBepaler:APPS.EC.Webshop.impl.UrlBepaler,DataService:APPS.EC.DataService</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	do ##super(.CommonApi,.MailApi,.VertaalApi,.WebshopURLBepaler,.DataService)
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="LogAlsVerzonden">
 <Private>1</Private>
 <Implementation><![CDATA[	Do ..VerwerkMethodCall("LogAlsVerzonden")
Index: vhTest/Mock/DOM/VKP/VerkoopAPI.cls.xml
===================================================================
diff -u -r34878 -r45862
--- vhTest/Mock/DOM/VKP/VerkoopAPI.cls.xml	(.../VerkoopAPI.cls.xml)	(revision 34878)
+++ vhTest/Mock/DOM/VKP/VerkoopAPI.cls.xml	(.../VerkoopAPI.cls.xml)	(revision 45862)
@@ -3,8 +3,7 @@
 <Class name="vhTest.Mock.DOM.VKP.VerkoopAPI">
 <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>
+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>DOM.VKP.VerkoopAPI,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
Index: vhTest/Mock/APPS/common/DataService.cls.xml
===================================================================
diff -u -r29059 -r45862
--- vhTest/Mock/APPS/common/DataService.cls.xml	(.../DataService.cls.xml)	(revision 29059)
+++ vhTest/Mock/APPS/common/DataService.cls.xml	(.../DataService.cls.xml)	(revision 45862)
@@ -3,8 +3,7 @@
 <Class name="vhTest.Mock.APPS.common.DataService">
 <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>
+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>APPS.common.DataService,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
Index: APPS/EC/EventHandler/InformeerGebruikerOverOfferte.cls.xml
===================================================================
diff -u -r29059 -r45862
--- APPS/EC/EventHandler/InformeerGebruikerOverOfferte.cls.xml	(.../InformeerGebruikerOverOfferte.cls.xml)	(revision 29059)
+++ APPS/EC/EventHandler/InformeerGebruikerOverOfferte.cls.xml	(.../InformeerGebruikerOverOfferte.cls.xml)	(revision 45862)
@@ -1,17 +1,17 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.EC.EventHandler.InformeerGebruikerOverOfferte">
-<Super>%RegisteredObject</Super>
+<Super>TECH.RegisteredObject</Super>
 
 <Method name="StartVerwerking">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>OfferteGemaaktEvent:APPS.VKP.event.OfferteGemaaktEvent</FormalSpec>
 <Implementation><![CDATA[
 	#Dim OfferteGemaaktEventData As APPS.VKP.event.OfferteGemaaktEventData = OfferteGemaaktEvent.Data
 	#Dim Offerte As APPS.VKP.impl.Offerte = ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefOfferteService().GeefOfferte(OfferteGemaaktEventData.GeefOfferteID())
-	#Dim Rapporteur As APPS.EC.Rapporteur.Rapporteur = ##class(APPS.EC.Rapporteur.impl.KlantRapporteur).%New(Offerte)	
+	#Dim Rapporteur As APPS.EC.Rapporteur.Rapporteur = ##class(APPS.EC.Rapporteur.impl.KlantRapporteur).%New()	
 	
-	Do Rapporteur.Rapporteer()
+	Do Rapporteur.Rapporteer(Offerte)
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/EC/impl/KlantDataReferentieBepaler.cls.xml
===================================================================
diff -u -r44518 -r45862
--- APPS/EC/impl/KlantDataReferentieBepaler.cls.xml	(.../KlantDataReferentieBepaler.cls.xml)	(revision 44518)
+++ APPS/EC/impl/KlantDataReferentieBepaler.cls.xml	(.../KlantDataReferentieBepaler.cls.xml)	(revision 45862)
@@ -13,6 +13,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="DataService">
+<Type>APPS.EC.DataService</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="KlantDataReferentie">
 <Type>%String</Type>
 <Private>1</Private>
@@ -24,13 +29,14 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>OfferteService:APPS.VKP.OfferteService</FormalSpec>
+<FormalSpec>OfferteService:APPS.VKP.OfferteService,DataService:APPS.EC.DataService</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	set ..OfferteService = $$$Inject(OfferteService,##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefOfferteService())
+	set ..DataService = $$$Inject(DataService,##class(APPS.EC.Rapporteur.impl.IoCContainer).Instance().Resolve("DataService"))
 	quit $$$OK
 ]]></Implementation>
 </Method>
@@ -108,9 +114,8 @@
 <Method name="VerwerkHaefeleBE">
 <FormalSpec>HaefeleBEPersonality:DOM.common.HaefeleBEPersonality</FormalSpec>
 <Implementation><![CDATA[
-	#dim DataService As APPS.common.DataService = ##class(APPS.ApplicatieContext).Instance().GeefCommonAPI().GeefDataService(HaefeleBEPersonality.GeefID())
 	#dim KlantID As DOM.VKP.VanHoeckeKlantID = ..GeefKlantIDVoorInfoVanOfferte(..Offerte)			
-	#dim KlantData As DOM.VKP.impl.KlantData = DataService.GeefKlantData(KlantID)
+	#dim KlantData As DOM.VKP.impl.KlantData = ..DataService.GeefKlantData(HaefeleBEPersonality.GeefID(),KlantID)
 	
 	#dim Naam As %String = KlantData.Naam
 	Do ..VoegToeIndienNodig(Naam)
@@ -120,9 +125,8 @@
 <Method name="VerwerkHaefeleNL">
 <FormalSpec>HaefeleNLPersonality:DOM.common.HaefeleNLPersonality</FormalSpec>
 <Implementation><![CDATA[
-	#dim DataService As APPS.common.DataService = ##class(APPS.ApplicatieContext).Instance().GeefCommonAPI().GeefDataService(HaefeleNLPersonality.GeefID())
 	#dim KlantID As DOM.VKP.VanHoeckeKlantID = ..GeefKlantIDVoorInfoVanOfferte(..Offerte)			
-	#dim KlantData As DOM.VKP.impl.KlantData = DataService.GeefKlantData(KlantID)
+	#dim KlantData As DOM.VKP.impl.KlantData = ..DataService.GeefKlantData(HaefeleNLPersonality.GeefID(),KlantID)
 	
 	#dim Naam As %String = KlantData.Naam
 	Do ..VoegToeIndienNodig(Naam)
@@ -131,22 +135,24 @@
 
 <Method name="VerwerkSFS">
 <FormalSpec>SFSPersonality:DOM.common.SFSPersonality</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwerkVanHoecke">
 <FormalSpec>VanHoeckePersonality:DOM.common.VanHoeckePersonality</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwerkVanHoeckeVoorHalux">
 <FormalSpec>VanHoeckVoorHaluxPersonality:DOM.common.VanHoeckeVoorHaluxPersonality</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwerkHandelMetVerificatieEnEmail">
 <FormalSpec>Personality:DOM.common.Personality</FormalSpec>
 <Implementation><![CDATA[
-	#dim DataService As APPS.common.DataService = ##class(APPS.ApplicatieContext).Instance().GeefCommonAPI().GeefDataService(Personality.GeefID())
 	#dim KlantID As DOM.VKP.VanHoeckeKlantID = ..GeefKlantIDVoorInfoVanOfferte(..Offerte)			
-	#dim KlantData As DOM.VKP.impl.KlantData = DataService.GeefKlantData(KlantID)
+	#dim KlantData As DOM.VKP.impl.KlantData = ..DataService.GeefKlantData(Personality.GeefID(),KlantID)
 	
 	#dim Naam As %String = KlantData.Naam
 	Do ..VoegToeIndienNodig(Naam)
@@ -166,15 +172,14 @@
 <FormalSpec>Personality:DOM.common.Personality</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim DataService As APPS.common.DataService = ##class(APPS.ApplicatieContext).Instance().GeefCommonAPI().GeefDataService(Personality.GeefID())
 	#dim GebruikerID As %String = ..Offerte.GeefAangemaaktDoor()
 	If $Length(GebruikerID)>0 {
-		#dim Gebruiker As %String = DataService.GeefGebruikerData(GebruikerID).Naam
+		#dim Gebruiker As %String = ..DataService.GeefGebruikerData(Personality.GeefID(),GebruikerID).Naam
 		Do ..VoegToeIndienNodig(Gebruiker)
 	}
 	
 	#dim KlantID As DOM.VKP.VanHoeckeKlantID = ..GeefKlantIDVoorInfoVanOfferte(..Offerte)
-	#dim KlantData As DOM.VKP.impl.KlantData = DataService.GeefKlantData(KlantID)
+	#dim KlantData As DOM.VKP.impl.KlantData = ..DataService.GeefKlantData(Personality.GeefID(),KlantID)
 	#dim Naam As %String = KlantData.Naam
 	Do ..VoegToeIndienNodig(Naam)