Index: APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml
===================================================================
diff -u -r39144 -r39894
--- APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39144)
+++ APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39894)
@@ -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>
@@ -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())
 	
@@ -202,25 +202,35 @@
 
 <Method name="VoegToeMaatwerk">
 <FormalSpec>WinkelkarID:%String,GroepNaam:%String,IngegevenKenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken,Aantal:%Integer,ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
-<ReturnType>%String</ReturnType>
+<ReturnType>APPS.EC.Winkelkar.dto.MaatwerkLijn</ReturnType>
 <Implementation><![CDATA[
 	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ..OpenWinkelkar(WinkelkarID)
 
 	Do ..MaatwerkLijnBuilder.Init(Winkelkar)
 	#dim MaatwerkLijn As DOM.EC.Winkelkar.MaatwerkLijn = ..MaatwerkLijnBuilder.MaakLijn(IngegevenKenmerken, Aantal, ProjectReferentie, GroepNaam, ExterneId)
 	Do ..WijzigLijn(Winkelkar,MaatwerkLijn,Aantal)
 	
-	Quit MaatwerkLijn.GeefID()
+	#dim GevondenLijn As APPS.EC.Winkelkar.dto.Lijn = ""
+	#dim Winkelkardto As APPS.EC.Winkelkar.dto.Winkelkar = ..GeefWinkelkar(WinkelkarID)
+	
+	Set Iterator = ##class(TECH.ListIterator).%New(##class(APPS.EC.Winkelkar.impl.WinkelkarUtils).%New().GeefMaatwerkLijnen(Winkelkardto))
+	
+	While $$$Not($IsObject(GevondenLijn)) && Iterator.HasNext() {
+		#dim Lijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = Iterator.Next()
+		Set:((Lijn.LijnID = MaatwerkLijn.GeefID()) && ($length(Lijn.LijnID))) GevondenLijn = Lijn 	
+	}
+	
+	Quit GevondenLijn
 ]]></Implementation>
 </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)
@@ -317,6 +327,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAsapMogelijk">
+<FormalSpec>WinkelkarID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (..VroegsteLeverdatumBepaler.GeefVroegsteLeverdatumPerLijn(..GeefWinkelkar(WinkelkarID)).Count()>1)
+]]></Implementation>
+</Method>
+
 <Method name="GeefLijn">
 <FormalSpec>WinkelkarID:%String,LijnID:%String</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.Lijn</ReturnType>
@@ -446,7 +463,7 @@
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[
 	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ..OpenWinkelkar(WinkelkarID)
-	Quit ##class(APPS.EC.Winkelkar.impl.MaatwerkLijnVisitor).%New().GeefMaatwerkLijnen(Winkelkar)
+	Quit ##class(DOM.EC.Winkelkar.impl.WinkelkarUtils).%New().GeefMaatwerkLijnen(Winkelkar)
 ]]></Implementation>
 </Method>