Index: APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml
===================================================================
diff -u -r39573 -r39587
--- APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml	(.../ProductLijnBuilder.cls.xml)	(revision 39573)
+++ APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml	(.../ProductLijnBuilder.cls.xml)	(revision 39587)
@@ -39,19 +39,20 @@
 </Method>
 
 <Method name="MaakLijn">
-<FormalSpec>ProductID:%String,Aantal:%Integer=1,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
+<FormalSpec>GroepNaam:%String,ProductID:%String,Aantal:%Integer=1,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
 <ReturnType>DOM.EC.Winkelkar.ProductLijn</ReturnType>
 <Implementation><![CDATA[
 	#dim Lijn As DOM.EC.Winkelkar.ProductLijn = ##class(DOM.EC.Winkelkar.ProductLijn).%New(ProductID, Aantal, PakketReferentie, ProjectReferentie, ExterneId)
 
-	Do ..VoegToeAanGroep("", Lijn)
+	Do ..VoegToeAanGroep(GroepNaam, Lijn)
 
 	Quit Lijn
 ]]></Implementation>
 </Method>
 
 <Method name="VoegToeAanGroep">
 <FormalSpec>GroepNaam:%String,Lijn:DOM.EC.Winkelkar.Lijn</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[
 	#dim GroepLijn As DOM.EC.Winkelkar.GroepLijn = ..Winkelkar.GeefGroepLijn(GroepNaam)
 	If (GroepLijn = "") {
Index: vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService.cls.xml
===================================================================
diff -u -r39318 -r39587
--- vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39318)
+++ vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39587)
@@ -154,9 +154,9 @@
 </Method>
 
 <Method name="VoegToeProduct">
-<FormalSpec>WinkelkarID:%String,ProductID:%String,Aantal:%Integer,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
+<FormalSpec>WinkelkarID:%String,GroepNaam:%String,ProductID:%String,Aantal:%Integer,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("VoegToeProduct",WinkelkarID,ProductID,Aantal,PakketReferentie,ProjectReferentie,ExterneId)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("VoegToeProduct",WinkelkarID,GroepNaam,ProductID,Aantal,PakketReferentie,ProjectReferentie,ExterneId)
 ]]></Implementation>
 </Method>
 
Index: APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml
===================================================================
diff -u -r39573 -r39587
--- APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39573)
+++ APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39587)
@@ -3,7 +3,7 @@
 <Class name="APPS.EC.Winkelkar.impl.WinkelkarService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>TECH.Mockable,APPS.EC.Winkelkar.WinkelkarService</Super>
+<Super>APPS.EC.Winkelkar.WinkelkarService,TECH.RegisteredObject</Super>
 
 <Property name="MagMaatwerklijnGewijzigdWordenBepaler">
 <Type>APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden</Type>
@@ -225,12 +225,12 @@
 </Method>
 
 <Method name="VoegToeProduct">
-<FormalSpec>WinkelkarID:%String,ProductID:%String,Aantal:%Integer,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
+<FormalSpec>WinkelkarID:%String,GroepNaam:%String,ProductID:%String,Aantal:%Integer,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
 <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(ProductID, Aantal, PakketReferentie, ProjectReferentie, ExterneId)
+	#dim ProductLijn As DOM.EC.Winkelkar.ProductLijn = ..ProductLijnBuilder.MaakLijn(GroepNaam, ProductID, Aantal, PakketReferentie, ProjectReferentie, ExterneId)
 	Do ..WinkelkarLijnRepository.Bewaar(ProductLijn)
 	
 	Do ..WinkelkarRepository.Bewaar(Winkelkar)
Index: vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeProduct/Test.cls.xml
===================================================================
diff -u -r39143 -r39587
--- vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 39143)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/VoegToeProduct/Test.cls.xml	(.../Test.cls.xml)	(revision 39587)
@@ -22,7 +22,7 @@
 	
 	Set ProductLijnBuilderMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.ProductLijnBuilder).%New()
 	Do ProductLijnBuilderMock.VerwachtMethodCall("Init",..Winkelkar)
-	Do ProductLijnBuilderMock.VerwachtMethodCall("MaakLijn",DummyProduct.GeefID(),$$$ElkeWaarde,"","","").DanReturn(ProductLijnFake)
+	Do ProductLijnBuilderMock.VerwachtMethodCall("MaakLijn","EenGroep",DummyProduct.GeefID(),$$$ElkeWaarde,"","","").DanReturn(ProductLijnFake)
 	
 	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.DOM.EC.Winkelkar.impl.WinkelkarRepository).%New()
 	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefViaID",$$$ElkeWaarde).DanReturn(..Winkelkar)
@@ -33,7 +33,7 @@
 	
 	Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,,,,WinkelkarRepositoryMock,ProductLijnBuilderMock,WinkelkarLijnRepositoryMock,,,)
 	
-	Do ..WinkelkarService.VoegToeProduct(..Winkelkar.GeefID(),DummyProduct.GeefID(),1)
+	Do ..WinkelkarService.VoegToeProduct(..Winkelkar.GeefID(),"EenGroep",DummyProduct.GeefID(),1)
 
 	Do ProductLijnBuilderMock.Verifieer()
 	Do WinkelkarRepositoryMock.Verifieer()
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn/Test.cls.xml
===================================================================
diff -u -r39562 -r39587
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn/Test.cls.xml	(.../Test.cls.xml)	(revision 39562)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn/Test.cls.xml	(.../Test.cls.xml)	(revision 39587)
@@ -5,20 +5,20 @@
 
 <Method name="Test: BewaarProductLijn verwijderd lijn als deze reeds bestaat voordat ze bewaard wordt">
 <Implementation><![CDATA[
-	#dim WinkelkarRepositoryStub As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Set WinkelkarRepositoryStub = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
 	Do WinkelkarRepositoryStub.IndienMethodCall("GeefWinkelkarIDViaID", $$$ElkeWaarde).DanReturn("DummyID")
 
-	#dim WinkelkarLijnRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository).%New()
+	Set WinkelkarLijnRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository).%New()
 	Do WinkelkarLijnRepositoryMock.VerwachtMethodCall("BestaatViaID", "ExterneId").DanReturn($$$True)
 	Do WinkelkarLijnRepositoryMock.VerwachtMethodCall("GeefLijnIDViaID", "ExterneId").DanReturn("DummyLijnID")
 	
-	#dim WinkelkarServiceMock As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
+	Set WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
 	Do WinkelkarServiceMock.VerwachtMethodCall("VerwijderLijn","DummyID", "DummyLijnID").DanDoeNiks()
-	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct","DummyID", "ProductId", 5 , "PakketReferentie" , "ProjectReferentie","ExterneId").DanDoeNiks()
+	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct", "DummyID", "EenGroep", "ProductId", 5, "PakketReferentie", "ProjectReferentie", "ExterneId").DanDoeNiks()
 	
-	#dim BewaarProductLijn As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceMock, WinkelkarRepositoryStub, WinkelkarLijnRepositoryMock)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceMock, WinkelkarRepositoryStub, WinkelkarLijnRepositoryMock)
 	
-	Do BewaarProductLijn.BewaarProductLijn(..GeefBewaarProductLijnRequest())
+	Do Service.BewaarProductLijn(..GeefBewaarProductLijnRequest())
 
 	Do WinkelkarLijnRepositoryMock.Verifieer()
 	Do WinkelkarServiceMock.Verifieer()
@@ -27,18 +27,18 @@
 
 <Method name="Test: BewaarProductLijn voegt product toe op de winkelkarservice met de juiste parameters">
 <Implementation><![CDATA[
-	#dim WinkelkarRepositoryStub As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Set WinkelkarRepositoryStub = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
 	Do WinkelkarRepositoryStub.IndienMethodCall("GeefWinkelkarIDViaID", $$$ElkeWaarde).DanReturn("DummyID")
 	
-	#dim WinkelkarLijnRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository).%New()
+	Set WinkelkarLijnRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository).%New()
 	Do WinkelkarLijnRepositoryMock.VerwachtMethodCall("BestaatViaID", "ExterneId").DanReturn($$$False)
 
-	#dim WinkelkarServiceMock As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
-	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct","DummyID", "ProductId", 5 , "PakketReferentie" , "ProjectReferentie","ExterneId").DanDoeNiks()
+	Set WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
+	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct","DummyID", "EenGroep", "ProductId", 5 , "PakketReferentie" , "ProjectReferentie","ExterneId").DanDoeNiks()
 	
-	#dim BewaarProductLijn As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceMock, WinkelkarRepositoryStub, WinkelkarLijnRepositoryMock)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceMock, WinkelkarRepositoryStub, WinkelkarLijnRepositoryMock)
 	
-	Do BewaarProductLijn.BewaarProductLijn(..GeefBewaarProductLijnRequest())
+	Do Service.BewaarProductLijn(..GeefBewaarProductLijnRequest())
 
 	Do WinkelkarLijnRepositoryMock.Verifieer()
 	Do WinkelkarServiceMock.Verifieer()
@@ -50,25 +50,25 @@
 	#dim WinkelkarRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
 	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefWinkelkarIDViaID", "WinkelkarId").DanReturn("DummyID")
 	
-	#dim WinkelkarServiceStub As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
-	Do WinkelkarServiceStub.IndienMethodCall("VoegToeProduct","DummyID", "ProductId", 5 , "PakketReferentie" , "ProjectReferentie","ExterneId").DanDoeNiks()
+	Set WinkelkarServiceStub = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
+	Do WinkelkarServiceStub.IndienMethodCall("VoegToeProduct", "DummyID", "EenGroep", "ProductId", 5 , "PakketReferentie" , "ProjectReferentie","ExterneId").DanDoeNiks()
 	
-	#dim BewaarProductLijn As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceStub, WinkelkarRepositoryMock)
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceStub, WinkelkarRepositoryMock)
 	
-	Do BewaarProductLijn.BewaarProductLijn(..GeefBewaarProductLijnRequest())
+	Do Service.BewaarProductLijn(..GeefBewaarProductLijnRequest())
 
 	Do WinkelkarRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: BewaarProductLijn geeft foutmelding indien ExterneId niet bestaat">
 <Implementation><![CDATA[
-	#dim BewaarProductLijn As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New()
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New()
 	
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Winkelkar met id 'WinkelkarId' bestaat niet.")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException", Substrings))
 
-	Do BewaarProductLijn.BewaarProductLijn(..GeefBewaarProductLijnRequest())
+	Do Service.BewaarProductLijn(..GeefBewaarProductLijnRequest())
 ]]></Implementation>
 </Method>
 
Index: APPS/EC/Winkelkar/WinkelkarService.cls.xml
===================================================================
diff -u -r39318 -r39587
--- APPS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39318)
+++ APPS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39587)
@@ -63,7 +63,7 @@
 
 <Method name="VoegToeProduct">
 <Abstract>1</Abstract>
-<FormalSpec>WinkelkarID:%String,ProductID:%String,Aantal:%Integer,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
+<FormalSpec>WinkelkarID:%String,GroepNaam:%String,ProductID:%String,Aantal:%Integer,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
 <ReturnType>%String</ReturnType>
 </Method>
 
FishEye: Tag 39587 refers to a dead (removed) revision in file `vhTest/Mock/APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 39587 refers to a dead (removed) revision in file `vhTest/Fake/APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: vhTest/Fake/APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml
===================================================================
diff -u -r39143 -r39587
--- vhTest/Fake/APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml	(.../ProductLijnBuilder.cls.xml)	(revision 39143)
+++ vhTest/Fake/APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml	(.../ProductLijnBuilder.cls.xml)	(revision 39587)
@@ -13,7 +13,7 @@
 </Method>
 
 <Method name="MaakLijn">
-<FormalSpec>ProductID:%String,Aantal:%Integer,PakketReferentie:%String</FormalSpec>
+<FormalSpec>GroepNaam:%String,ProductID:%String,Aantal:%Integer,PakketReferentie:%String</FormalSpec>
 <ReturnType>DOM.EC.Winkelkar.ProductLijn</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
Index: vhTest/Mock/APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml
===================================================================
diff -u -r39143 -r39587
--- vhTest/Mock/APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml	(.../ProductLijnBuilder.cls.xml)	(revision 39143)
+++ vhTest/Mock/APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml	(.../ProductLijnBuilder.cls.xml)	(revision 39587)
@@ -16,17 +16,11 @@
 </Method>
 
 <Method name="MaakLijn">
-<FormalSpec>ProductID:%String,Aantal:%Integer=1,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
+<FormalSpec>GroepNaam:%String,ProductID:%String,Aantal:%Integer=1,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
 <ReturnType>DOM.EC.Winkelkar.ProductLijn</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("MaakLijn",ProductID,Aantal,PakketReferentie,ProjectReferentie,ExterneId)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("MaakLijn",GroepNaam,ProductID,Aantal,PakketReferentie,ProjectReferentie,ExterneId)
 ]]></Implementation>
 </Method>
-
-<Method name="VoegToeAanGroep">
-<FormalSpec>GroepNaam:%String,Lijn:DOM.EC.Winkelkar.Lijn</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("VoegToeAanGroep",GroepNaam,Lijn)
-]]></Implementation>
-</Method>
 </Class>