Index: DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/v003/Onderdelen.cls.xml
===================================================================
diff -u -r32220 -r32223
--- DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/v003/Onderdelen.cls.xml	(.../Onderdelen.cls.xml)	(revision 32220)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/v003/Onderdelen.cls.xml	(.../Onderdelen.cls.xml)	(revision 32223)
@@ -19,122 +19,103 @@
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	do ##super(SamengesteldKostItemBuilder)
+	Do ##super(SamengesteldKostItemBuilder)
 	
-	Set BevatDrevelKoppelingEvaluatorInput = ##class(DOM.PM.Maatwerk.Calc.Kost.EvaluatorInput).%New()
+	#dim BevatDrevelKoppelingEvaluatorInput As DOM.PM.Maatwerk.Calc.Kost.EvaluatorInput = ##class(DOM.PM.Maatwerk.Calc.Kost.EvaluatorInput).%New()
 	Do BevatDrevelKoppelingEvaluatorInput.VoegToeKenmerk("KoppelingType", ##class(TECH.enu.NumericOperator).EqualTo(),##class(DOM.PM.enu.TAORKoppelingType).Drevel())
-	Set ..BevatDrevelKoppelingEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator).%New(BevatDrevelKoppelingEvaluatorInput)
 	
+	Set ..BevatDrevelKoppelingEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator).%New(BevatDrevelKoppelingEvaluatorInput)
 	Set ..IsGeenBinnenladeEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.NotEvaluator).%New(..IsBinnenladeEvaluator())
 	
-	do ..InitV1()
-	do ..InitProbox()
-	do ..InitBulkPerOnderdeelGegroepeerd()
+	Do ..InitV1()
+	Do ..InitProbox()
+	Do ..InitBulkPerOnderdeelGegroepeerd()
 	
-	quit $$$OK
+	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="InitV1">
 <Private>1</Private>
 <Implementation><![CDATA[
-	set V1Evaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator.HeeftVerpakkingTypeEvaluator).%New(##class(DOM.PM.enu.TAORVerpakkingType).V1())
-	#dim BevatHulsEvaluator As DOM.PM.Maatwerk.Calc.Kost.IEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.OfEvaluator).%New(
-				##class(TECH.ListUtils).CreateListOfObjects(
-					..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Glijder()),
-					..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).DiepteVerstelling()),
-					..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Tipon()),
-					..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieTandwiel()),
-					..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Opvullijst()),
-					##class(DOM.PM.Maatwerk.Calc.Kost.EnEvaluator).%New(..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Koppeling()),
-								##class(DOM.PM.Maatwerk.Calc.Kost.EnEvaluator).%New(..BevatDrevelKoppelingEvaluator, ..IsGeenBinnenladeEvaluator)),
-					##class(DOM.PM.Maatwerk.Calc.Kost.EnEvaluator).%New(..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).FrontBevestiging()), ..IsGeenBinnenladeEvaluator),
-					##class(DOM.PM.Maatwerk.Calc.Kost.EnEvaluator).%New(..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).BodemOndersteuning()), ..IsGeenBinnenladeEvaluator)
-				)
-			)
+	#dim HulsEvaluators As %ListOfObjects = ##class(%ListOfObjects).%New()
 	
-	Do ..VoegToeVariabele("Huls maken en vouwen op kartonmachine",..Kostenplaatsen.Kartonmachine002,36,1,35,,,).GebruikEvaluator(V1Evaluator, BevatHulsEvaluator)
+	Do HulsEvaluators.Insert(..GeefRolAanwezigEvaluator(..Enum.Rol.Glijder))
+	Do HulsEvaluators.Insert(..GeefRolAanwezigEvaluator(..Enum.Rol.DiepteVerstelling))
+	Do HulsEvaluators.Insert(..GeefRolAanwezigEvaluator(..Enum.Rol.Tipon))
+	Do HulsEvaluators.Insert(..GeefRolAanwezigEvaluator(..Enum.Rol.TiponSynchronisatieTandwiel))
+	Do HulsEvaluators.Insert(..GeefRolAanwezigEvaluator(..Enum.Rol.Opvullijst))
+	Do HulsEvaluators.Insert(##class(DOM.PM.Maatwerk.Calc.Kost.EnEvaluator).%New(..GeefRolAanwezigEvaluator(..Enum.Rol.Koppeling), ##class(DOM.PM.Maatwerk.Calc.Kost.EnEvaluator).%New(..BevatDrevelKoppelingEvaluator, ..IsGeenBinnenladeEvaluator)))
+	Do HulsEvaluators.Insert(##class(DOM.PM.Maatwerk.Calc.Kost.EnEvaluator).%New(..GeefRolAanwezigEvaluator(..Enum.Rol.FrontBevestiging), ..IsGeenBinnenladeEvaluator))
+	Do HulsEvaluators.Insert(##class(DOM.PM.Maatwerk.Calc.Kost.EnEvaluator).%New(..GeefRolAanwezigEvaluator(..Enum.Rol.BodemOndersteuning), ..IsGeenBinnenladeEvaluator))
 	
-	Do ..VoegToeVariabele("Verplaatsing en doos nemen",..Kostenplaatsen.PickingOnderdelen002,37,1,10,,,).GebruikEvaluator(V1Evaluator, BevatHulsEvaluator)
-		
-	Do ..VoegToeVariabele("Picking en in huls : glijder",..Kostenplaatsen.PickingOnderdelen002,38,1,15,,,).GebruikEvaluator(V1Evaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Glijder()))
+	#dim V1Evaluator As DOM.PM.Maatwerk.Calc.Kost.IEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator.HeeftVerpakkingTypeEvaluator).%New(..Enum.VerpakkingType.V1)
+	#dim BevatHulsEvaluator As DOM.PM.Maatwerk.Calc.Kost.IEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.OfEvaluator).%New(HulsEvaluators)
 	
-	Do ..VoegToeVariabele("Picking en in huls : diepteverstelling",..Kostenplaatsen.PickingOnderdelen002,39,1,5,,,).GebruikEvaluator(V1Evaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).DiepteVerstelling()))
-		
-	Do ..VoegToeVariabele("Picking en in huls : T51 koppeling",..Kostenplaatsen.PickingOnderdelen002,40,1,5,,,).GebruikEvaluator(V1Evaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Koppeling()), ..BevatDrevelKoppelingEvaluator, ..IsGeenBinnenladeEvaluator)
-	
-	Do ..VoegToeVariabele("Picking en in huls : frontblok",..Kostenplaatsen.PickingOnderdelen002,41,..Multipliers.FrontBevestigingAantal,2,,,).GebruikEvaluator(V1Evaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).FrontBevestiging()), ..IsGeenBinnenladeEvaluator)
-		
-	Do ..VoegToeVariabele("Picking en in huls : bodemondersteuning",..Kostenplaatsen.PickingOnderdelen002,42,..Multipliers.BodemOndersteuningAantal,5,,,).GebruikEvaluator(V1Evaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).BodemOndersteuning()), ..IsGeenBinnenladeEvaluator)
-	
-	Do ..VoegToeVariabele("Picking en in huls : TIP-ON-element",..Kostenplaatsen.PickingOnderdelen002,43,1,5,,,).GebruikEvaluator(V1Evaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Tipon()))
-		
-	Do ..VoegToeVariabele("Picking en in huls : TIP-ON synchronisatietandwiel",..Kostenplaatsen.PickingOnderdelen002,44,1,3,,,).GebruikEvaluator(V1Evaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieTandwiel()))
-	
+	Do ..VoegToeVariabele("Huls maken en vouwen op kartonmachine", ..Kostenplaatsen.Kartonmachine002, 36, 1, 35,,,).GebruikEvaluator(V1Evaluator, BevatHulsEvaluator)
+	Do ..VoegToeVariabele("Verplaatsing en doos nemen", ..Kostenplaatsen.PickingOnderdelen002, 37, 1, 10,,,).GebruikEvaluator(V1Evaluator, BevatHulsEvaluator)	
+	Do ..VoegToeVariabele("Picking en in huls : glijder", ..Kostenplaatsen.PickingOnderdelen002, 38, 1, 15,,,).GebruikEvaluator(V1Evaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.Glijder))
+	Do ..VoegToeVariabele("Picking en in huls : diepteverstelling", ..Kostenplaatsen.PickingOnderdelen002, 39, 1, 5,,,).GebruikEvaluator(V1Evaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.DiepteVerstelling))
+	Do ..VoegToeVariabele("Picking en in huls : T51 koppeling", ..Kostenplaatsen.PickingOnderdelen002, 40, 1, 5,,,).GebruikEvaluator(V1Evaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.Koppeling), ..BevatDrevelKoppelingEvaluator, ..IsGeenBinnenladeEvaluator)
+	Do ..VoegToeVariabele("Picking en in huls : frontblok", ..Kostenplaatsen.PickingOnderdelen002, 41, ..Multipliers.FrontBevestigingAantal, 2,,,).GebruikEvaluator(V1Evaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.FrontBevestiging), ..IsGeenBinnenladeEvaluator)
+	Do ..VoegToeVariabele("Picking en in huls : bodemondersteuning", ..Kostenplaatsen.PickingOnderdelen002, 42, ..Multipliers.BodemOndersteuningAantal, 5,,,).GebruikEvaluator(V1Evaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.BodemOndersteuning), ..IsGeenBinnenladeEvaluator)
+	Do ..VoegToeVariabele("Picking en in huls : TIP-ON-element", ..Kostenplaatsen.PickingOnderdelen002, 43, 1, 5,,,).GebruikEvaluator(V1Evaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.Tipon))
+	Do ..VoegToeVariabele("Picking en in huls : TIP-ON synchronisatietandwiel", ..Kostenplaatsen.PickingOnderdelen002, 44, 1, 3,,,).GebruikEvaluator(V1Evaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.TiponSynchronisatieTandwiel))
 	Do ..VoegToeVariabele("Picking en in huls : TIP-ON BLUMOTION koppelstuk", ..Kostenplaatsen.PickingOnderdelen002, 60, 1, 3,,,).GebruikEvaluator(V1Evaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.TiponBlumotionSynchronisatieAdapter))
-	
 	Do ..VoegToeVariabele("Picking en in huls : TIP-ON BLUMOTION meenemer en eenheid", ..Kostenplaatsen.PickingOnderdelen002, 61, 1, 3,,,).GebruikEvaluator(V1Evaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.TiponBlumotionSetEenhedenEnMeenemers))
-	
-	Do ..VoegToeVariabele("Picking opvullijst",..Kostenplaatsen.PickingOnderdelen002,45,1,8,,,).GebruikEvaluator(V1Evaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Opvullijst()))
-
-	Do ..VoegToeVariabele("Wegzetten verpakking allerlei",..Kostenplaatsen.PickingOnderdelen002,46,1,5,,,).GebruikEvaluator(V1Evaluator, BevatHulsEvaluator)
+	Do ..VoegToeVariabele("Picking opvullijst", ..Kostenplaatsen.PickingOnderdelen002, 45, 1, 8,,,).GebruikEvaluator(V1Evaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.Opvullijst))
+	Do ..VoegToeVariabele("Wegzetten verpakking allerlei", ..Kostenplaatsen.PickingOnderdelen002, 46, 1, 5,,,).GebruikEvaluator(V1Evaluator, BevatHulsEvaluator)
 ]]></Implementation>
 </Method>
 
 <Method name="InitProbox">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set HeefOnderdelenDoosEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator.HeeftOnderdelenDoosEvaluator).%New()
-	set ProboxEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator.HeeftVerpakkingTypeEvaluator).%New(##class(DOM.PM.enu.TAORVerpakkingType).Probox())
+	#dim HeefOnderdelenDoosEvaluator As DOM.PM.Maatwerk.Calc.Kost.IEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator.HeeftOnderdelenDoosEvaluator).%New()
+	#dim ProboxEvaluator As DOM.PM.Maatwerk.Calc.Kost.IEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator.HeeftVerpakkingTypeEvaluator).%New(..Enum.VerpakkingType.Probox)
 	
-	Do ..VoegToeVariabele("Probox doos opzetten, LO plaatsen, wegvoeren",..Kostenplaatsen.PickingOnderdelen002,47,0.25,60,,,).GebruikEvaluator(ProboxEvaluator, HeefOnderdelenDoosEvaluator)
+	Do ..VoegToeVariabele("Probox doos opzetten, LO plaatsen, wegvoeren", ..Kostenplaatsen.PickingOnderdelen002, 47, 0.25, 60,,,).GebruikEvaluator(ProboxEvaluator, HeefOnderdelenDoosEvaluator)
+	Do ..VoegToeVariabele("Verplaatsing en doos nemen", ..Kostenplaatsen.PickingOnderdelen002, 48, 0.25, 15,,,).GebruikEvaluator(ProboxEvaluator, HeefOnderdelenDoosEvaluator)
+	Do ..VoegToeVariabele("Picking en in huls : glijder", ..Kostenplaatsen.PickingOnderdelen002, 49, 0.25, 30,,,).GebruikEvaluator(ProboxEvaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.Glijder))	
+	Do ..VoegToeVariabele("Picking en in huls : diepteverstelling", ..Kostenplaatsen.PickingOnderdelen002, 50, 0.25, 12,,,).GebruikEvaluator(ProboxEvaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.DiepteVerstelling))	
+	Do ..VoegToeVariabele("Picking en in huls : T51 koppeling", ..Kostenplaatsen.PickingOnderdelen002, 51, 0.25, 12,,,).GebruikEvaluator(ProboxEvaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.Koppeling), ..BevatDrevelKoppelingEvaluator, ..IsGeenBinnenladeEvaluator)	
+
+	#dim FrontBevestiging As DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.common.VariabeleAfmetingActiviteitKostItemBuilderData = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.common.VariabeleAfmetingActiviteitKostItemBuilderData).%New(52, ..Kostenplaatsen.PickingOnderdelen002, "Picking en in huls : frontblok")
 	
-	Do ..VoegToeVariabele("Verplaatsing en doos nemen",..Kostenplaatsen.PickingOnderdelen002,48,0.25,15,,,).GebruikEvaluator(ProboxEvaluator, HeefOnderdelenDoosEvaluator)
+	Set FrontBevestiging.VasteKost = 9
+	Set FrontBevestiging.Factor = ##class(DOM.PM.Maatwerk.Calc.Kost.MultiplyMultiplier).%New()
 	
-	Do ..VoegToeVariabele("Picking en in huls : glijder",..Kostenplaatsen.PickingOnderdelen002,49,0.25,30,,,).GebruikEvaluator(ProboxEvaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Glijder()))	
-		
-	Do ..VoegToeVariabele("Picking en in huls : diepteverstelling",..Kostenplaatsen.PickingOnderdelen002,50,0.25,12,,,).GebruikEvaluator(ProboxEvaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).DiepteVerstelling()))	
+	Do FrontBevestiging.Factor.VoegToeMultiplier(##class(DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.Multiplier.FrontBevestigingAantal).%New())
+	Do FrontBevestiging.Factor.VoegToeMultiplier(##class(DOM.PM.Maatwerk.Calc.Kost.FixedMultiplier).%New(0.25))
+			
+	#dim BodemOndersteuning As DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.common.VariabeleAfmetingActiviteitKostItemBuilderData = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.common.VariabeleAfmetingActiviteitKostItemBuilderData).%New(53, ..Kostenplaatsen.PickingOnderdelen002, "Picking en in huls : bodemondersteuning")
 	
-	Do ..VoegToeVariabele("Picking en in huls : T51 koppeling",..Kostenplaatsen.PickingOnderdelen002,51,0.25,12,,,).GebruikEvaluator(ProboxEvaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Koppeling()), ..BevatDrevelKoppelingEvaluator, ..IsGeenBinnenladeEvaluator)	
-
-	Set FrontBevestiging = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.common.VariabeleAfmetingActiviteitKostItemBuilderData).%New(52, ..Kostenplaatsen.PickingOnderdelen002, "Picking en in huls : frontblok")
-	set FrontBevestiging.VasteKost = 9
-	Set FrontBevestiging.Factor = ##class(DOM.PM.Maatwerk.Calc.Kost.MultiplyMultiplier).%New(
-									).VoegToeMultiplier(##class(DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.Multiplier.FrontBevestigingAantal).%New()
-									).VoegToeMultiplier(##class(DOM.PM.Maatwerk.Calc.Kost.FixedMultiplier).%New(0.25))
-									
-	Do ..VoegToeData(FrontBevestiging).GebruikEvaluator(ProboxEvaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).FrontBevestiging()), ..IsGeenBinnenladeEvaluator)
-		
-	Set BodemOndersteuning = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.common.VariabeleAfmetingActiviteitKostItemBuilderData).%New(53, ..Kostenplaatsen.PickingOnderdelen002, "Picking en in huls : bodemondersteuning")	
-	set BodemOndersteuning.VasteKost = 12
-	Set BodemOndersteuning.Factor = ##class(DOM.PM.Maatwerk.Calc.Kost.MultiplyMultiplier).%New(
-									).VoegToeMultiplier(##class(DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.Multiplier.BodemOndersteuningAantal).%New()
-									).VoegToeMultiplier(##class(DOM.PM.Maatwerk.Calc.Kost.FixedMultiplier).%New(0.25))
-									
-	Do ..VoegToeData(BodemOndersteuning).GebruikEvaluator(ProboxEvaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).BodemOndersteuning()), ..IsGeenBinnenladeEvaluator)	
+	Set BodemOndersteuning.VasteKost = 12
+	Set BodemOndersteuning.Factor = ##class(DOM.PM.Maatwerk.Calc.Kost.MultiplyMultiplier).%New()
 	
-	Do ..VoegToeVariabele("Picking en in huls : TIP-ON-element",..Kostenplaatsen.PickingOnderdelen002,54,0.25,15,,,).GebruikEvaluator(ProboxEvaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Tipon()))	
-
-	Do ..VoegToeVariabele("Picking en in huls : TIP-ON synchronisatietandwiel",..Kostenplaatsen.PickingOnderdelen002,55,0.25,9,,,).GebruikEvaluator(ProboxEvaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).TiponSynchronisatieTandwiel()))	
-
-	Do ..VoegToeVariabele("Picking en in huls : TIP-ON BLUMOTION koppelstuk", ..Kostenplaatsen.PickingOnderdelen002, 62, 0.25, 9,,,).GebruikEvaluator(ProboxEvaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.TiponBlumotionSynchronisatieAdapter))
+	Do BodemOndersteuning.Factor.VoegToeMultiplier(##class(DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.Multiplier.BodemOndersteuningAantal).%New())
+	Do BodemOndersteuning.Factor.VoegToeMultiplier(##class(DOM.PM.Maatwerk.Calc.Kost.FixedMultiplier).%New(0.25))
 	
+	Do ..VoegToeData(FrontBevestiging).GebruikEvaluator(ProboxEvaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.FrontBevestiging), ..IsGeenBinnenladeEvaluator)									
+	Do ..VoegToeData(BodemOndersteuning).GebruikEvaluator(ProboxEvaluator,..GeefRolAanwezigEvaluator(..Enum.Rol.BodemOndersteuning), ..IsGeenBinnenladeEvaluator)	
+	
+	Do ..VoegToeVariabele("Picking en in huls : TIP-ON-element", ..Kostenplaatsen.PickingOnderdelen002, 54, 0.25, 15,,,).GebruikEvaluator(ProboxEvaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.Tipon))	
+	Do ..VoegToeVariabele("Picking en in huls : TIP-ON synchronisatietandwiel", ..Kostenplaatsen.PickingOnderdelen002, 55 ,0.25, 9,,,).GebruikEvaluator(ProboxEvaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.TiponSynchronisatieTandwiel))	
+	Do ..VoegToeVariabele("Picking en in huls : TIP-ON BLUMOTION koppelstuk", ..Kostenplaatsen.PickingOnderdelen002, 62, 0.25, 9,,,).GebruikEvaluator(ProboxEvaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.TiponBlumotionSynchronisatieAdapter))
 	Do ..VoegToeVariabele("Picking en in huls : TIP-ON BLUMOTION meenemer en eenheid", ..Kostenplaatsen.PickingOnderdelen002, 63, 0.25, 9,,,).GebruikEvaluator(ProboxEvaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.TiponBlumotionSetEenhedenEnMeenemers))
-
-	Do ..VoegToeVariabele("Picking opvullijst",..Kostenplaatsen.PickingOnderdelen002,56,0.25,18,,,).GebruikEvaluator(ProboxEvaluator,..GeefRolAanwezigEvaluator(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Opvullijst()))	
-
-	Do ..VoegToeVariabele("Sluiten onderdelen doos",..Kostenplaatsen.PickingOnderdelen002,57,0.25,30,,,).GebruikEvaluator(ProboxEvaluator, HeefOnderdelenDoosEvaluator)
-			
-	Do ..VoegToeVariabele("Wegzetten verpakking allerlei",..Kostenplaatsen.PickingOnderdelen002,58,0.25,15,,,).GebruikEvaluator(ProboxEvaluator, HeefOnderdelenDoosEvaluator)
+	Do ..VoegToeVariabele("Picking opvullijst", ..Kostenplaatsen.PickingOnderdelen002, 56, 0.25, 18,,,).GebruikEvaluator(ProboxEvaluator, ..GeefRolAanwezigEvaluator(..Enum.Rol.Opvullijst))	
+	Do ..VoegToeVariabele("Sluiten onderdelen doos", ..Kostenplaatsen.PickingOnderdelen002, 57, 0.25, 30,,,).GebruikEvaluator(ProboxEvaluator, HeefOnderdelenDoosEvaluator)
+	Do ..VoegToeVariabele("Wegzetten verpakking allerlei", ..Kostenplaatsen.PickingOnderdelen002, 58, 0.25, 15,,,).GebruikEvaluator(ProboxEvaluator, HeefOnderdelenDoosEvaluator)
 ]]></Implementation>
 </Method>
 
 <Method name="InitBulkPerOnderdeelGegroepeerd">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set HeeftVerpakkingTypeBOG = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator.HeeftVerpakkingTypeEvaluator).%New(##class(DOM.PM.enu.TAORVerpakkingType).BulkPerOnderdeelGegroepeerd())
-	Set HeefOnderdelenDoosEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator.HeeftOnderdelenDoosEvaluator).%New()
-	Do ..VoegToeVariabele("Onderdelen Flatpack Bulk",..Kostenplaatsen.PickingOnderdelen002,59,1,6.5,,,).GebruikEvaluator(HeeftVerpakkingTypeBOG, HeefOnderdelenDoosEvaluator)
+	#dim HeeftVerpakkingTypeBOG As DOM.PM.Maatwerk.Calc.Kost.IEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator.HeeftVerpakkingTypeEvaluator).%New(..Enum.VerpakkingType.BulkPerOnderdeelGegroepeerd)
+	#dim HeefOnderdelenDoosEvaluator As DOM.PM.Maatwerk.Calc.Kost.IEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.Evaluator.HeeftOnderdelenDoosEvaluator).%New()
+	
+	Do ..VoegToeVariabele("Onderdelen Flatpack Bulk", ..Kostenplaatsen.PickingOnderdelen002, 59, 1, 6.5,,,).GebruikEvaluator(HeeftVerpakkingTypeBOG, HeefOnderdelenDoosEvaluator)
 ]]></Implementation>
 </Method>
 </Class>