Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestVanHoecke.cls.xml
===================================================================
diff -u -r42931 -r46020
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestVanHoecke.cls.xml	(.../TestVanHoecke.cls.xml)	(revision 42931)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestVanHoecke.cls.xml	(.../TestVanHoecke.cls.xml)	(revision 46020)
@@ -403,7 +403,7 @@
 <Implementation><![CDATA[
 	Set GroepNaamBepalerStub = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler).%New()
 	Do GroepNaamBepalerStub.IndienMethodCall("GeefGroepNaam",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("Een GroepNaam")
-	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,,,,,,,GroepNaamBepalerStub)
+	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,,,,GroepNaamBepalerStub)
 
 	#dim WinkelkarID As %String = ..MaakWinkelkarEnGeefID()
 	#dim MaatwerkLijnID1 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID, "Een GroepNaam")
@@ -441,7 +441,7 @@
 <Implementation><![CDATA[
 	Set GroepNaamBepalerStub = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler).%New()
 	Do GroepNaamBepalerStub.IndienMethodCall("GeefGroepNaam",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("EenAndereGroepNaam")
-	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,,,,,,,GroepNaamBepalerStub)
+	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,,,,GroepNaamBepalerStub)
 
 	#dim WinkelkarID As %String = ..MaakWinkelkarEnGeefID()
 	#dim MaatwerkLijnID1 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID , "EenGroepNaam")
Index: vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeMaatwerkEnGeefWinkelkarTerug/LBX/TestVolumeAandeel.cls.xml
===================================================================
diff -u -r37537 -r46020
--- vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeMaatwerkEnGeefWinkelkarTerug/LBX/TestVolumeAandeel.cls.xml	(.../TestVolumeAandeel.cls.xml)	(revision 37537)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeMaatwerkEnGeefWinkelkarTerug/LBX/TestVolumeAandeel.cls.xml	(.../TestVolumeAandeel.cls.xml)	(revision 46020)
@@ -23,13 +23,16 @@
 
 	Set ..VerpakkingServiceMock = ##class(vhTest.Mock.APPS.PM.Maatwerk.impl.VerpakkingService).%New()
 	Set MaatwerklijnBuilder = ##class(APPS.EC.Winkelkar.impl.MaatwerkLijnBuilder).%New(..VerpakkingServiceMock)
-
-	Set WinkelkarRepository = ##class(vhTest.Mock.DOM.EC.Winkelkar.impl.WinkelkarRepository).%New()
+	
 	Set ..WinkelkarFake = ##class(vhTest.Fake.DOM.EC.Winkelkar.Winkelkar).%New($$$DummyString)
-	Do WinkelkarRepository.IndienMethodCall("Maak", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(..WinkelkarFake)
-	Do WinkelkarRepository.IndienMethodCall("Bewaar", $$$ElkeWaarde).DanDoeNiks()
-	Do WinkelkarRepository.IndienMethodCall("GeefViaID", $$$ElkeWaarde).DanReturn(..WinkelkarFake)
-	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,WinkelkarRepository,,,MaatwerklijnBuilder)
+	Do ..WinkelkarFake.ZetPersonalityID(##class(DOM.common.enu.Personality).SFS())
+	Do ..WinkelkarFake.ZetKlantID("SFS_83723")
+
+	Set WinkelkarServiceMock = ##class(vhTest.Mock.DOM.EC.Winkelkar.WinkelkarService).%New()
+	Do WinkelkarServiceMock.IndienMethodCall("MaakWinkelkar", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(..WinkelkarFake)
+	Do WinkelkarServiceMock.IndienMethodCall("BewaarWinkelkar", $$$ElkeWaarde).DanDoeNiks()
+	Do WinkelkarServiceMock.IndienMethodCall("GeefWinkelkar", $$$ElkeWaarde).DanReturn(..WinkelkarFake)
+	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,MaatwerklijnBuilder,,,,,WinkelkarServiceMock)
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeMaatwerkEnGeefWinkelkarTerug/TAX/TestVolumeAandeel.cls.xml
===================================================================
diff -u -r37537 -r46020
--- vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeMaatwerkEnGeefWinkelkarTerug/TAX/TestVolumeAandeel.cls.xml	(.../TestVolumeAandeel.cls.xml)	(revision 37537)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeMaatwerkEnGeefWinkelkarTerug/TAX/TestVolumeAandeel.cls.xml	(.../TestVolumeAandeel.cls.xml)	(revision 46020)
@@ -3,6 +3,11 @@
 <Class name="vhUnitTest.APPS.EC.Winkelkar.impl.WinkelkarService.VoegToeMaatwerkEnGeefWinkelkarTerug.TAX.TestVolumeAandeel">
 <Super>vhUnitTest.APPS.EC.Winkelkar.impl.WinkelkarService.Base</Super>
 
+<Parameter name="GroepNaam">
+<Type>%String</Type>
+<Default>Groep</Default>
+</Parameter>
+
 <Property name="VerpakkingServiceMock">
 <Type>vhTest.Mock.APPS.PM.Maatwerk.impl.VerpakkingService</Type>
 <Private>1</Private>
@@ -24,26 +29,28 @@
 	Set ..VerpakkingServiceMock = ##class(vhTest.Mock.APPS.PM.Maatwerk.impl.VerpakkingService).%New()
 	Set MaatwerklijnBuilder = ##class(APPS.EC.Winkelkar.impl.MaatwerkLijnBuilder).%New(..VerpakkingServiceMock)
 	
-	Set WinkelkarRepository = ##class(vhTest.Mock.DOM.EC.Winkelkar.impl.WinkelkarRepository).%New()
 	Set ..WinkelkarFake = ##class(vhTest.Fake.DOM.EC.Winkelkar.Winkelkar).%New($$$DummyString)
-	Do WinkelkarRepository.IndienMethodCall("Maak", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(..WinkelkarFake)
-	Do WinkelkarRepository.IndienMethodCall("Bewaar", $$$ElkeWaarde).DanDoeNiks()
-	Do WinkelkarRepository.IndienMethodCall("GeefViaID", $$$ElkeWaarde).DanReturn(..WinkelkarFake)
-	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,WinkelkarRepository,,,MaatwerklijnBuilder)
+	Do ..WinkelkarFake.ZetPersonalityID(##class(DOM.common.enu.Personality).SFS())
+	Do ..WinkelkarFake.ZetKlantID("SFS_83723")
+
+	Set WinkelkarServiceMock = ##class(vhTest.Mock.DOM.EC.Winkelkar.WinkelkarService).%New()
+	Do WinkelkarServiceMock.IndienMethodCall("MaakWinkelkar", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(..WinkelkarFake)
+	Do WinkelkarServiceMock.IndienMethodCall("BewaarWinkelkar", $$$ElkeWaarde).DanDoeNiks()
+	Do WinkelkarServiceMock.IndienMethodCall("GeefWinkelkar", $$$ElkeWaarde).DanReturn(..WinkelkarFake)
+	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,MaatwerklijnBuilder,,,,,WinkelkarServiceMock)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: VolumeAandeel wordt bepaald en bewaard bij toevoegen van een TAX lade in probox verpakking">
 <Implementation><![CDATA[
-	#dim GroepNaam As %String = "Groep"
 	#dim Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ..WinkelkarService.MaakWinkelkar(..MaakInterneUnitTestApplicatieObject(), "SFS_83723", ##class(DOM.common.enu.Personality).SFS())
 	#dim IngegevenKenmerken As vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
 	Set IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).Probox()
 	#dim Aantal As %Integer = 1
 	
 	Do ..VerpakkingServiceMock.VerwachtMethodCall("ProboxVolumeAandeel", $$$ElkeWaarde).DanReturn($$$DummyDecimal)
 	
-	Set Winkelkar = ..WinkelkarService.VoegToeMaatwerkEnGeefWinkelkarTerug(Winkelkar.WinkelkarID, GroepNaam, IngegevenKenmerken, Aantal, "Dit is de projectreferentie")
+	Set Winkelkar = ..WinkelkarService.VoegToeMaatwerkEnGeefWinkelkarTerug(Winkelkar.WinkelkarID, ..#GroepNaam, IngegevenKenmerken, Aantal, "Dit is de projectreferentie")
 	#dim LijnIterator As TECH.ListIterator = ..WinkelkarFake.GeefLijnIterator()
 	#dim NegeerTekstLijn As DOM.EC.Winkelkar.Lijn = LijnIterator.Next() 
 	#dim GroepLijn As DOM.EC.Winkelkar.GroepLijn = LijnIterator.Next()
@@ -56,31 +63,29 @@
 
 <Method name="Test: VolumeAandeel wordt niet bepaald bij toevoegen van een TAX lade in V1 verpakking">
 <Implementation><![CDATA[
-	#dim GroepNaam As %String = "Groep"
 	#dim Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ..WinkelkarService.MaakWinkelkar(..MaakInterneUnitTestApplicatieObject(), "SFS_83723", ##class(DOM.common.enu.Personality).SFS())
 	#dim IngegevenKenmerken As vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
 	Set IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).V1()
 	#dim Aantal As %Integer = 1
 	
 	Do ..VerpakkingServiceMock.VerwachtMethodCall("ProboxVolumeAandeel", $$$ElkeWaarde).Nooit()
 	
-	Set Winkelkar = ..WinkelkarService.VoegToeMaatwerkEnGeefWinkelkarTerug(Winkelkar.WinkelkarID, GroepNaam, IngegevenKenmerken, Aantal, "Dit is de projectreferentie")
+	Set Winkelkar = ..WinkelkarService.VoegToeMaatwerkEnGeefWinkelkarTerug(Winkelkar.WinkelkarID, ..#GroepNaam, IngegevenKenmerken, Aantal, "Dit is de projectreferentie")
 
 	Do ..VerpakkingServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: VolumeAandeel wordt niet bepaald bij toevoegen van een TAX lade in FlatpackV1 verpakking">
 <Implementation><![CDATA[
-	#dim GroepNaam As %String = "Groep"
 	#dim Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ..WinkelkarService.MaakWinkelkar(..MaakInterneUnitTestApplicatieObject(), "SFS_83723", ##class(DOM.common.enu.Personality).SFS())
 	#dim IngegevenKenmerken As vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
 	Set IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1()
 	#dim Aantal As %Integer = 1
 	
 	Do ..VerpakkingServiceMock.VerwachtMethodCall("ProboxVolumeAandeel", $$$ElkeWaarde).Nooit()
 	
-	Set Winkelkar = ..WinkelkarService.VoegToeMaatwerkEnGeefWinkelkarTerug(Winkelkar.WinkelkarID, GroepNaam, IngegevenKenmerken, Aantal, "Dit is de projectreferentie")
+	Set Winkelkar = ..WinkelkarService.VoegToeMaatwerkEnGeefWinkelkarTerug(Winkelkar.WinkelkarID, ..#GroepNaam, IngegevenKenmerken, Aantal, "Dit is de projectreferentie")
 
 	Do ..VerpakkingServiceMock.Verifieer()
 ]]></Implementation>
Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestHandel.cls.xml
===================================================================
diff -u -r45867 -r46020
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestHandel.cls.xml	(.../TestHandel.cls.xml)	(revision 45867)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestHandel.cls.xml	(.../TestHandel.cls.xml)	(revision 46020)
@@ -107,7 +107,7 @@
 <Implementation><![CDATA[
 	// Setup
 	#dim DataServiceStub As vhTest.Mock.APPS.EC.DataService = ..GeefDataServiceStub()
-	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock,,,,,,,,,,,DataServiceStub)
+	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock,,,,,,,,DataServiceStub)
 	
 	#dim WinkelkarID As %String = ..MaakWinkelkarEnGeefID()
 	#dim MaatwerkLijnID As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
@@ -144,7 +144,7 @@
 	#define NieuwAantal 3
 	
 	#dim DataServiceStub As vhTest.Mock.APPS.EC.DataService = ..GeefDataServiceStub()
-	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock,,,,,,,,,,,DataServiceStub)
+	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock,,,,,,,,DataServiceStub)
 	
 	#dim WinkelkarID As %String = ..MaakWinkelkarEnGeefID()
 	#dim MaatwerkLijnID As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
@@ -167,7 +167,7 @@
 	#define NieuwAantal 0
 	
 	#dim DataServiceStub As vhTest.Mock.APPS.EC.DataService = ..GeefDataServiceStub()
-	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock,,,,,,,,,,,DataServiceStub)
+	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock,,,,,,,,DataServiceStub)
 	
 	#dim WinkelkarID As %String = ..MaakWinkelkarEnGeefID()
 	#dim MaatwerkLijnID As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
@@ -187,7 +187,7 @@
 	Do GroepNaamBepalerStub.IndienMethodCall("GeefGroepNaam",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("Een GroepNaam")
 
 	#dim DataServiceStub As vhTest.Mock.APPS.EC.DataService = ..GeefDataServiceStub()
-	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock,,,,,,,,,,GroepNaamBepalerStub,DataServiceStub)
+	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock,,,,,,,GroepNaamBepalerStub,DataServiceStub)
 
 	#dim WinkelkarID As %String = ..MaakWinkelkarEnGeefID()
 	#dim MaatwerkLijnID1 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID,"Een GroepNaam")
Index: APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml
===================================================================
diff -u -r45967 -r46020
--- APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 45967)
+++ APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 46020)
@@ -40,26 +40,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="WinkelkarRepository">
-<Type>DOM.EC.Winkelkar.impl.WinkelkarRepository</Type>
-<Private>1</Private>
-</Property>
-
-<Property name="ProductLijnBuilder">
-<Type>DOM.EC.Winkelkar.impl.ProductLijnBuilder</Type>
-<Private>1</Private>
-</Property>
-
-<Property name="WinkelkarLijnRepository">
-<Type>DOM.EC.Winkelkar.impl.LijnRepository</Type>
-<Private>1</Private>
-</Property>
-
-<Property name="WinkelkarKopieerder">
-<Type>DOM.EC.Winkelkar.impl.WinkelkarKopieerder</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="GroepnaamVoorIngegevenKenmerkenBepaler">
 <Type>APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler</Type>
 <Private>1</Private>
@@ -80,8 +60,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="WinkelkarService">
+<Type>DOM.EC.Winkelkar.WinkelkarService</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>MagMaatwerklijnGewijzigdWordenBepaler:APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden,MaatwerklijnInputValidator:APPS.EC.Winkelkar.impl.WinkelkarService.MaatwerklijnInputValidator,BestelService:DOM.VKP.Maatwerk.BestelService,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler,WinkelkarPrijsUpdater:APPS.EC.impl.WinkelkarPrijsUpdater,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository,ProductLijnBuilder:DOM.EC.Winkelkar.impl.ProductLijnBuilder,WinkelkarLijnRepository:DOM.EC.Winkelkar.impl.LijnRepository,MaatwerkLijnBuilder:APPS.EC.Winkelkar.impl.MaatwerkLijnBuilder,QueryAPI:TECH.Query.QueryAPI,WinkelkarServiceHelper:APPS.EC.Winkelkar.impl.WinkelkarService.Helper,GroepnaamBepaler:APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler,DataService:APPS.EC.impl.DataService</FormalSpec>
+<FormalSpec>MagMaatwerklijnGewijzigdWordenBepaler:APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden,MaatwerklijnInputValidator:APPS.EC.Winkelkar.impl.WinkelkarService.MaatwerklijnInputValidator,BestelService:DOM.VKP.Maatwerk.BestelService,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler,WinkelkarPrijsUpdater:APPS.EC.impl.WinkelkarPrijsUpdater,MaatwerkLijnBuilder:APPS.EC.Winkelkar.impl.MaatwerkLijnBuilder,QueryAPI:TECH.Query.QueryAPI,WinkelkarServiceHelper:APPS.EC.Winkelkar.impl.WinkelkarService.Helper,GroepnaamBepaler:APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler,DataService:APPS.EC.impl.DataService,WinkelkarService:DOM.EC.Winkelkar.WinkelkarService</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -92,10 +77,6 @@
 	set ..BestelService = $$$Inject(BestelService, ##class(DOM.VKP.Maatwerk.impl.BestelService).%New())
 	Set ..VroegsteLeverdatumBepaler = $$$Inject(VroegsteLeverdatumBepaler, ##Class(APPS.EC.impl.VroegsteLeverdatumBepaler).%New())
 	Set ..WinkelkarPrijsUpdater = $$$Inject(WinkelkarPrijsUpdater, ##class(APPS.EC.impl.WinkelkarPrijsUpdater).%New())
-	Set ..WinkelkarRepository = $$$Inject(WinkelkarRepository,##class(DOM.EC.Winkelkar.impl.WinkelkarRepository).%New())
-	Set ..ProductLijnBuilder = $$$Inject(ProductLijnBuilder,##class(DOM.EC.Winkelkar.impl.ProductLijnBuilder).%New())
-	Set ..WinkelkarLijnRepository = $$$Inject(WinkelkarLijnRepository,##class(DOM.EC.Winkelkar.impl.LijnRepository).%New())
- 	Set ..WinkelkarKopieerder = ##class(DOM.EC.Winkelkar.impl.WinkelkarKopieerder).%New()
  	Set ..WinkelkarTaalBepaler = ##class(APPS.EC.Winkelkar.impl.TaalBepaler).%New()
 
 	Set ..MaatwerkLijnBuilder = $$$Inject(MaatwerkLijnBuilder,##class(APPS.EC.Winkelkar.impl.MaatwerkLijnBuilder).%New())
@@ -106,6 +87,7 @@
 	Set ..DataService = $$$Inject(DataService , ##class(APPS.EC.impl.DataService).%New())
 	Set ..WinkelkarServiceHelper = $$$Inject(WinkelkarServiceHelper,##class(APPS.EC.Winkelkar.impl.WinkelkarService.Helper).%New(..DataService))
 	
+	Set ..WinkelkarService = $$$Inject(WinkelkarService, ##class(DOM.EC.Winkelkar.impl.WinkelkarService).%New())
 	
 	
 	Quit $$$OK
@@ -114,10 +96,7 @@
 
 <Method name="ControleerWinkelkarViaExterneId">
 <FormalSpec>ExterneId:%String=""</FormalSpec>
-<Implementation><![CDATA[
-	If ..WinkelkarRepository.BestaatViaExterneId(ExterneId) {
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("ExterneId "_ExterneId _" bestaat reeds"))			
-	}
+<Implementation><![CDATA[	Do ..WinkelkarService.ControleerWinkelkarViaExterneId(ExterneId)
 ]]></Implementation>
 </Method>
 
@@ -126,7 +105,7 @@
 <ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
 <Implementation><![CDATA[
 	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ..OpenWinkelkar(WinkelkarID)
-	#dim WinkelkarKopie As DOM.EC.Winkelkar.Winkelkar = ..WinkelkarKopieerder.Kopieer(Winkelkar)
+	#dim WinkelkarKopie As DOM.EC.Winkelkar.Winkelkar = ..WinkelkarService.Kopieer(Winkelkar)
 	Quit ..WinkelkarServiceHelper.GeefWinkelkarDto(WinkelkarKopie)
 ]]></Implementation>
 </Method>
@@ -155,12 +134,8 @@
 <FormalSpec>Applicatie:APPS.common.dto.Applicatie,KlantID:DOM.VKP.VanHoeckeKlantID,PersonalityID:DOM.common.enu.Personality,ExterneId:%String=""</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
 <Implementation><![CDATA[
-	#dim WinkelkarImpl As DOM.EC.Winkelkar.Winkelkar = ..WinkelkarRepository.Maak(Applicatie.Type , Applicatie.Naam)
-	Do WinkelkarImpl.ZetKlantID(KlantID)
-	Do WinkelkarImpl.ZetPersonalityID(PersonalityID)
-	Do WinkelkarImpl.ZetExterneId(ExterneId)
-	Do ..WinkelkarRepository.Bewaar(WinkelkarImpl)
-	
+	#dim WinkelkarImpl As DOM.EC.Winkelkar.Winkelkar = ..WinkelkarService.MaakWinkelkar(Applicatie, KlantID, PersonalityID, ExterneId)
+	Do ..WinkelkarService.BewaarWinkelkar(WinkelkarImpl)
 	Quit ..GeefWinkelkar(WinkelkarImpl.GeefID())
 ]]></Implementation>
 </Method>
@@ -170,17 +145,9 @@
 <ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
 <Implementation><![CDATA[
 	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ..OpenWinkelkar(WinkelkarID)
-	If ..WinkelkarLijnRepository.BestaatViaID(LijnID) {
-		#dim Lijn As DOM.EC.Winkelkar.Lijn = Winkelkar.GeefLijn(LijnID)
-		Do Winkelkar.Verwijder( Lijn )
-		if $IsObject(Lijn.Groep) {
-			Do ..MaatwerkLijnBuilder.Init(Winkelkar)
-			Do ..MaatwerkLijnBuilder.VerwijderGroepIndienLeeg( Lijn.Groep) 
-		}
-		Do ..WinkelkarRepository.Bewaar(Winkelkar)
-	} Else {
-		Do ##class(vhLib.Logger).%New("APPS.EC.Winkelkar.WinkelkarService").Warning("VerwijderLijn","Lijn '"_LijnID_"' bestond niet meer voor winkelkar '"_WinkelkarID_"'.")
-	}	
+	
+	Do ..WinkelkarService.VerwijderLijn(Winkelkar, LijnID)
+	
 	Quit ..GeefWinkelkar(WinkelkarID)
 ]]></Implementation>
 </Method>
@@ -191,7 +158,7 @@
 <Implementation><![CDATA[
 	#dim WinkelkarImpl As DOM.EC.Winkelkar.Winkelkar = ..OpenWinkelkar(WinkelkarID)
 	Do WinkelkarImpl.VerwijderAlleInhoud()
-	Do ..WinkelkarRepository.Bewaar(WinkelkarImpl)
+	Do ..WinkelkarService.BewaarWinkelkar(WinkelkarImpl)
 	
 	Quit ..GeefWinkelkar(WinkelkarID)
 ]]></Implementation>
@@ -237,27 +204,18 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ..OpenWinkelkar(WinkelkarID)
-	Do ..ProductLijnBuilder.Init(Winkelkar)
-	#dim ProductLijn As DOM.EC.Winkelkar.ProductLijn = ..ProductLijnBuilder.MaakLijn(GroepNaam, ProductID, Aantal, PakketReferentie, ProjectReferentie, ExterneId)
-	Do ProductLijn.ZetEindklantEenheidPrijsNettoExclBTW(EenheidPrijs)
-	Do ProductLijn.ZetEindklantTotaalPrijs(TotaalPrijs)
-	Do ..WinkelkarLijnRepository.Bewaar(ProductLijn)
 	
-	Do ..WinkelkarRepository.Bewaar(Winkelkar)
+	#dim ProductLijn As DOM.EC.Winkelkar.ProductLijn = ..WinkelkarService.VoegToeProduct(Winkelkar, GroepNaam, ProductID, Aantal, PakketReferentie, ProjectReferentie, ExterneId, EenheidPrijs, TotaalPrijs)
 	
+	Do ..WinkelkarService.BewaarWinkelkar(Winkelkar)
+	
 	Quit ProductLijn.GeefID()
 ]]></Implementation>
 </Method>
 
 <Method name="WisWinkelkar">
 <FormalSpec>WinkelkarID:%String</FormalSpec>
-<Implementation><![CDATA[
-	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ..OpenWinkelkar(WinkelkarID)
-	If (Winkelkar.%IsA("DOM.EC.Winkelkar.ExterneWinkelkar")) {
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("De winkelkar '"_WinkelkarID_"' hoort bij een ExterneOfferte, en mag daarom niet rechtstreeks gewist worden."))	
-	} Else {
-		Do ..WinkelkarRepository.VerwijderViaID(WinkelkarID)
-	}
+<Implementation><![CDATA[	Do ..WinkelkarService.WisWinkelkar(WinkelkarID)
 ]]></Implementation>
 </Method>
 
@@ -279,16 +237,7 @@
 <Method name="OpenWinkelkar">
 <FormalSpec>WinkelkarID:%String</FormalSpec>
 <ReturnType>DOM.EC.Winkelkar.Winkelkar</ReturnType>
-<Implementation><![CDATA[
-	try {
-		#dim WinkelkarImpl As DOM.EC.Winkelkar.Winkelkar = ..WinkelkarRepository.GeefViaID(WinkelkarID)	
-	} catch {
-		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("De opgegeven winkelkar id "_WinkelkarID_" is niet geldig!"))
-	}
-	
-	Do ..ControleerInput( $IsObject(WinkelkarImpl), "De opgegeven winkelkar id "_WinkelkarID_" is niet geldig!" )
-	Quit WinkelkarImpl
+<Implementation><![CDATA[	Quit ..WinkelkarService.GeefWinkelkar(WinkelkarID)
 ]]></Implementation>
 </Method>
 
@@ -399,7 +348,7 @@
 	Do ..WinkelkarPrijsUpdater.HerberekenLijn(Winkelkar,Lijn)
 	Do ..MaatwerkLijnBuilder.BewaarLijn(Lijn)
 	
-	Do ..WinkelkarRepository.Bewaar(Winkelkar)
+	Do ..WinkelkarService.BewaarWinkelkar(Winkelkar)
 ]]></Implementation>
 </Method>
 
@@ -412,7 +361,7 @@
 	Do ..MaatwerkLijnBuilder.Init(Winkelkar)
 	Do ..MaatwerkLijnBuilder.ZetProjectReferentie(Lijn, NieuweProjectReferentie)
 	Do ..MaatwerkLijnBuilder.BewaarLijn(Lijn)
-	Do ..WinkelkarRepository.Bewaar(Winkelkar)
+	Do ..WinkelkarService.BewaarWinkelkar(Winkelkar)
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeProduct/Test.cls.xml
===================================================================
diff -u -r45967 -r46020
--- vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 45967)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 46020)
@@ -20,24 +20,16 @@
 	Set DummyProduct = ##class(vhTest.Dummy.DOM.PM.Product).%New()
 	Set ProductLijnFake = ##class(vhTest.Fake.DOM.EC.Winkelkar.ProductLijn).%New(DummyProduct,1)	
 	
-	Set ProductLijnBuilderMock = ##class(vhTest.Mock.DOM.EC.Winkelkar.impl.ProductLijnBuilder).%New()
-	Do ProductLijnBuilderMock.VerwachtMethodCall("Init",..Winkelkar)
-	Do ProductLijnBuilderMock.VerwachtMethodCall("MaakLijn","DummyGroepNaam",DummyProduct.GeefID(),$$$ElkeWaarde,"","","").DanReturn(ProductLijnFake)
+	Set WinkelkarServiceMock = ##class(vhTest.Mock.DOM.EC.Winkelkar.WinkelkarService).%New()
+	Do WinkelkarServiceMock.VerwachtMethodCall("GeefWinkelkar",$$$ElkeWaarde).DanReturn(..Winkelkar)
+	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct",..Winkelkar,"DummyGroepNaam",DummyProduct.GeefID(),1).DanReturn(ProductLijnFake)
+	Do WinkelkarServiceMock.VerwachtMethodCall("BewaarWinkelkar",..Winkelkar).ExactAantalKeer(1)
+
+	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,,,,,,WinkelkarServiceMock)
 	
-	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.DOM.EC.Winkelkar.impl.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefViaID",$$$ElkeWaarde).DanReturn(..Winkelkar)
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("Bewaar",..Winkelkar).ExactAantalKeer(1)
-	
-	Set WinkelkarLijnRepositoryMock = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
-	Do WinkelkarLijnRepositoryMock.VerwachtMethodCall("Bewaar",ProductLijnFake).ExactAantalKeer(1)
-	
-	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,WinkelkarRepositoryMock,ProductLijnBuilderMock,WinkelkarLijnRepositoryMock,,,)
-	
 	Do ..WinkelkarService.VoegToeProduct(..Winkelkar.GeefID(),"DummyGroepNaam",DummyProduct.GeefID(),1)
 
-	Do ProductLijnBuilderMock.Verifieer()
-	Do WinkelkarRepositoryMock.Verifieer()
-	Do WinkelkarLijnRepositoryMock.Verifieer()
+	Do WinkelkarServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/GeefParent/Test.cls.xml
===================================================================
diff -u -r37587 -r46020
--- vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/GeefParent/Test.cls.xml	(.../Test.cls.xml)	(revision 37587)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/GeefParent/Test.cls.xml	(.../Test.cls.xml)	(revision 46020)
@@ -28,7 +28,7 @@
 	#dim QueryAPI As vhTest.Mock.TECH.Query.QueryAPI = ##class(vhTest.Mock.TECH.Query.QueryAPI).%New()
 	Do QueryAPI.IndienMethodCall("GeefIDVanEnigeOptioneleRecord","SELECT ID FROM  APPS_VKP_impl.Offerte WHERE WinkelkarID = ?", $LB(..#DummyWinkelkarID), "").DanReturn(OfferteID)
 	
-	set WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,,,,,QueryAPI)
+	set WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,,QueryAPI)
 	
 	#dim Parent As APPS.EC.Winkelkar.Parent = WinkelkarService.GeefParent(..#DummyWinkelkarID)
 	Do $$$AssertEquals(Parent.ID,OfferteID)
Index: vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/ControleerWinkelkarViaExterneId/Test.cls.xml
===================================================================
diff -u -r38934 -r46020
--- vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/ControleerWinkelkarViaExterneId/Test.cls.xml	(.../Test.cls.xml)	(revision 38934)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/ControleerWinkelkarViaExterneId/Test.cls.xml	(.../Test.cls.xml)	(revision 46020)
@@ -3,26 +3,15 @@
 <Class name="vhUnitTest.APPS.EC.Winkelkar.impl.WinkelkarService.ControleerWinkelkarViaExterneId.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test: Reeds bestaande ExterneId geeft een foutmelding">
+<Method name="Test: Roept ControleerWinkelkarViaExterneId op van de WinkelkarService">
 <Implementation><![CDATA[
-	#dim WinkelkarRepositoryMock As vhTest.Mock.DOM.EC.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.DOM.EC.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryMock.IndienMethodCall("BestaatViaExterneId",$$$DummyInteger).DanReturn($$$True)
+	#dim WinkelkarServiceMock As vhTest.Mock.DOM.EC.Winkelkar.WinkelkarService = ##class(vhTest.Mock.DOM.EC.Winkelkar.WinkelkarService).%New()
+	Do WinkelkarServiceMock.VerwachtMethodCall("ControleerWinkelkarViaExterneId",$$$DummyInteger).DanDoeNiks()
 	
-	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("ExterneId 0 bestaat reeds")
-	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException", Substrings))
-	
-	#dim WinkelkarService As APPS.EC.Winkelkar.impl.WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,WinkelkarRepositoryMock)
+	#dim WinkelkarService As APPS.EC.Winkelkar.impl.WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,,,,,,WinkelkarServiceMock)
 	Do WinkelkarService.ControleerWinkelkarViaExterneId($$$DummyInteger)
-]]></Implementation>
-</Method>
-
-<Method name="Test: Niet bestaande ExterneId geeft geen foutmelding">
-<Implementation><![CDATA[
-	#dim WinkelkarRepositoryMock As vhTest.Mock.DOM.EC.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.DOM.EC.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryMock.IndienMethodCall("BestaatViaExterneId",$$$DummyInteger).DanReturn($$$False)
 	
-	#dim WinkelkarService As APPS.EC.Winkelkar.impl.WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,WinkelkarRepositoryMock)
-	Do WinkelkarService.ControleerWinkelkarViaExterneId($$$DummyInteger)
+	Do WinkelkarServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 </Class>