Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory/GeefAanpasserTest.cls.xml
===================================================================
diff -u -r53374 -r53436
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory/GeefAanpasserTest.cls.xml	(.../GeefAanpasserTest.cls.xml)	(revision 53374)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory/GeefAanpasserTest.cls.xml	(.../GeefAanpasserTest.cls.xml)	(revision 53436)
@@ -3,6 +3,11 @@
 <Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasserFactory.GeefAanpasserTest">
 <Super>vhUnitTest.TestCase</Super>
 
+<Parameter name="BeslagDesignKlantNummer">
+<Type>%String</Type>
+<Default>29070</Default>
+</Parameter>
+
 <Method name="Test Standaard Gedrag">
 <Implementation><![CDATA[
 	Set WinkelkarAanpasserFactory = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasserFactory).%New()	
@@ -25,7 +30,7 @@
 <Implementation><![CDATA[
 	Set WinkelkarAanpasserFactory = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasserFactory).%New()
 	
-	#Dim Aanpasser as WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser = WinkelkarAanpasserFactory.GeefWinkelkarAanpasser(##class(DOM.common.enu.Personality).VanHoecke(),##class(DOM.VKP.enu.Klant).BeslagDesign())
+	#Dim Aanpasser as WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser = WinkelkarAanpasserFactory.GeefWinkelkarAanpasser(##class(DOM.common.enu.Personality).VanHoecke(),..#BeslagDesignKlantNummer)
 	Do $$$AssertEquals(Aanpasser.%ClassName(1),##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.BeslagDesign).%ClassName(1) )
 ]]></Implementation>
 </Method>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory.cls.xml
===================================================================
diff -u -r53374 -r53436
--- WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory.cls.xml	(.../WinkelkarAanpasserFactory.cls.xml)	(revision 53374)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory.cls.xml	(.../WinkelkarAanpasserFactory.cls.xml)	(revision 53436)
@@ -3,11 +3,28 @@
 <Class name="WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasserFactory">
 <Super>TECH.Mockable</Super>
 
+<Property name="LegacyPartijAPI">
+<Type>DOM.PARTIJ.LegacyPartijAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>LegacyPartijAPI:DOM.PARTIJ.LegacyPartijAPI</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..LegacyPartijAPI = $$$Inject(LegacyPartijAPI,##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="GeefWinkelkarAanpasser">
-<FormalSpec>Personality:DOM.common.Personality="",KlantId:%String=""</FormalSpec>
+<FormalSpec>Personality:DOM.common.enu.Personality="",KlantNr:%String=""</FormalSpec>
 <ReturnType>WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser</ReturnType>
 <Implementation><![CDATA[
-	If (Personality = ##class(DOM.common.enu.Personality).VanHoecke()) && (KlantId = ##class(DOM.VKP.enu.Klant).BeslagDesign()){
+	If (Personality = ##class(DOM.common.enu.Personality).VanHoecke()) && (..LegacyPartijAPI.GeefKlantPartijID(KlantNr) = ##class(DOM.VKP.enu.Klant).BeslagDesign()){
 		Quit ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.BeslagDesign).%New()
 	}	
 	Quit ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.Standaard).%New()