Index: WSdata/Vhisie4/Winkelkar/KlantenBepaler.cls.xml
===================================================================
diff -u
--- WSdata/Vhisie4/Winkelkar/KlantenBepaler.cls.xml	(revision 0)
+++ WSdata/Vhisie4/Winkelkar/KlantenBepaler.cls.xml	(revision 41979)
@@ -0,0 +1,35 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSdata.Vhisie4.Winkelkar.KlantenBepaler">
+<Super>TECH.Mockable</Super>
+
+<Property name="ExportStatusRepository">
+<Type>WSdata.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>ExportStatusRepository:WSdata.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusRepository</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..ExportStatusRepository = $$$Inject(ExportStatusRepository, ##class(WSdata.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusRepository).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="IsVhisie4Klant">
+<FormalSpec>KlantPartijID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim KlantHeeftToelatingVoorVhisie4 As %Boolean = ..ExportStatusRepository.BestaatViaVanhoeckeId(KlantPartijID)
+	Set KlantHeeftToelatingVoorVhisie4 = KlantHeeftToelatingVoorVhisie4 || ##class(TECH.StringUtils).InList("K||1000;K||3681;K||8166;K||10921;K||9186;K||7606;K||1190;K||8207;K||15415;K||17738;K||2402",KlantPartijID)
+	Quit:KlantHeeftToelatingVoorVhisie4
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml
===================================================================
diff -u -r41688 -r41979
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml	(.../Test.cls.xml)	(revision 41688)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml	(.../Test.cls.xml)	(revision 41979)
@@ -3,8 +3,8 @@
 <Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Property name="ExportStatusRepositoryMock">
-<Type>vhTest.Mock.WSdata.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusRepository</Type>
+<Property name="KlantenBepalerMock">
+<Type>vhTest.Mock.WSdata.Vhisie4.Winkelkar.KlantenBepaler</Type>
 <Private>1</Private>
 </Property>
 
@@ -37,7 +37,7 @@
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(aTestName)
-	Set ..ExportStatusRepositoryMock = ##class(vhTest.Mock.WSdata.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusRepository).%New()
+	Set ..KlantenBepalerMock = ##class(vhTest.Mock.WSdata.Vhisie4.Winkelkar.KlantenBepaler).%New()
 	Set ..LegacyPartijAPIMock = ##class(vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI).%New()
 	Set ..WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
 	Set ..VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -50,15 +50,15 @@
 <Implementation><![CDATA[
 	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
 	
-	Do ..ExportStatusRepositoryMock.VerwachtMethodCall("BestaatViaVanhoeckeId", "KlantId").DanReturn($$$True)
+	Do ..KlantenBepalerMock.VerwachtMethodCall("IsVhisie4Klant", "KlantId").DanReturn($$$True)
 	Do ..LegacyPartijAPIMock.VerwachtMethodCall("IsKlantPartijID","KlantId").DanReturn($$$True)
 	Do ..WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", "WinkelkarId").DanReturn("DummyID")
 	Do ..VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding", "DummyID", ..Matches.DataTransferObject(VerwachteHoofding)).DanDoeNiks()
 	Do ..VerkoopServiceMock.VerwachtMethodCall("BestelOfferte", "DummyID", "KlantId",##class(DOM.common.enu.Personality).VanHoecke()).DanDoeNiks()
 	Do ..CheckoutTypeBepalerMock.VerwachtMethodCall("Bepaal", "PersonalityId","KlantId").DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).MetTransportKeuze())
 	Do ..TransportServiceMock.VerwachtMethodCall("ZetGekozenVerzendingMogelijkheid","DummyID","VerzendingMogelijkheidID","OptieKeuze").ExactAantalKeer(1).DanDoeNiks()
 	
-	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..LegacyPartijAPIMock, ..ExportStatusRepositoryMock, ..TransportServiceMock,..CheckoutTypeBepalerMock)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..LegacyPartijAPIMock, ..KlantenBepalerMock, ..TransportServiceMock,..CheckoutTypeBepalerMock)
 
 	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest
 	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
@@ -67,7 +67,7 @@
 	
 	Do Service.BestelWinkelkar(BestelWinkelkarRequest)
 
-	Do ..ExportStatusRepositoryMock.Verifieer()
+	Do ..KlantenBepalerMock.Verifieer()
 	Do ..LegacyPartijAPIMock.Verifieer()
 	Do ..WinkelkarRepositoryMock.Verifieer()
 	Do ..VerkoopServiceMock.Verifieer()
@@ -78,13 +78,13 @@
 
 <Method name="Test: Offerte wordt niet besteld als zethoofding een fout geeft">
 <Implementation><![CDATA[
-	Do ..ExportStatusRepositoryMock.IndienMethodCall("BestaatViaVanhoeckeId", $$$ElkeWaarde).DanReturn($$$True)
+	Do ..KlantenBepalerMock.IndienMethodCall("IsVhisie4Klant", $$$ElkeWaarde).DanReturn($$$True)
 	Do ..LegacyPartijAPIMock.IndienMethodCall("IsKlantPartijID",$$$ElkeWaarde).DanReturn($$$True)
 	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", "WinkelkarId").DanReturn("DummyID")
 	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding",$$$ElkeWaarde, $$$ElkeWaarde).DanException($$$DummyException)
 	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
 
-	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..LegacyPartijAPIMock, ..ExportStatusRepositoryMock, ,..CheckoutTypeBepalerMock)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..LegacyPartijAPIMock, ..KlantenBepalerMock, ,..CheckoutTypeBepalerMock)
 
 	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest
 	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
@@ -100,15 +100,15 @@
 <Implementation><![CDATA[
 	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
 
-	Do ..ExportStatusRepositoryMock.IndienMethodCall("BestaatViaVanhoeckeId", $$$ElkeWaarde).DanReturn($$$True)
+	Do ..KlantenBepalerMock.IndienMethodCall("IsVhisie4Klant", $$$ElkeWaarde).DanReturn($$$True)
 	Do ..LegacyPartijAPIMock.IndienMethodCall("IsKlantPartijID",$$$ElkeWaarde).DanReturn($$$True)
 	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", "WinkelkarId").DanReturn("DummyID")
 	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanDoeNiks()
 	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
 	
 	Do ..VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","DummyID",..Matches.DataTransferObject(VerwachteHoofding)).DanDoeNiks()
 
-	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..LegacyPartijAPIMock, ..ExportStatusRepositoryMock, ,..CheckoutTypeBepalerMock)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..LegacyPartijAPIMock, ..KlantenBepalerMock, ,..CheckoutTypeBepalerMock)
 	
 	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest 
 	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()	
@@ -124,7 +124,7 @@
 	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
 	set VerwachteHoofding.LeveringDetail.WensDatum = "ASAP"
 
-	Do ..ExportStatusRepositoryMock.IndienMethodCall("BestaatViaVanhoeckeId", $$$ElkeWaarde).DanReturn($$$True)
+	Do ..KlantenBepalerMock.IndienMethodCall("IsVhisie4Klant", $$$ElkeWaarde).DanReturn($$$True)
 	Do ..LegacyPartijAPIMock.IndienMethodCall("IsKlantPartijID",$$$ElkeWaarde).DanReturn($$$True)
 	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", "WinkelkarId").DanReturn("DummyID")
 	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanDoeNiks()
@@ -137,7 +137,7 @@
 	set BestelWinkelkarRequest.WensLeverDatum = ""
 	set BestelWinkelkarRequest.IsAsap = $$$true
 	
-	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..LegacyPartijAPIMock, ..ExportStatusRepositoryMock, ,..CheckoutTypeBepalerMock)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..LegacyPartijAPIMock, ..KlantenBepalerMock, ,..CheckoutTypeBepalerMock)
 	Do Service.BestelWinkelkar(BestelWinkelkarRequest)
 	
 	Do ..VerkoopServiceMock.Verifieer()
@@ -146,15 +146,15 @@
 
 <Method name="Test: BestelWinkelkar haalt de interne id op adhv ExterneId">
 <Implementation><![CDATA[
-	Do ..ExportStatusRepositoryMock.IndienMethodCall("BestaatViaVanhoeckeId", $$$ElkeWaarde).DanReturn($$$True)
+	Do ..KlantenBepalerMock.IndienMethodCall("IsVhisie4Klant", $$$ElkeWaarde).DanReturn($$$True)
 	Do ..LegacyPartijAPIMock.IndienMethodCall("IsKlantPartijID",$$$ElkeWaarde).DanReturn($$$True)
 	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding",$$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
 	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanDoeNiks()
 	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
 
 	Do ..WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", "WinkelkarId").DanReturn("DummyID")
 
-	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..LegacyPartijAPIMock, ..ExportStatusRepositoryMock, ,..CheckoutTypeBepalerMock)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..LegacyPartijAPIMock, ..KlantenBepalerMock, ,..CheckoutTypeBepalerMock)
 
 	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest
 	Set BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
@@ -166,29 +166,29 @@
 
 <Method name="Test: BestelWinkelkar geeft foutmelding indien ExterneId niet bestaat">
 <Implementation><![CDATA[
-	Do ..ExportStatusRepositoryMock.IndienMethodCall("BestaatViaVanhoeckeId", $$$ElkeWaarde).DanReturn($$$True)
+	Do ..KlantenBepalerMock.IndienMethodCall("IsVhisie4Klant", $$$ElkeWaarde).DanReturn($$$True)
 	
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Winkelkar met id 'Onbestaande_WinkelkarId' bestaat niet.")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException", Substrings))
 	
 	#dim Request As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
 	Set Request.Winkelkar.Id = "Onbestaande_WinkelkarId"
-	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(,,,..ExportStatusRepositoryMock)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(,,,..KlantenBepalerMock)
 	
 	Do Service.BestelWinkelkar(Request)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: BestelWinkelkar geeft foutmelding indien klant niet gemigreerd is naar vhisie4">
 <Implementation><![CDATA[
-	Do ..ExportStatusRepositoryMock.IndienMethodCall("BestaatViaVanhoeckeId", $$$ElkeWaarde).DanReturn($$$False)
+	Do ..KlantenBepalerMock.IndienMethodCall("IsVhisie4Klant", $$$ElkeWaarde).DanReturn($$$False)
 	
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("U moet voorlopig nog de oude webshop gebruiken voor echte bestellingen.")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidUserInputException", Substrings))
 	
 	#dim Request As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
 	Set Request.Header.Taal = "N"
-	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(,,,..ExportStatusRepositoryMock)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(,,,..KlantenBepalerMock)
 	
 	Do Service.BestelWinkelkar(Request)
 ]]></Implementation>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml
===================================================================
diff -u -r41966 -r41979
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml	(.../BestelWinkelkar.cls.xml)	(revision 41966)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml	(.../BestelWinkelkar.cls.xml)	(revision 41979)
@@ -18,8 +18,8 @@
 <Private>1</Private>
 </Property>
 
-<Property name="ExportStatusRepository">
-<Type>WSdata.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusRepository</Type>
+<Property name="KlantenBepaler">
+<Type>WSdata.Vhisie4.Winkelkar.KlantenBepaler</Type>
 <Private>1</Private>
 </Property>
 
@@ -34,7 +34,7 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>VerkoopService:APPS.EC.Verkoop.impl.Externe.VerkoopService,WinkelkarRepository:WSimpl.Vhisie4.Winkelkar.WinkelkarRepository,LegacyPartijAPI:DOM.PARTIJ.LegacyPartijAPI,ExportStatusRepository:WSdata.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusRepository,TransportService:APPS.EC.Transport.Service,CheckoutTypeBepaler:APPS.EC.impl.ConfiguratorService.CheckoutTypeBepaler</FormalSpec>
+<FormalSpec>VerkoopService:APPS.EC.Verkoop.impl.Externe.VerkoopService,WinkelkarRepository:WSimpl.Vhisie4.Winkelkar.WinkelkarRepository,LegacyPartijAPI:DOM.PARTIJ.LegacyPartijAPI,KlantenBepaler:WSdata.Vhisie4.Winkelkar.KlantenBepaler,TransportService:APPS.EC.Transport.Service,CheckoutTypeBepaler:APPS.EC.impl.ConfiguratorService.CheckoutTypeBepaler</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -43,7 +43,7 @@
 	Set ..VerkoopService = $$$Inject(VerkoopService, ##class(APPS.EC.Verkoop.impl.Externe.VerkoopService).%New())
 	Set ..WinkelkarRepository = $$$Inject(WinkelkarRepository,##class(WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New())
 	Set ..LegacyPartijAPI = $$$Inject(LegacyPartijAPI,##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI())
-	Set ..ExportStatusRepository = $$$Inject(ExportStatusRepository, ##class(WSdata.Vhisie4.Winkelkar.WinkelkarExport.ExportStatusRepository).%New())
+	Set ..KlantenBepaler = $$$Inject(KlantenBepaler, ##class(WSdata.Vhisie4.Winkelkar.KlantenBepaler).%New())
 	Set ..TransportService = $$$Inject(TransportService, ##class(APPS.EC.Transport.Service).%New())
 	Set ..CheckoutTypeBepaler = $$$Inject(CheckoutTypeBepaler, ##class(APPS.EC.impl.ConfiguratorService.CheckoutTypeBepaler).%New())
 
@@ -123,9 +123,7 @@
 <FormalSpec>KlantPartijID:%String,Taal:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim KlantHeeftToelatingVoorVhisie4 As %Boolean = ..ExportStatusRepository.BestaatViaVanhoeckeId(KlantPartijID)
-	Set KlantHeeftToelatingVoorVhisie4 = KlantHeeftToelatingVoorVhisie4 || ##class(TECH.StringUtils).InList("K||1000;K||3681;K||8166;K||10921;K||9186;K||7606;K||1190;K||8207;K||15415;K||17738;K||2402",KlantPartijID)
-	Quit:KlantHeeftToelatingVoorVhisie4
+	Quit:..KlantenBepaler.IsVhisie4Klant(KlantPartijID)
 
 	If (Taal = "N") {
 		Do ##class(TECH.Exceptions.InvalidUserInputException).Throw("U moet voorlopig nog de oude webshop gebruiken voor echte bestellingen.")
Index: vhTest/Fake/WSdata/Vhisie4/Winkelkar/KlantenBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Fake/WSdata/Vhisie4/Winkelkar/KlantenBepaler.cls.xml	(revision 0)
+++ vhTest/Fake/WSdata/Vhisie4/Winkelkar/KlantenBepaler.cls.xml	(revision 41979)
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.WSdata.Vhisie4.Winkelkar.KlantenBepaler">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+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>WSdata.Vhisie4.Winkelkar.KlantenBepaler</Super>
+
+<Method name="IsVhisie4Klant">
+<FormalSpec>KlantPartijID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/WSdata/Vhisie4/Winkelkar/KlantenBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Mock/WSdata/Vhisie4/Winkelkar/KlantenBepaler.cls.xml	(revision 0)
+++ vhTest/Mock/WSdata/Vhisie4/Winkelkar/KlantenBepaler.cls.xml	(revision 41979)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.WSdata.Vhisie4.Winkelkar.KlantenBepaler">
+<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>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>WSdata.Vhisie4.Winkelkar.KlantenBepaler,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="IsVhisie4Klant">
+<FormalSpec>KlantPartijID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("IsVhisie4Klant",KlantPartijID)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>