Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml
===================================================================
diff -u -r38861 -r38863
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 38861)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 38863)
@@ -6,20 +6,19 @@
 <Method name="Test: BereidVoorBestelling haalt leverdatums op met de juiste parameters">
 <Implementation><![CDATA[
 	#dim OfferteDummy As vhTest.Fake.APPS.VKP.Offerte = ##class(vhTest.Fake.APPS.VKP.Offerte).%New()
-	Set OfferteDummy.WinkelkarID = "WinkelkarID"
 	
 	#dim OfferteRepositoryStub As vhTest.Mock.APPS.VKP.Offerte.OfferteRepository = ##class(vhTest.Mock.APPS.VKP.Offerte.OfferteRepository).%New()
 	Do OfferteRepositoryStub.IndienMethodCall("BestaatViaExterneId", "WinkelkarId").DanReturn($$$True)
 	Do OfferteRepositoryStub.IndienMethodCall("GeefViaExterneId", "WinkelkarId").DanReturn(OfferteDummy)
 	
-	#dim WinkelkarServiceMock As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
-	Do WinkelkarServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","WinkelkarID").DanDoeNiks()
+	#dim VerkoopServiceMock As vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
+	Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","DummyID").DanDoeNiks()
 
-	#dim BereidVoorBestelling As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(WinkelkarServiceMock, OfferteRepositoryStub)
+	#dim BereidVoorBestelling As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceMock, OfferteRepositoryStub)
 	
 	Do BereidVoorBestelling.BereidVoorBestelling(..GeefBereidVoorBestellingRequest())
 
-	Do WinkelkarServiceMock.Verifieer()
+	Do VerkoopServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -32,10 +31,10 @@
 	Do OfferteRepositoryMock.VerwachtMethodCall("BestaatViaExterneId", "WinkelkarId").DanReturn($$$True)
 	Do OfferteRepositoryMock.VerwachtMethodCall("GeefViaExterneId", "WinkelkarId").DanReturn(OfferteDummy)
 	
-	#dim WinkelkarServiceStub As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
-	Do WinkelkarServiceStub.IndienMethodCall("GeefMogelijkeLeverdatums","WinkelkarID").DanDoeNiks()
+	#dim VerkoopServiceStub As vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
+	Do VerkoopServiceStub.IndienMethodCall("GeefMogelijkeLeverdatums","DummyID").DanDoeNiks()
 
-	#dim BereidVoorBestelling As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(WinkelkarServiceStub, OfferteRepositoryMock)
+	#dim BereidVoorBestelling As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceStub, OfferteRepositoryMock)
 	
 	Do BereidVoorBestelling.BereidVoorBestelling(..GeefBereidVoorBestellingRequest())
 
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml
===================================================================
diff -u -r38859 -r38863
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml	(.../BereidVoorBestelling.cls.xml)	(revision 38859)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml	(.../BereidVoorBestelling.cls.xml)	(revision 38863)
@@ -3,8 +3,8 @@
 <Class name="WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling">
 <Super>TECH.RegisteredObject</Super>
 
-<Property name="WinkelkarService">
-<Type>APPS.EC.Winkelkar.impl.WinkelkarService</Type>
+<Property name="VerkoopService">
+<Type>APPS.EC.Verkoop.impl.Externe.VerkoopService</Type>
 <Private>1</Private>
 </Property>
 
@@ -14,13 +14,13 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>WinkelkarService:APPS.EC.Winkelkar.impl.WinkelkarService,OfferteRepository:APPS.VKP.Offerte.OfferteRepository</FormalSpec>
+<FormalSpec>VerkoopService:APPS.EC.Verkoop.impl.Externe.VerkoopService,OfferteRepository:APPS.VKP.Offerte.OfferteRepository</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..WinkelkarService = $$$Inject(WinkelkarService, ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New())
+	Set ..VerkoopService = $$$Inject(VerkoopService, ##class(APPS.EC.Verkoop.impl.Externe.VerkoopService).%New())
 	Set ..OfferteRepository = $$$Inject(OfferteRepository,##class(APPS.VKP.Offerte.impl.OfferteRepository).%New())
 
 	Quit $$$OK
@@ -33,9 +33,9 @@
 <Implementation><![CDATA[
 	Do ..ControleerExterneId(BereidVoorBestellingRequest.Header.WinkelkarId)
 
-	#dim WinkelkarID As %String = ..OfferteRepository.GeefViaExterneId(BereidVoorBestellingRequest.Header.WinkelkarId).WinkelkarID
+	#dim OfferteID As %String = ..OfferteRepository.GeefViaExterneId(BereidVoorBestellingRequest.Header.WinkelkarId).GeefID()
 
-	Do ..WinkelkarService.GeefMogelijkeLeverdatums(WinkelkarID)
+	Do ..VerkoopService.GeefMogelijkeLeverdatums(OfferteID)
 
 
 	#dim Resultaat As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse