Index: APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml
===================================================================
diff -u -r37535 -r37537
--- APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 37535)
+++ APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 37537)
@@ -35,16 +35,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="MaatwerkCalcAPI">
-<Type>DOM.PM.impl.MaatwerkCalcAPI</Type>
-<Private>1</Private>
-</Property>
-
-<Property name="VerpakteAfmetingBerekenaarFactory">
-<Type>APPS.EC.Winkelkar.impl.VerpakteAfmetingBerekenaarFactory</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="WinkelkarRepository">
 <Type>DOM.EC.Winkelkar.impl.WinkelkarRepository</Type>
 <Private>1</Private>
@@ -60,13 +50,8 @@
 <Private>1</Private>
 </Property>
 
-<Property name="VerpakkingService">
-<Type>APPS.PM.Maatwerk.impl.VerpakkingService</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:APPS.EC.Winkelkar.impl.ProductLijnBuilder,ProductLijnRepository:DOM.EC.Winkelkar.impl.ProductLijnRepository,VerpakkingService:APPS.PM.Maatwerk.impl.VerpakkingService,MaatwerkLijnBuilder:APPS.EC.Winkelkar.impl.MaatwerkLijnBuilder</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,ProductLijnRepository:DOM.EC.Winkelkar.impl.ProductLijnRepository,MaatwerkLijnBuilder:APPS.EC.Winkelkar.impl.MaatwerkLijnBuilder</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -80,11 +65,8 @@
 	Set ..WinkelkarRepository = $$$Inject(WinkelkarRepository,##class(DOM.EC.Winkelkar.impl.WinkelkarRepository).%New())
 	Set ..ProductLijnBuilder = $$$Inject(ProductLijnBuilder,##class(APPS.EC.Winkelkar.impl.ProductLijnBuilder).%New())
 	Set ..ProductLijnRepository = $$$Inject(ProductLijnRepository,##class(DOM.EC.Winkelkar.impl.ProductLijnRepository).%New())
-	Set ..VerpakkingService = $$$Inject(VerpakkingService, ##class(APPS.PM.Maatwerk.impl.VerpakkingService).%New())
 
 	Set ..MaatwerkLijnBuilder = $$$Inject(MaatwerkLijnBuilder,##class(APPS.EC.Winkelkar.impl.MaatwerkLijnBuilder).%New())
-	Set ..MaatwerkCalcAPI = ##class(DOM.PM.impl.MaatwerkCalcAPI).%New()
-	Set ..VerpakteAfmetingBerekenaarFactory = ##class(APPS.EC.Winkelkar.impl.VerpakteAfmetingBerekenaarFactory).%New()
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -184,11 +166,11 @@
 	#dim MaatwerkLijn As DOM.EC.Winkelkar.MaatwerkLijn = ..MaatwerkLijnBuilder.MaakLijn(IngegevenKenmerken, Aantal, ProjectReferentie, GroepNaam)
 
 	Do ..WinkelkarPrijsUpdater.HerberekenLijn(Winkelkar, MaatwerkLijn)
-	Do ..BerekenMaatwerkLijnGewicht(MaatwerkLijn)
-	Do ..ZetVerpakteAfmeting(MaatwerkLijn)
-	Do ..ZetVolumeAandeel(MaatwerkLijn)
+	Do ..MaatwerkLijnBuilder.BerekenMaatwerkLijnGewicht(MaatwerkLijn)
+	Do ..MaatwerkLijnBuilder.ZetVerpakteAfmeting(MaatwerkLijn)
+	Do ..MaatwerkLijnBuilder.ZetVolumeAandeel(MaatwerkLijn)
 	
-	Do MaatwerkLijn.Save()
+	Do ..MaatwerkLijnBuilder.BewaarLijn(MaatwerkLijn)
 
 	Do ..WinkelkarRepository.Bewaar(Winkelkar)
 	
@@ -347,11 +329,11 @@
 	Do Lijn.ZetAantal(Aantal)
 
 	Do ..WinkelkarPrijsUpdater.HerberekenLijn(Winkelkar,Lijn)
-	Do ..BerekenMaatwerkLijnGewicht(Lijn)
-	Do ..ZetVerpakteAfmeting(Lijn)
-	Do ..ZetVolumeAandeel(Lijn)
+	Do ..MaatwerkLijnBuilder.BerekenMaatwerkLijnGewicht(Lijn)
+	Do ..MaatwerkLijnBuilder.ZetVerpakteAfmeting(Lijn)
+	Do ..MaatwerkLijnBuilder.ZetVolumeAandeel(Lijn)
+	Do ..MaatwerkLijnBuilder.BewaarLijn(Lijn)
 	
-	Do Lijn.Save()
 	Do ..WinkelkarRepository.Bewaar(Winkelkar)
 ]]></Implementation>
 </Method>
@@ -364,7 +346,7 @@
 
 	Do ..MaatwerkLijnBuilder.Init(Winkelkar)
 	Do ..MaatwerkLijnBuilder.ZetProjectReferentie(Lijn, NieuweProjectReferentie)
-	do Lijn.Save()
+	Do ..MaatwerkLijnBuilder.BewaarLijn(Lijn)
 	Do ..WinkelkarRepository.Bewaar(Winkelkar)
 ]]></Implementation>
 </Method>
@@ -387,11 +369,11 @@
 	Do ..MaatwerkLijnBuilder.WijzigLijn(Lijn, IngegevenKenmerken, Aantal, GroepNaam, ProjectReferentie)
 	
 	Do ..WinkelkarPrijsUpdater.HerberekenLijn(Winkelkar,Lijn)
-	Do ..BerekenMaatwerkLijnGewicht(Lijn)
-	Do ..ZetVerpakteAfmeting(Lijn)
-	Do ..ZetVolumeAandeel(Lijn)
+	Do ..MaatwerkLijnBuilder.BerekenMaatwerkLijnGewicht(Lijn)
+	Do ..MaatwerkLijnBuilder.ZetVerpakteAfmeting(Lijn)
+	Do ..MaatwerkLijnBuilder.ZetVolumeAandeel(Lijn)
 
-	Do Lijn.Save()
+	Do ..MaatwerkLijnBuilder.BewaarLijn(Lijn)
 	Do ..WinkelkarRepository.Bewaar(Winkelkar)
 
 	Quit ..GeefWinkelkar(WinkelkarID)
@@ -515,56 +497,6 @@
 	Quit WinkelkarResultaat
 ]]></Implementation>
 </Method>
-
-<Method name="BerekenMaatwerkLijnGewicht">
-<FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim BerekenTotaalGewichtOpdracht As APPS.EC.Winkelkar.impl.MaatwerkLijnGewichtOpdracht = ##class(APPS.EC.Winkelkar.impl.MaatwerkLijnGewichtOpdracht).%New()
-	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(Lijn.GeefIngegevenKenmerken()) 
-	#dim CommandList As %ListOfObjects = ##class(TECH.ListUtils).CreateListOfObjects(BerekenTotaalGewichtOpdracht)
-	Do ##class(TECH.IteratorUitvoerder).%New(HalffabItemsBoom.GeefHalffabItemsIterator(), CommandList).VoerUit()
-	Do Lijn.ZetTotaalGewicht(BerekenTotaalGewichtOpdracht.GeefResultaat())
-]]></Implementation>
-</Method>
-
-<Method name="ZetVerpakteAfmeting">
-<FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(Lijn.GeefIngegevenKenmerken()) 
-	#dim VerpakteAfmetingBerekenaar	As APPS.EC.Winkelkar.VerpakteAfmetingBerekenaar
-	Set VerpakteAfmetingBerekenaar = ..VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(HalffabItemsBoom,Lijn.GeefIngegevenKenmerken())
-	if $IsObject(VerpakteAfmetingBerekenaar) {
-		Do Lijn.ZetVerpakteAfmeting(VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting())
-	}
-]]></Implementation>
-</Method>
-
-<Method name="ZetVolumeAandeel">
-<FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = Lijn.GeefIngegevenKenmerken()
-	#dim IsFamilieLade As %Boolean = (IngegevenKenmerken.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade())
-	#dim IsVariantTAX As %Boolean = (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).Taorbox())	
-	#dim IsVariantLBX As %Boolean = (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure())	
-	
-	if IsFamilieLade {
-	 	If IsVariantTAX {
-			#dim TAXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = IngegevenKenmerken
-			if (TAXKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).Probox()) {
-				Do Lijn.ZetVolumeAandeel(..VerpakkingService.ProboxVolumeAandeel(Lijn.GeefIngegevenKenmerken()))
-			} 
-		} elseif IsVariantLBX {
-			#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = IngegevenKenmerken
-			if (LBXKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).Probox()) {
-				Do Lijn.ZetVolumeAandeel(..VerpakkingService.ProboxVolumeAandeel(Lijn.GeefIngegevenKenmerken()))
-			}
-		}
-	}
-]]></Implementation>
-</Method>
 </Class>