Index: APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml
===================================================================
diff -u -r46874 -r51411
--- APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml	(.../KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml)	(revision 46874)
+++ APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml	(.../KlantBestellingNaarLeverancierOfferteKopieerder.cls.xml)	(revision 51411)
@@ -84,6 +84,7 @@
 <Implementation><![CDATA[
 	Quit:(KlantBestelling.GeefPersonalityID() = ##class(DOM.common.enu.Personality).Hein())
 	Quit:(KlantBestelling.GeefPersonalityID() = ##class(DOM.common.enu.Personality).Seefelder())
+	Quit:(KlantBestelling.GeefPersonalityID() = ##class(DOM.common.enu.Personality).HaefeleNL())
 	
 	Do ..ExterneVerkoopService.StelInStandaardLeveradres(LeverancierOfferte)
 ]]></Implementation>
Index: vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder/Kopieer/Test.cls.xml
===================================================================
diff -u -r45816 -r51411
--- vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder/Kopieer/Test.cls.xml	(.../Test.cls.xml)	(revision 45816)
+++ vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteKopieerder/Kopieer/Test.cls.xml	(.../Test.cls.xml)	(revision 51411)
@@ -90,8 +90,47 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Het handel leveradres wordt op standaardleveradres gezet als het geen hein personality is">
+<Method name="Test : Het handel leveradres blijft ongewijzigd als de klant een HäfeleNL personality is">
 <Implementation><![CDATA[
+	#dim Bestelling As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferte(##class(DOM.common.HaefeleNLPersonality).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", Bestelling, ##class(DOM.VKP.enu.Klant).HaefeleNederland(), ##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 KlantDataBepalerStub = ##class(vhTest.Mock.DOM.VKP.KlantDataBepaler).%New()
+	Do KlantDataBepalerStub.IndienMethodCall("GeefKlantData", ##class(DOM.common.HaefeleNLPersonality).Instance(), $$$DummyString).DanReturn(..GeefKlantDataDummy())
+	
+	#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(WinkelkarOfferte)
+	Do WinkelkarService.VerwachtMethodCall("HerberekenPrijs", WinkelkarOfferte).DanDoeNiks()
+	Do WinkelkarService.VerwachtMethodCall("BewaarWinkelkar", WinkelkarOfferte).DanDoeNiks()
+
+	Set Kopieerder = ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder).%New(OfferteKopieerderMock, ExterneVerkoopServiceMock, KlantDataBepalerStub, WinkelkarService)
+	
+	#dim Offerte As APPS.VKP.Offerte = Kopieerder.Kopieer(Bestelling)
+	
+	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, seefelder of häfelenl personality is">
+<Implementation><![CDATA[
 	#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())