Index: vhTest/Mock/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml
===================================================================
diff -u -r44493 -r45731
--- vhTest/Mock/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml	(.../KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml)	(revision 44493)
+++ vhTest/Mock/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml	(.../KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml)	(revision 45731)
@@ -9,9 +9,9 @@
 <Inheritance>right</Inheritance>
 
 <Method name="Kopieer">
-<FormalSpec>TeConverterenOfferte:APPS.VKP.Offerte</FormalSpec>
+<FormalSpec>Bestelling:APPS.VKP.Offerte</FormalSpec>
 <ReturnType>APPS.VKP.Offerte</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("Kopieer",TeConverterenOfferte)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("Kopieer",Bestelling)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhTest/Fake/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml
===================================================================
diff -u
--- vhTest/Fake/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml	(revision 0)
+++ vhTest/Fake/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml	(revision 45731)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.APPS.EC.Verkoop.ExterneVerkoopService">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.EC.Verkoop.ExterneVerkoopService,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Property name="StandaardLeverAdres">
+<Type>DOM.VKP.LeverAdres</Type>
+</Property>
+
+<Method name="StelInStandaardLeveradres">
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
+<Implementation><![CDATA[	Do Offerte.ZetLeverAdres(..StandaardLeverAdres)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/DOM/common/Personality.cls.xml
===================================================================
diff -u -r45709 -r45731
--- vhTest/Mock/DOM/common/Personality.cls.xml	(.../Personality.cls.xml)	(revision 45709)
+++ vhTest/Mock/DOM/common/Personality.cls.xml	(.../Personality.cls.xml)	(revision 45731)
@@ -32,6 +32,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefLeverancierData">
+<ReturnType>DOM.common.LeverancierPersonalityData</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefLeverancierData")
+]]></Implementation>
+</Method>
+
 <Method name="GeefNaam">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefNaam")
Index: APPS/VKP/impl/Offerte.cls.xml
===================================================================
diff -u -r45162 -r45731
--- APPS/VKP/impl/Offerte.cls.xml	(.../Offerte.cls.xml)	(revision 45162)
+++ APPS/VKP/impl/Offerte.cls.xml	(.../Offerte.cls.xml)	(revision 45731)
@@ -105,7 +105,7 @@
 </Index>
 
 <Method name="%OnNew">
-<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,PersonalityID:%String=""</FormalSpec>
+<FormalSpec>KlantID:%String,PersonalityID:%String=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
Index: vhTest/Fake/APPS/VKP/impl/Offerte.cls.xml
===================================================================
diff -u
--- vhTest/Fake/APPS/VKP/impl/Offerte.cls.xml	(revision 0)
+++ vhTest/Fake/APPS/VKP/impl/Offerte.cls.xml	(revision 45731)
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.APPS.VKP.impl.Offerte">
+<Super>APPS.VKP.impl.Offerte</Super>
+
+<Property name="Id">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="ZetID">
+<FormalSpec>Id:%String</FormalSpec>
+<Implementation><![CDATA[	set ..Id = Id
+]]></Implementation>
+</Method>
+
+<Method name="GeefID">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..Id
+]]></Implementation>
+</Method>
+
+<Method name="Save">
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+<DefaultData>OfferteDefaultData1</DefaultData>
+<Data name="OfferteDefaultData1">
+<Subscript>"Offerte"</Subscript>
+<Value name="1">
+<Value>Id</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml
===================================================================
diff -u -r44493 -r45731
--- APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml	(.../KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml)	(revision 44493)
+++ APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml	(.../KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml)	(revision 45731)
@@ -39,76 +39,79 @@
 </Method>
 
 <Method name="Kopieer">
-<FormalSpec>TeConverterenOfferte:APPS.VKP.Offerte</FormalSpec>
+<FormalSpec>Bestelling:APPS.VKP.Offerte</FormalSpec>
 <ReturnType>APPS.VKP.Offerte</ReturnType>
 <Implementation><![CDATA[
-	Do ..ValideerIsHandel(TeConverterenOfferte)
+	Do ..Valideer(Bestelling)
 	
-	#dim GeconverteerdeOfferte As APPS.VKP.Offerte = ..MaakGekoppeldeVanHoeckeOfferte(TeConverterenOfferte)
+	#dim GeconverteerdeOfferte As APPS.VKP.Offerte = ..MaakOfferte(Bestelling)
 
-	Do ..BehoudOorspronkelijkLeveradresIndienHein(GeconverteerdeOfferte, TeConverterenOfferte)
+	Do ..BehoudOorspronkelijkLeveradresIndienHein(GeconverteerdeOfferte, Bestelling)
 	
-	Do ..PasAanDocumentReferenties(GeconverteerdeOfferte, TeConverterenOfferte)
+	Do ..PasAanDocumentReferenties(GeconverteerdeOfferte, Bestelling)
 	
-	Do ..PasAanVHWinkelKar(GeconverteerdeOfferte, TeConverterenOfferte)
+	Do ..PasAanWinkelKar(GeconverteerdeOfferte, Bestelling)
 	
 	Quit GeconverteerdeOfferte
 ]]></Implementation>
 </Method>
 
-<Method name="MaakGekoppeldeVanHoeckeOfferte">
-<FormalSpec>TeConverterenOfferte:APPS.VKP.Offerte</FormalSpec>
+<Method name="MaakOfferte">
+<FormalSpec>Bestelling:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.VKP.Offerte</ReturnType>
 <Implementation><![CDATA[
-	#dim VanHoeckeKlant As %String = TeConverterenOfferte.GeefPersonality().GeefKlantID()
-	Quit ..OfferteKopieerder.KopieerOfferte(TeConverterenOfferte, VanHoeckeKlant, ##class(DOM.common.enu.Personality).VanHoecke())
+	#dim BestellingPersonality As DOM.common.Personality = Bestelling.GeefPersonality()
+	
+	#dim OfferteKlantId As %String = BestellingPersonality.GeefLeverancierData().EigenKlantId
+	#dim OffertePersonalityId As %String = BestellingPersonality.GeefLeverancierData().PersonalityId
+
+	Quit ..OfferteKopieerder.KopieerOfferte(Bestelling, OfferteKlantId, OffertePersonalityId)
 ]]></Implementation>
 </Method>
 
 <Method name="BehoudOorspronkelijkLeveradresIndienHein">
-<FormalSpec>GeconverteerdeOfferte:APPS.VKP.Offerte,TeConverterenOfferte:APPS.VKP.Offerte</FormalSpec>
+<FormalSpec>GeconverteerdeOfferte:APPS.VKP.Offerte,Bestelling:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	If (TeConverterenOfferte.GeefPersonalityID() '= ##class(DOM.common.enu.Personality).Hein())
-	{
+	If (Bestelling.GeefPersonalityID() '= ##class(DOM.common.enu.Personality).Hein()) {
 		Do ..ExterneVerkoopService.StelInStandaardLeveradres(GeconverteerdeOfferte)
 	}
 ]]></Implementation>
 </Method>
 
 <Method name="PasAanDocumentReferenties">
-<FormalSpec>GeconverteerdeOfferte:APPS.VKP.Offerte,TeConverterenOfferte:APPS.VKP.Offerte</FormalSpec>
+<FormalSpec>GeconverteerdeOfferte:APPS.VKP.Offerte,Bestelling:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim DocumentReferenties As DOM.VKP.DocumentReferenties = GeconverteerdeOfferte.GeefDocumentReferenties()
-	#dim DataService As APPS.common.DataService = ..CommonAPI.GeefDataService(TeConverterenOfferte.GeefPersonalityID())
-	#dim KlantData As DOM.common.dto.KlantData = DataService.GeefKlantData(TeConverterenOfferte.GeefKlantID())
+	#dim DataService As APPS.common.DataService = ..CommonAPI.GeefDataService(Bestelling.GeefPersonalityID())
+	#dim KlantData As DOM.common.dto.KlantData = DataService.GeefKlantData(Bestelling.GeefKlantID())
 	Set DocumentReferenties.CommissieReferentie = ##class(TECH.StringUtils).Append(DocumentReferenties.CommissieReferentie, KlantData.Naam, ", ")
 ]]></Implementation>
 </Method>
 
-<Method name="PasAanVHWinkelKar">
-<FormalSpec>GeconverteerdeOfferte:APPS.VKP.Offerte,TeConverterenOfferte:APPS.VKP.Offerte</FormalSpec>
+<Method name="PasAanWinkelKar">
+<FormalSpec>GeconverteerdeOfferte:APPS.VKP.Offerte,Bestelling:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ..WinkelkarService.GeefWinkelkar(GeconverteerdeOfferte.GeefWinkelkarID())
 	Do Winkelkar.ZetPersonalityID(##class(DOM.common.enu.Personality).VanHoecke())
-	Do Winkelkar.ZetKlantID(TeConverterenOfferte.GeefPersonality().GeefKlantID())
+	Do Winkelkar.ZetKlantID(Bestelling.GeefPersonality().GeefKlantID())
 	Do ..WinkelkarService.HerberekenPrijs(Winkelkar)
 	Do ..WinkelkarService.BewaarWinkelkar(Winkelkar)
 	Do GeconverteerdeOfferte.PrijzenWerdenHerberekend()
 ]]></Implementation>
 </Method>
 
-<Method name="ValideerIsHandel">
-<FormalSpec>TeConverterenOfferte:APPS.VKP.Offerte</FormalSpec>
+<Method name="Valideer">
+<FormalSpec>Bestelling:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	If $$$Not(TeConverterenOfferte.GeefPersonality().IsHandel()) {
+	If $$$Not(Bestelling.GeefPersonality().IsHandel()) {
 		Set Exceptie = ##class(TECH.Exceptions.GeneralErrorException).%New("De personality van de offerte die geconverteerd moet worden, is geen handelofferte")
-		do Exceptie.VoegToeExtraInfo("OfferteID : "_TeConverterenOfferte.GeefID())
-		do Exceptie.VoegToeExtraInfo("Personality : "_TeConverterenOfferte.GeefPersonality().GeefCode())
+		do Exceptie.VoegToeExtraInfo("OfferteID : "_Bestelling.GeefID())
+		do Exceptie.VoegToeExtraInfo("Personality : "_Bestelling.GeefPersonality().GeefCode())
 		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
 	}
 ]]></Implementation>
Index: vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder/Kopieer/Test.cls.xml
===================================================================
diff -u -r44493 -r45731
--- vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder/Kopieer/Test.cls.xml	(.../Test.cls.xml)	(revision 44493)
+++ vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder/Kopieer/Test.cls.xml	(.../Test.cls.xml)	(revision 45731)
@@ -3,34 +3,34 @@
 <Class name="vhUnitTest.APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder.Kopieer.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test: Standaardgedrag">
+<Method name="Test: Standaard gedrag">
 <Implementation><![CDATA[
-	#dim TeKopierenOfferte As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferteFake(##class(DOM.common.enu.Personality).VanHoecke())
-	#dim TijdelijkeOfferte As vhTest.Mock.APPS.VKP.Offerte = TeKopierenOfferte
+	#dim Bestelling As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferte(##class(DOM.common.DaroPersonality).Instance())
+	#dim TijdelijkeOfferte As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferte(##class(DOM.common.VanHoeckePersonality).Instance())
 	
 	Set OfferteKopieerderMock = ##class(vhTest.Mock.APPS.VKP.Offerte.impl.OfferteKopieerder).%New()
-	Do OfferteKopieerderMock.VerwachtMethodCall("KopieerOfferte", TeKopierenOfferte, TeKopierenOfferte.GeefPersonality().GeefKlantID(), TeKopierenOfferte.GeefPersonality().GeefID()).DanReturn(TijdelijkeOfferte)
+	Do OfferteKopieerderMock.VerwachtMethodCall("KopieerOfferte", Bestelling, ##class(DOM.VKP.enu.Klant).DaroFactors(), ##class(DOM.common.enu.Personality).VanHoecke()).DanReturn(TijdelijkeOfferte)
 	
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
-	Do ExterneVerkoopServiceMock.VerwachtMethodCall("StelInStandaardLeveradres", TijdelijkeOfferte)
+	Do ExterneVerkoopServiceMock.VerwachtMethodCall("StelInStandaardLeveradres", TijdelijkeOfferte).DanDoeNiks()
 	
 	#dim DataServiceStub As vhTest.Mock.APPS.common.DataService = ##class(vhTest.Mock.APPS.common.DataService).%New()
 	Do DataServiceStub.IndienMethodCall("GeefKlantData", $$$ElkeWaarde).DanReturn(..GeefKlantDataDummy())
 	#dim CommonAPIStub As vhTest.Mock.APPS.common.CommonAPI	= ##class(vhTest.Mock.APPS.common.CommonAPI).%New()
 	Do CommonAPIStub.IndienMethodCall("GeefDataService", $$$ElkeWaarde).DanReturn(DataServiceStub)
 	
-	#dim StandaardWinkelkar = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).StandaardWinkelkar()
-	Set StandaardWinkelkar.KlantID = TeKopierenOfferte.GeefPersonality().GeefKlantID()
-	Set StandaardWinkelkar.PersonalityID = TeKopierenOfferte.GeefPersonality().GeefID()
+	#dim WinkelkarOfferte = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).StandaardWinkelkar()
+	Set WinkelkarOfferte.KlantID = TijdelijkeOfferte.GeefKlantID()
+	Set WinkelkarOfferte.PersonalityID = TijdelijkeOfferte.GeefPersonality().GeefID()
 	
 	Set WinkelkarService = ##class(vhTest.Mock.DOM.EC.Winkelkar.WinkelkarService).%New()
-	Do WinkelkarService.VerwachtMethodCall("GeefWinkelkar", TijdelijkeOfferte.GeefWinkelkarID()).DanReturn(StandaardWinkelkar)
-	Do WinkelkarService.VerwachtMethodCall("HerberekenPrijs", StandaardWinkelkar).DanDoeNiks()
-	Do WinkelkarService.VerwachtMethodCall("BewaarWinkelkar", StandaardWinkelkar).DanDoeNiks()
+	Do WinkelkarService.VerwachtMethodCall("GeefWinkelkar", TijdelijkeOfferte.GeefWinkelkarID()).DanReturn(WinkelkarOfferte)
+	Do WinkelkarService.VerwachtMethodCall("HerberekenPrijs", WinkelkarOfferte).DanDoeNiks()
+	Do WinkelkarService.VerwachtMethodCall("BewaarWinkelkar", WinkelkarOfferte).DanDoeNiks()
 	
 	Set Kopieerder = ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder).%New(OfferteKopieerderMock, ExterneVerkoopServiceMock, CommonAPIStub, WinkelkarService)
 	
-	#dim GekopieerdeOfferte As APPS.VKP.Offerte = Kopieerder.Kopieer(TeKopierenOfferte)
+	#dim Offerte As APPS.VKP.Offerte = Kopieerder.Kopieer(Bestelling)
 	
 	Do OfferteKopieerderMock.Verifieer()
 	Do ExterneVerkoopServiceMock.Verifieer()
@@ -53,125 +53,105 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test : het handel leveradres blijft ongewijzigd als de klant een Hein personality is">
+<Method name="Test : Het handel leveradres blijft ongewijzigd als de klant een Hein personality is">
 <Implementation><![CDATA[
+	#dim Bestelling As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferte(##class(DOM.common.HeinPersonality).Instance())
+	#dim TijdelijkeOfferte As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferte(##class(DOM.common.VanHoeckePersonality).Instance())
 	
-	#dim TeKopierenOfferte As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferteFake(##class(DOM.common.enu.Personality).VanHoecke())
-	#dim TijdelijkeOfferte As vhTest.Mock.APPS.VKP.Offerte = TeKopierenOfferte
-	
 	Set OfferteKopieerderMock = ##class(vhTest.Mock.APPS.VKP.Offerte.impl.OfferteKopieerder).%New()
-	Do OfferteKopieerderMock.VerwachtMethodCall("KopieerOfferte", TeKopierenOfferte, TeKopierenOfferte.GeefPersonality().GeefKlantID(), TeKopierenOfferte.GeefPersonality().GeefID()).DanReturn(TijdelijkeOfferte)
+	Do OfferteKopieerderMock.VerwachtMethodCall("KopieerOfferte", Bestelling, ##class(DOM.VKP.enu.Klant).Hein(), ##class(DOM.common.enu.Personality).VanHoecke()).DanReturn(TijdelijkeOfferte)
 	
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
-	Do ExterneVerkoopServiceMock.VerwachtMethodCall("StelInStandaardLeveradres", TijdelijkeOfferte).ExactAantalKeer(1)
+	Do ExterneVerkoopServiceMock.VerwachtMethodCall("StelInStandaardLeveradres", TijdelijkeOfferte).ExactAantalKeer(0)
 	
 	#dim DataServiceStub As vhTest.Mock.APPS.common.DataService = ##class(vhTest.Mock.APPS.common.DataService).%New()
 	Do DataServiceStub.IndienMethodCall("GeefKlantData", $$$ElkeWaarde).DanReturn(..GeefKlantDataDummy())
 	#dim CommonAPIStub As vhTest.Mock.APPS.common.CommonAPI	= ##class(vhTest.Mock.APPS.common.CommonAPI).%New()
 	Do CommonAPIStub.IndienMethodCall("GeefDataService", $$$ElkeWaarde).DanReturn(DataServiceStub)
 	
-	#dim StandaardWinkelkar = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).StandaardWinkelkar()
-	Set StandaardWinkelkar.KlantID = TeKopierenOfferte.GeefPersonality().GeefKlantID()
-	Set StandaardWinkelkar.PersonalityID = TeKopierenOfferte.GeefPersonality().GeefID()
+	#dim WinkelkarOfferte = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).StandaardWinkelkar()
+	Set WinkelkarOfferte.KlantID = TijdelijkeOfferte.GeefKlantID()
+	Set WinkelkarOfferte.PersonalityID = TijdelijkeOfferte.GeefPersonality().GeefID()
 	
 	Set WinkelkarService = ##class(vhTest.Mock.DOM.EC.Winkelkar.WinkelkarService).%New()
-	Do WinkelkarService.VerwachtMethodCall("GeefWinkelkar", TijdelijkeOfferte.GeefWinkelkarID()).DanReturn(StandaardWinkelkar)
-	Do WinkelkarService.VerwachtMethodCall("HerberekenPrijs", StandaardWinkelkar).DanDoeNiks()
-	Do WinkelkarService.VerwachtMethodCall("BewaarWinkelkar", StandaardWinkelkar).DanDoeNiks()
+	Do WinkelkarService.VerwachtMethodCall("GeefWinkelkar", TijdelijkeOfferte.GeefWinkelkarID()).DanReturn(WinkelkarOfferte)
+	Do WinkelkarService.VerwachtMethodCall("HerberekenPrijs", WinkelkarOfferte).DanDoeNiks()
+	Do WinkelkarService.VerwachtMethodCall("BewaarWinkelkar", WinkelkarOfferte).DanDoeNiks()
 
-
 	Set Kopieerder = ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder).%New(OfferteKopieerderMock, ExterneVerkoopServiceMock, CommonAPIStub, WinkelkarService)
 	
-	#dim GekopieerdeOfferte As APPS.VKP.Offerte = Kopieerder.Kopieer(TeKopierenOfferte)
+	#dim Offerte As APPS.VKP.Offerte = Kopieerder.Kopieer(Bestelling)
 	
-	Do $$$AssertEquals(GekopieerdeOfferte.GeefLeverAdres().GeefAanspreking(), TeKopierenOfferte.GeefLeverAdres().GeefAanspreking())
-	Do $$$AssertEquals(GekopieerdeOfferte.GeefLeverAdres().GeefGemeente(), TeKopierenOfferte.GeefLeverAdres().GeefGemeente())
-	Do $$$AssertEquals(GekopieerdeOfferte.GeefLeverAdres().GeefPostcode(), TeKopierenOfferte.GeefLeverAdres().GeefPostcode())
-	Do $$$AssertEquals(GekopieerdeOfferte.GeefLeverAdres().GeefStraat(), TeKopierenOfferte.GeefLeverAdres().GeefStraat())
-	Do $$$AssertEquals(GekopieerdeOfferte.GeefLeverAdres().GeefTaal(), TeKopierenOfferte.GeefLeverAdres().GeefTaal())
+	Do $$$AssertEquals(Offerte.GeefLeverAdres().GeefAanspreking(), Bestelling.GeefLeverAdres().GeefAanspreking())
+	Do $$$AssertEquals(Offerte.GeefLeverAdres().GeefGemeente(), Bestelling.GeefLeverAdres().GeefGemeente())
+	Do $$$AssertEquals(Offerte.GeefLeverAdres().GeefPostcode(), Bestelling.GeefLeverAdres().GeefPostcode())
+	Do $$$AssertEquals(Offerte.GeefLeverAdres().GeefStraat(), Bestelling.GeefLeverAdres().GeefStraat())
+	Do $$$AssertEquals(Offerte.GeefLeverAdres().GeefTaal(), Bestelling.GeefLeverAdres().GeefTaal())
 	
 	Do OfferteKopieerderMock.Verifieer()
 	Do ExterneVerkoopServiceMock.Verifieer()
 	Do WinkelkarService.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test : het handel leveradres wordt op standaardleveradres gezet als het geen hein personality is">
+<Method name="Test: Het handel leveradres wordt op standaardleveradres gezet als het geen hein personality is">
 <Implementation><![CDATA[
-	#dim TeKopierenOfferte As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferteFake(##class(DOM.common.enu.Personality).Hein())
-	#dim TijdelijkeOfferte As vhTest.Mock.APPS.VKP.Offerte = TeKopierenOfferte
+	#dim Bestelling As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferte(##class(DOM.common.DaroPersonality).Instance())
+	#dim TijdelijkeOfferte As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferte(##class(DOM.common.VanHoeckePersonality).Instance())
 	
 	Set OfferteKopieerderMock = ##class(vhTest.Mock.APPS.VKP.Offerte.impl.OfferteKopieerder).%New()
-	Do OfferteKopieerderMock.VerwachtMethodCall("KopieerOfferte", TeKopierenOfferte, TeKopierenOfferte.GeefPersonality().GeefKlantID(), TeKopierenOfferte.GeefPersonality().GeefID()).DanReturn(TijdelijkeOfferte)
+	Do OfferteKopieerderMock.VerwachtMethodCall("KopieerOfferte", Bestelling, ##class(DOM.VKP.enu.Klant).DaroFactors(), ##class(DOM.common.enu.Personality).VanHoecke()).DanReturn(TijdelijkeOfferte)
 	
-	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
-	Do ExterneVerkoopServiceMock.VerwachtMethodCall("StelInStandaardLeveradres", TijdelijkeOfferte).ExactAantalKeer(0)
+	Set FakeExterneVerkoopService = ##class(vhTest.Fake.APPS.EC.Verkoop.ExterneVerkoopService).%New()
+	set FakeExterneVerkoopService.StandaardLeverAdres = ##class(vhTest.Utils.DOM.VKP.LeverAdres).Belgisch()
 	
 	#dim DataServiceStub As vhTest.Mock.APPS.common.DataService = ##class(vhTest.Mock.APPS.common.DataService).%New()
 	Do DataServiceStub.IndienMethodCall("GeefKlantData", $$$ElkeWaarde).DanReturn(..GeefKlantDataDummy())
 	#dim CommonAPIStub As vhTest.Mock.APPS.common.CommonAPI	= ##class(vhTest.Mock.APPS.common.CommonAPI).%New()
 	Do CommonAPIStub.IndienMethodCall("GeefDataService", $$$ElkeWaarde).DanReturn(DataServiceStub)
 	
-	#dim StandaardWinkelkar = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).StandaardWinkelkar()
-	Set StandaardWinkelkar.KlantID = TeKopierenOfferte.GeefPersonality().GeefKlantID()
-	Set StandaardWinkelkar.PersonalityID = TeKopierenOfferte.GeefPersonality().GeefID()
+	#dim WinkelkarOfferte = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).StandaardWinkelkar()
+	Set WinkelkarOfferte.KlantID = TijdelijkeOfferte.GeefPersonality().GeefKlantID()
+	Set WinkelkarOfferte.PersonalityID = TijdelijkeOfferte.GeefPersonality().GeefID()
 	
 	Set WinkelkarService = ##class(vhTest.Mock.DOM.EC.Winkelkar.WinkelkarService).%New()
-	Do WinkelkarService.VerwachtMethodCall("GeefWinkelkar", TijdelijkeOfferte.GeefWinkelkarID()).DanReturn(StandaardWinkelkar)
-	Do WinkelkarService.VerwachtMethodCall("HerberekenPrijs", StandaardWinkelkar).DanDoeNiks()
-	Do WinkelkarService.VerwachtMethodCall("BewaarWinkelkar", StandaardWinkelkar).DanDoeNiks()
+	Do WinkelkarService.VerwachtMethodCall("GeefWinkelkar", TijdelijkeOfferte.GeefWinkelkarID()).DanReturn(WinkelkarOfferte)
+	Do WinkelkarService.VerwachtMethodCall("HerberekenPrijs", WinkelkarOfferte).DanDoeNiks()
+	Do WinkelkarService.VerwachtMethodCall("BewaarWinkelkar", WinkelkarOfferte).DanDoeNiks()
 
-
-	Set Kopieerder = ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder).%New(OfferteKopieerderMock, ExterneVerkoopServiceMock, CommonAPIStub, WinkelkarService)
+	Set Kopieerder = ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder).%New(OfferteKopieerderMock, FakeExterneVerkoopService, CommonAPIStub, WinkelkarService)
 	
-	#dim GekopieerdeOfferte As APPS.VKP.Offerte = Kopieerder.Kopieer(TeKopierenOfferte)
+	#dim Offerte As APPS.VKP.Offerte = Kopieerder.Kopieer(Bestelling)
 	
-	Do $$$AssertEquals(GekopieerdeOfferte.GeefLeverAdres().GeefAanspreking(), TeKopierenOfferte.GeefLeverAdres().GeefAanspreking())
-	Do $$$AssertEquals(GekopieerdeOfferte.GeefLeverAdres().GeefGemeente(), TeKopierenOfferte.GeefLeverAdres().GeefGemeente())
-	Do $$$AssertEquals(GekopieerdeOfferte.GeefLeverAdres().GeefPostcode(), TeKopierenOfferte.GeefLeverAdres().GeefPostcode())
-	Do $$$AssertEquals(GekopieerdeOfferte.GeefLeverAdres().GeefStraat(), TeKopierenOfferte.GeefLeverAdres().GeefStraat())
-	Do $$$AssertEquals(GekopieerdeOfferte.GeefLeverAdres().GeefTaal(), TeKopierenOfferte.GeefLeverAdres().GeefTaal())
-	
+	Do $$$AssertEquals(Bestelling.GeefLeverAdres().GeefAanspreking(),"OrigineleAanspreking")
+	Do $$$AssertEquals(Bestelling.GeefLeverAdres().GeefGemeente(),"OrigineleGemeente")
+	Do $$$AssertEquals(Bestelling.GeefLeverAdres().GeefPostcode(),"OriginelePostcode")
+	Do $$$AssertEquals(Bestelling.GeefLeverAdres().GeefStraat(),"OrigineleStraat")
+	Do $$$AssertEquals(Bestelling.GeefLeverAdres().GeefTaal(),"OrigineleTaal")
+		
+	Do $$$AssertEquals(Offerte.GeefLeverAdres().GeefAanspreking(),"")
+	Do $$$AssertEquals(Offerte.GeefLeverAdres().GeefGemeente(),"Sint-Niklaas")
+	Do $$$AssertEquals(Offerte.GeefLeverAdres().GeefPostcode(),"9100")
+	Do $$$AssertEquals(Offerte.GeefLeverAdres().GeefStraat(),"Ankerstraat 91")
+	Do $$$AssertEquals(Offerte.GeefLeverAdres().GeefTaal(),"")
+
 	Do OfferteKopieerderMock.Verifieer()
-	Do ExterneVerkoopServiceMock.Verifieer()
 	Do WinkelkarService.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="GeefOfferteFake">
-<FormalSpec>Personality:DOM.common.enu.Personality</FormalSpec>
+<Method name="GeefOfferte">
+<FormalSpec>Personality:DOM.common.Personality</FormalSpec>
 <Private>1</Private>
 <ReturnType>vhTest.Mock.APPS.VKP.Offerte</ReturnType>
 <Implementation><![CDATA[
-	Set OfferteFake = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
-	Do OfferteFake.IndienMethodCall("GeefID").DanReturn($$$DummyString)
-	Do OfferteFake.IndienMethodCall("GeefPersonalityID").DanReturn(Personality)
-	Do OfferteFake.IndienMethodCall("GeefKlantID").DanReturn($$$DummyString)
-	Do OfferteFake.IndienMethodCall("GeefPersonality").DanReturn(..GeefPersonalityStub())
-	Do OfferteFake.IndienMethodCall("GeefBestelOpmerking").DanReturn($$$DummyString)
-	Do OfferteFake.IndienMethodCall("GeefLeverDatum").DanReturn($$$DummyDate)
-	Do OfferteFake.IndienMethodCall("GeefPrijsBerekeningDatum").DanReturn($$$DummyDate)
-	Do OfferteFake.IndienMethodCall("GeefOrderID").DanReturn($$$DummyInteger)
-	Do OfferteFake.IndienMethodCall("GeefWinkelkarID").DanReturn($$$DummyInteger)
-	Do OfferteFake.IndienMethodCall("GeefLeverAdres").DanReturn(..GeefLeverAdresDummy())
-	Do OfferteFake.IndienMethodCall("GeefDocumentReferenties").DanReturn(##class(vhTest.Fake.DOM.VKP.DocumentReferenties).%New())
-	Do OfferteFake.IndienMethodCall("PrijzenWerdenHerberekend").DanDoeNiks()
-	Quit OfferteFake
+	Set Offerte = ##class(vhTest.Fake.APPS.VKP.impl.Offerte).%New($$$DummyString,Personality.GeefID())
+	Do Offerte.ZetID($$$DummyString)
+	Do Offerte.ZetLeverAdres(..GeefLeverAdresDummy())
+	Quit Offerte
 ]]></Implementation>
 </Method>
 
-<Method name="GeefPersonalityStub">
-<Private>1</Private>
-<ReturnType>vhTest.Mock.DOM.common.Personality</ReturnType>
-<Implementation><![CDATA[
-	#dim PersonalityStub As vhTest.Mock.DOM.common.Personality = ##class(vhTest.Mock.DOM.common.Personality).%New()
-	Do PersonalityStub.IndienMethodCall("GeefKlantID").DanReturn($$$DummyString)
-	Do PersonalityStub.IndienMethodCall("GeefID").DanReturn(##class(DOM.common.enu.Personality).VanHoecke())
-	Do PersonalityStub.IndienMethodCall("IsHandel").DanReturn($$$True)
-	Quit PersonalityStub
-]]></Implementation>
-</Method>
-
 <Method name="GeefLeverAdresDummy">
 <Private>1</Private>
 <ReturnType>DOM.VKP.impl.LeverAdres</ReturnType>