Index: vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/RegistreerContactGegevens/Test.cls.xml
===================================================================
diff -u -r41745 -r41746
--- vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/RegistreerContactGegevens/Test.cls.xml	(.../Test.cls.xml)	(revision 41745)
+++ vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/RegistreerContactGegevens/Test.cls.xml	(.../Test.cls.xml)	(revision 41746)
@@ -80,15 +80,15 @@
 <Implementation><![CDATA[
 	#dim RegistreerContactGegevensRequestStub As WS.Vhisie4.Auth.RegistreerContactGegevensRequest = ##class(vhTest.Utils.WS.Vhisie4.Auth.RegistreerContactGegevensRequest).StandaardRegistreerContactGegevensRequest()
 	
-	#dim HandelKlantDataDummy As DOM.VKP.impl.HandelKlantData = ##class(vhTest.Utils.DOM.VKP.HandelKlantData).StandaardHandelKlantData()
-	Set HandelKlantDataRepositoryMock = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
-	Do HandelKlantDataRepositoryMock.VerwachtMethodCall("Maak").ExactAantalKeer(0)
-	Do HandelKlantDataRepositoryMock.VerwachtMethodCall("GeefViaID",$$$ElkeWaarde).ExactAantalKeer(1).DanReturn(HandelKlantDataDummy)
-	
 	Set HandelPersonalityStub = ##class(vhTest.Mock.DOM.common.impl.HandelPersonality).%New("","")
 	Do HandelPersonalityStub.IndienMethodCall("GeefVhisie4Prefix").DanReturn("Vhisie4Prefix")
 	Do HandelPersonalityStub.IndienMethodCall("GeefWebshopVerwerker").DanReturn("")
 	
+	#dim HandelKlantDataDummy As DOM.VKP.impl.HandelKlantData = ##class(vhTest.Utils.DOM.VKP.HandelKlantData).StandaardHandelKlantData()
+	Set HandelKlantDataRepositoryMock = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
+	Do HandelKlantDataRepositoryMock.VerwachtMethodCall("Maak").ExactAantalKeer(0)
+	Do HandelKlantDataRepositoryMock.VerwachtMethodCall("GeefViaID",HandelPersonalityStub.GeefVhisie4Prefix()_RegistreerContactGegevensRequestStub.Header.KlantId).ExactAantalKeer(1).DanReturn(HandelKlantDataDummy)
+	
 	Set HandelPersonalityRepositoryStub = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
 	Do HandelPersonalityRepositoryStub.IndienMethodCall("GeefViaID",RegistreerContactGegevensRequestStub.Header.PersonalityId).DanReturn(HandelPersonalityStub)