Index: APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml
===================================================================
diff -u -r39143 -r39573
--- APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml	(.../ProductLijnBuilder.cls.xml)	(revision 39143)
+++ APPS/EC/Winkelkar/impl/ProductLijnBuilder.cls.xml	(.../ProductLijnBuilder.cls.xml)	(revision 39573)
@@ -53,8 +53,6 @@
 <Method name="VoegToeAanGroep">
 <FormalSpec>GroepNaam:%String,Lijn:DOM.EC.Winkelkar.Lijn</FormalSpec>
 <Implementation><![CDATA[
-	set GroepNaamVoorLijnBepaler = ##class(APPS.EC.Winkelkar.impl.GroepNaamVoorLijnBepaler).%New()
-	Set GroepNaam = GroepNaamVoorLijnBepaler.GeefGroepNaam(Lijn, ..Winkelkar)
 	#dim GroepLijn As DOM.EC.Winkelkar.GroepLijn = ..Winkelkar.GeefGroepLijn(GroepNaam)
 	If (GroepLijn = "") {
 		Set GroepLijn = ##class(DOM.EC.Winkelkar.GroepLijn).%New(GroepNaam)
Index: APPS/EC/Winkelkar/impl/GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml
===================================================================
diff -u -r36988 -r39573
--- APPS/EC/Winkelkar/impl/GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml	(.../GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml)	(revision 36988)
+++ APPS/EC/Winkelkar/impl/GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml	(.../GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml)	(revision 39573)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler">
-<Super>DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerkenVisitor</Super>
+<Super>DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerkenVisitor,TECH.Mockable</Super>
 
 <Property name="GroepNaam">
 <Type>%String</Type>
Index: APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml
===================================================================
diff -u -r39527 -r39573
--- APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39527)
+++ APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39573)
@@ -76,7 +76,7 @@
 </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:APPS.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</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,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository,ProductLijnBuilder:APPS.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</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -94,7 +94,7 @@
  	Set ..WinkelkarTaalBepaler = ##class(APPS.EC.Winkelkar.impl.TaalBepaler).%New()
 
 	Set ..MaatwerkLijnBuilder = $$$Inject(MaatwerkLijnBuilder,##class(APPS.EC.Winkelkar.impl.MaatwerkLijnBuilder).%New())
-	Set ..GroepnaamVoorIngegevenKenmerkenBepaler = ##class(APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler).%New()
+	Set ..GroepnaamVoorIngegevenKenmerkenBepaler = $$$Inject(GroepnaamBepaler,##class(APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler).%New())
 	
 	Set ..QueryAPI = $$$Inject(QueryAPI,##class(TECH.Context).Instance().GeefQueryAPI())
 	
Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestHandel.cls.xml
===================================================================
diff -u -r39318 -r39573
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestHandel.cls.xml	(.../TestHandel.cls.xml)	(revision 39318)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestHandel.cls.xml	(.../TestHandel.cls.xml)	(revision 39573)
@@ -24,6 +24,10 @@
 <Private>1</Private>
 </Property>
 
+<Property name="MagMaatwerklijnGewijzigdWordenBepaler">
+<Type>APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden</Type>
+</Property>
+
 <Parameter name="AantalProductenInLijn">
 <Type>%Integer</Type>
 <Default>2</Default>
@@ -35,10 +39,9 @@
 	do ##class(TECH.Context.RuntimeContext).Instance().ZetTaal(##class(DOM.enu.Taal).Nederlands())
 		
 	#dim MailAPI As vhUnitTest.TECH.Mail.impl.MailAPIMock = ##class(vhUnitTest.TECH.Mail.impl.MailAPIMock).MockInstance()
-	#dim MagMaatwerklijnGewijzigdWordenBepaler As APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden = ##class(APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden).%New()
 	
 	set ..MaatwerklijnInputValidatorMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService.MaatwerklijnInputValidator).%New()
-	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock)
+	Set ..MagMaatwerklijnGewijzigdWordenBepaler = ##class(APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden).%New()
 	
 	do ##super()
 ]]></Implementation>
@@ -54,6 +57,8 @@
 	
 	Do WebshopSessionServiceStub.IndienMethodCall("GeefSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID()).DanReturn(##class(APPS.EC.impl.VanHoeckeWebshopSessie).%New($$$DummyString))
 	Do ECommerceAPIStub.IndienMethodCall("GeefWebshopSessionService").DanReturn(WebshopSessionServiceStub)
+
+	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock)
 ]]></Implementation>
 </Method>
 
@@ -181,10 +186,14 @@
 <Method name="TestGeefWinkelkarInclBewerkteIngave">
 <Implementation><![CDATA[
 	Do ..UitmockenKlantDataBepaler()
+	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(..MagMaatwerklijnGewijzigdWordenBepaler, ..MaatwerklijnInputValidatorMock,,,,,,,,,,GroepNaamBepalerStub)
+
 	#dim WinkelkarID As %String = ..MaakWinkelkarEnGeefID()
-	#dim MaatwerkLijnID1 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
-	#dim MaatwerkLijnID2 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
-	#dim MaatwerkLijnID3 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
+	#dim MaatwerkLijnID1 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID,"Een GroepNaam")
+	#dim MaatwerkLijnID2 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID,"Een GroepNaam")
+	#dim MaatwerkLijnID3 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID,"Een GroepNaam")
 	
 	#dim NieuweIngegevenKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
 	Set NieuweIngegevenKenmerken.CorpusBreedte = "999" 
@@ -228,12 +237,12 @@
 </Method>
 
 <Method name="VoegToeMaatwerkLijnEnGeefID">
-<FormalSpec>WinkelkarID:%String</FormalSpec>
+<FormalSpec>WinkelkarID:%String,Groepnaam:%String="GroepNaam"</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
-	#dim LijnID As %String = ..WinkelkarService.VoegToeMaatwerk(WinkelkarID, "GroepNaam", IngegevenKenmerken, ..#AantalProductenInLijn).LijnID
+	#dim LijnID As %String = ..WinkelkarService.VoegToeMaatwerk(WinkelkarID, Groepnaam, IngegevenKenmerken, ..#AantalProductenInLijn).LijnID
 	Quit LijnID
 ]]></Implementation>
 </Method>
Index: vhTest/Mock/APPS/EC/Winkelkar/impl/GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Mock/APPS/EC/Winkelkar/impl/GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml	(revision 0)
+++ vhTest/Mock/APPS/EC/Winkelkar/impl/GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml	(revision 39573)
@@ -0,0 +1,42 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler">
+<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
+Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="GeefGroepNaam">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Taal:DOM.enu.Taal,FallbackTaal:DOM.enu.Taal=""</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefGroepNaam",IngegevenKenmerken,Taal,FallbackTaal)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkLBXKenmerken">
+<FormalSpec>LBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("VerwerkLBXKenmerken",LBXKenmerken)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkMATKenmerken">
+<FormalSpec>MATKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("VerwerkMATKenmerken",MATKenmerken)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkTAORKenmerken">
+<FormalSpec>TAORKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("VerwerkTAORKenmerken",TAORKenmerken)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml
===================================================================
diff -u -r39536 -r39573
--- APPS/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml	(.../MaatwerkLijnBuilder.cls.xml)	(revision 39536)
+++ APPS/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml	(.../MaatwerkLijnBuilder.cls.xml)	(revision 39573)
@@ -18,11 +18,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="GroepNaamVoorLijnBepaler">
-<Type>APPS.EC.Winkelkar.impl.GroepNaamVoorLijnBepaler</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="Winkelkar">
 <Type>DOM.EC.Winkelkar.Winkelkar</Type>
 <Private>1</Private>
@@ -57,7 +52,6 @@
 <Implementation><![CDATA[
 	set ..IngegevenKenmerkenConverter = ##class(APPS.PM.Maatwerk.impl.IngegevenKenmerkenConverter).%New()
 	set ..AdminTekstUtils = ##class(APPS.ApplicatieContext).Instance().GeefCommonAPI().GeefAdminTekstUtils()
-	set ..GroepNaamVoorLijnBepaler = ##class(APPS.EC.Winkelkar.impl.GroepNaamVoorLijnBepaler).%New()
 	Set ..MaatwerkCalcAPI = ##class(DOM.PM.impl.MaatwerkCalcAPI).%New()
 	Set ..VerpakteAfmetingBerekenaarFactory = ##class(APPS.EC.Winkelkar.impl.VerpakteAfmetingBerekenaarFactory).%New()
 	Set ..VerpakkingService = $$$Inject(VerpakkingService, ##class(APPS.PM.Maatwerk.impl.VerpakkingService).%New())
@@ -108,7 +102,6 @@
 		Do ..ZetProjectReferentie(Lijn,ProjectReferentie)
 	}
 
-	Set GroepNaam = ..GroepNaamVoorLijnBepaler.GeefGroepNaam(Lijn, ..Winkelkar)
 	If (GroepNaam '= "") { // Voorlopig is dit een optionele parameter op WS-niveau, om backward-compatible te zijn zolang de UI-code niet is aangepast...
 		Do ..VerplaatsLijnNaarGroepIndienNodig( Lijn, GroepNaam)
 	}
@@ -199,7 +192,6 @@
 <Method name="VoegToeAanGroep">
 <FormalSpec>GroepNaam:%String,Lijn:DOM.EC.Winkelkar.Lijn</FormalSpec>
 <Implementation><![CDATA[
-	Set GroepNaam = $$$If($length(GroepNaam),GroepNaam,..GroepNaamVoorLijnBepaler.GeefGroepNaam(Lijn, ..Winkelkar))
 	#dim GroepLijn As DOM.EC.Winkelkar.GroepLijn = ..Winkelkar.GeefGroepLijn(GroepNaam)
 	If (GroepLijn = "") {
 		Set GroepLijn = ##class(DOM.EC.Winkelkar.GroepLijn).%New(GroepNaam)
Index: vhTest/Fake/APPS/EC/Winkelkar/impl/GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Fake/APPS/EC/Winkelkar/impl/GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml	(revision 0)
+++ vhTest/Fake/APPS/EC/Winkelkar/impl/GroepNaamVoorIngegevenKenmerkenBepaler.cls.xml	(revision 39573)
@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler">
+<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>APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler</Super>
+
+<Method name="GeefGroepNaam">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Taal:DOM.enu.Taal,FallbackTaal:DOM.enu.Taal=""</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkLBXKenmerken">
+<FormalSpec>LBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkMATKenmerken">
+<FormalSpec>MATKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkTAORKenmerken">
+<FormalSpec>TAORKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WS/EC/Winkelkar/WinkelkarService.cls.xml
===================================================================
diff -u -r39318 -r39573
--- WS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39318)
+++ WS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39573)
@@ -24,6 +24,21 @@
 <Private>1</Private>
 </Property>
 
+<Property name="GroepNaamVoorIngegevenKenmerkenBepaler">
+<Type>APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>GroepNaamVoorIngegevenKenmerkenBepaler:APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[	Set ..GroepNaamVoorIngegevenKenmerkenBepaler = $$$Inject(GroepNaamVoorIngegevenKenmerkenBepaler,##class(APPS.EC.Winkelkar.impl.GroepNaamVoorIngegevenKenmerkenBepaler).%New())
+]]></Implementation>
+</Method>
+
 <Method name="GeefWinkelkar">
 <FormalSpec>Applicatie:WS.EC.Winkelkar.Applicatie="",WinkelkarID:%String</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
@@ -79,9 +94,12 @@
 	$$$chkIsObject(IngegevenKenmerken)
 	$$$chkValidateObject(IngegevenKenmerken)
 	
+	
 	Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetWinkelkar(WinkelkarID)
 	
 	Do ..PreProcessor.PasAanKenmerkenNietInvulbaarDoorGebruiker(IngegevenKenmerken)
+
+	Set GroepNaam = ..GeefGroepNaamDTOIngegevenKenmerken(IngegevenKenmerken)
 	
 	Quit ..WinkelkarService.VoegToeMaatwerkEnGeefWinkelkarTerug(WinkelkarID, GroepNaam, IngegevenKenmerken, Aantal, .ProjectReferentie)
 ]]></Implementation>
@@ -100,7 +118,7 @@
 	Do ..PreProcessor.PasAanKenmerkenNietInvulbaarDoorGebruiker(IngegevenKenmerken)
 
 	Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetWinkelkar(WinkelkarID)
-	
+	Set GroepNaam = ..GeefGroepNaamDTOIngegevenKenmerken(IngegevenKenmerken)
 	Quit ..WinkelkarService.VoegToeMaatwerk(WinkelkarID, GroepNaam, IngegevenKenmerken, Aantal, .ProjectReferentie).LijnID
 ]]></Implementation>
 </Method>
@@ -180,6 +198,9 @@
 	Do ..PreProcessor.PasAanKenmerkenNietInvulbaarDoorGebruiker(IngegevenKenmerken)
 
 	Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetWinkelkar(WinkelkarID)
+	
+	Set GroepNaam = ..GeefGroepNaamDTOIngegevenKenmerken(IngegevenKenmerken)
+	
 	Do ..WinkelkarService.WijzigMaatwerkLijn(WinkelkarID, LijnID, IngegevenKenmerken, Aantal, GroepNaam, ProjectReferentie)
 ]]></Implementation>
 </Method>
@@ -194,6 +215,18 @@
 	Do ..WinkelkarService.WijzigLijnProjectReferentie(WinkelkarID, LijnID, NieuweProjectReferentie)
 ]]></Implementation>
 </Method>
+
+<Method name="GeefGroepNaamDTOIngegevenKenmerken">
+<FormalSpec>IngegevenKenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim IngegevenKenmerkenConverter As APPS.PM.Maatwerk.IngegevenKenmerkenConverter = ..MaatwerkAPI.GeefIngegevenKenmerkenConverter()
+	#Dim DomIngegevenKenmerken as  DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
+	Set DomIngegevenKenmerken = IngegevenKenmerkenConverter.NaarObject(IngegevenKenmerken)
+	Set GroepNaam = ..GroepNaamVoorIngegevenKenmerkenBepaler.GeefGroepNaam(DomIngegevenKenmerken,..GeefTaal(),##class(DOM.enu.Taal).Nederlands())
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestVanHoecke.cls.xml
===================================================================
diff -u -r39318 -r39573
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestVanHoecke.cls.xml	(.../TestVanHoecke.cls.xml)	(revision 39318)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestVanHoecke.cls.xml	(.../TestVanHoecke.cls.xml)	(revision 39573)
@@ -53,7 +53,6 @@
 	
 	set ..KlantID = "K||7587"
 	set ..Personality = ##class(DOM.common.enu.Personality).VanHoecke()
-	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New()
 ]]></Implementation>
 </Method>
 
@@ -69,6 +68,7 @@
 	Do ECommerceAPIStub.IndienMethodCall("GeefWebshopSessionService").DanReturn(WebshopSessionServiceStub)
 		
 	#dim MailAPI As vhUnitTest.TECH.Mail.impl.MailAPIMock = ##class(vhUnitTest.TECH.Mail.impl.MailAPIMock).MockInstance()
+	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New()
 ]]></Implementation>
 </Method>
 
@@ -399,22 +399,24 @@
 
 <Method name="TestGeefWinkelkarInclBewerkteIngave">
 <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)
+
 	#dim WinkelkarID As %String = ..MaakWinkelkarEnGeefID()
-	#dim MaatwerkLijnID1 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
-	#dim MaatwerkLijnID2 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
-	#dim MaatwerkLijnID3 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
+	#dim MaatwerkLijnID1 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID, "Een GroepNaam")
+	#dim MaatwerkLijnID2 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID, "Een GroepNaam")
+	#dim MaatwerkLijnID3 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID, "Een GroepNaam")
 	
 	#dim NieuweIngegevenKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
-	Set NieuweIngegevenKenmerken.CorpusBreedte = "999" 
 	
 	// Actie
 	#dim WinkelkarDto As APPS.EC.Winkelkar.dto.Winkelkar = ..WinkelkarService.GeefWinkelkarInclusiefBewerkteIngaveGroeperingGewijzigd(WinkelkarID, NieuweIngegevenKenmerken,MaatwerkLijnID1)
 		
 	// Controle
 	Do $$$AssertTrue( $IsObject(WinkelkarDto)) 
 	Do $$$AssertEquals( 1, WinkelkarDto.Lijnen.Count()) 
-	Do $$$AssertTrue(WinkelkarDto.Lijnen.GetNext().%IsA("APPS.EC.Winkelkar.dto.GroepLijn"), WinkelkarDto.Lijnen.GetNext()) 
-	
+	Do $$$AssertTrue(WinkelkarDto.Lijnen.GetAt(1).%IsA("APPS.EC.Winkelkar.dto.GroepLijn"), WinkelkarDto.Lijnen.GetNext()) 
 	#dim GroepLijn As APPS.EC.Winkelkar.dto.GroepLijn = WinkelkarDto.Lijnen.GetAt(1)
 	Do $$$AssertEquals(GroepLijn.Lijnen.Count(),3,"Er blijven drie lijnen inzitten.")
 	
@@ -435,41 +437,45 @@
 
 <Method name="TestGeefWinkelkarInclBewerkteIngaveGroeperingGewijzigd">
 <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)
+
 	#dim WinkelkarID As %String = ..MaakWinkelkarEnGeefID()
-	#dim MaatwerkLijnID1 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
-	#dim MaatwerkLijnID2 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
-	#dim MaatwerkLijnID3 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID)
+	#dim MaatwerkLijnID1 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID , "EenGroepNaam")
+	#dim MaatwerkLijnID2 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID , "EenGroepNaam")
+	#dim MaatwerkLijnID3 As %String = ..VoegToeMaatwerkLijnEnGeefID(WinkelkarID , "EenGroepNaam")
 	
 	#dim NieuweIngegevenKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
-	Set NieuweIngegevenKenmerken.LadeKleur = ##class(DOM.PM.enu.TAORLadeKleur).ZwartIngekleurdYaya()
 	
 	// Actie
 	#dim WinkelkarDto As APPS.EC.Winkelkar.dto.Winkelkar = ..WinkelkarService.GeefWinkelkarInclusiefBewerkteIngaveGroeperingGewijzigd(WinkelkarID, NieuweIngegevenKenmerken,MaatwerkLijnID1)
 		
 	// Controle
 	Do $$$AssertTrue( $IsObject(WinkelkarDto)) 
-	Do $$$AssertEquals(WinkelkarDto.Lijnen.Count(),2,"Er zijn twee groepen, één is groep is toegevoegd.") 
-	Do $$$AssertTrue(WinkelkarDto.Lijnen.GetNext().%IsA("APPS.EC.Winkelkar.dto.GroepLijn"), WinkelkarDto.Lijnen.GetNext()) 
+	if $$$AssertEquals(WinkelkarDto.Lijnen.Count(),2,"Er zijn twee groepen, één is groep is toegevoegd.") {
+		Do $$$AssertTrue(WinkelkarDto.Lijnen.GetNext().%IsA("APPS.EC.Winkelkar.dto.GroepLijn"), WinkelkarDto.Lijnen.GetNext()) 
 	
-	#dim GroepLijn As APPS.EC.Winkelkar.dto.GroepLijn = WinkelkarDto.Lijnen.GetAt(1)
-	Do $$$AssertEquals(GroepLijn.Lijnen.Count(),2,"Er blijven twee lijnen inzitten.")
+		#dim GroepLijn As APPS.EC.Winkelkar.dto.GroepLijn = WinkelkarDto.Lijnen.GetAt(1)
+		Do $$$AssertEquals(GroepLijn.Lijnen.Count(),2,"Er blijven twee lijnen inzitten.")
 	
-	#dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = GroepLijn.Lijnen.GetAt(1)
-	Do $$$AssertEquals(MaatwerkLijn.LijnID,MaatwerkLijnID2,"Lijn in tweede groep")
-	Do $$$AssertFalse(MaatwerkLijn.EenheidPrijs = 0,"Eenheidsprijs van tweede lijn is ongewijzigd.")
-	Set MaatwerkLijn = GroepLijn.Lijnen.GetAt(2)
-	Do $$$AssertEquals(MaatwerkLijn.LijnID,MaatwerkLijnID3,"Lijn in tweede groep")
-	Do $$$AssertFalse(MaatwerkLijn.EenheidPrijs = 0,"Eenheidsprijs van derde lijn is ongewijzigd.")
+		#dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = GroepLijn.Lijnen.GetAt(1)
+		Do $$$AssertEquals(MaatwerkLijn.LijnID,MaatwerkLijnID2,"Lijn in tweede groep")
+		Do $$$AssertFalse(MaatwerkLijn.EenheidPrijs = 0,"Eenheidsprijs van tweede lijn is ongewijzigd.")
+		Set MaatwerkLijn = GroepLijn.Lijnen.GetAt(2)
+		Do $$$AssertEquals(MaatwerkLijn.LijnID,MaatwerkLijnID3,"Lijn in tweede groep")
+		Do $$$AssertFalse(MaatwerkLijn.EenheidPrijs = 0,"Eenheidsprijs van derde lijn is ongewijzigd.")
 	
-	Set GroepLijn = WinkelkarDto.Lijnen.GetAt(2)
-	Do $$$AssertEquals(GroepLijn.Lijnen.Count(),1,"Eén lijn van groep verplaatst.")
-	
-	Set MaatwerkLijn = GroepLijn.Lijnen.GetAt(1)
-	Do $$$AssertEquals(MaatwerkLijn.LijnID,MaatwerkLijnID1,"Lijn in tweede groep")
-	Do $$$AssertEquals(MaatwerkLijn.EenheidPrijs,"","Eenheidsprijs van gewijzigde lijn is leeg gemaakt.")
-	Do $$$AssertEquals(MaatwerkLijn.TotaalPrijs,"","Totaalprijs van gewijzigde lijn is leeg gemaakt.")
-	Do $$$AssertEquals(MaatwerkLijn.Aantal,"2","Aantal behouden.")
-	Do $$$AssertEquals(MaatwerkLijn.ProjectReferentie,"","Projectreferentie behouden.")
+		Set GroepLijn = WinkelkarDto.Lijnen.GetAt(2)
+		Do $$$AssertEquals(GroepLijn.Lijnen.Count(),1,"Eén lijn van groep verplaatst.")
+		
+		Set MaatwerkLijn = GroepLijn.Lijnen.GetAt(1)
+		Do $$$AssertEquals(MaatwerkLijn.LijnID,MaatwerkLijnID1,"Lijn in tweede groep")
+		Do $$$AssertEquals(MaatwerkLijn.EenheidPrijs,"","Eenheidsprijs van gewijzigde lijn is leeg gemaakt.")
+		Do $$$AssertEquals(MaatwerkLijn.TotaalPrijs,"","Totaalprijs van gewijzigde lijn is leeg gemaakt.")
+		Do $$$AssertEquals(MaatwerkLijn.Aantal,"2","Aantal behouden.")
+		Do $$$AssertEquals(MaatwerkLijn.ProjectReferentie,"","Projectreferentie behouden.")
+	}
 ]]></Implementation>
 </Method>
 
@@ -535,12 +541,12 @@
 </Method>
 
 <Method name="VoegToeMaatwerkLijnEnGeefID">
-<FormalSpec>WinkelkarID:%String</FormalSpec>
+<FormalSpec>WinkelkarID:%String,Groepnaam:%String="GroepNaam"</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardBinnenlade()
-	#dim Lijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..WinkelkarService.VoegToeMaatwerk(WinkelkarID, "GroepNaam", IngegevenKenmerken, ..#AantalProductenInLijn)
+	#dim Lijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..WinkelkarService.VoegToeMaatwerk(WinkelkarID, Groepnaam, IngegevenKenmerken, ..#AantalProductenInLijn)
 	Quit Lijn.LijnID
 ]]></Implementation>
 </Method>