Index: DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidBepaler/BestelEenheidLosseComponentenInBulkBepaler.cls.xml
===================================================================
diff -u -r55877 -r55894
--- DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidBepaler/BestelEenheidLosseComponentenInBulkBepaler.cls.xml	(.../BestelEenheidLosseComponentenInBulkBepaler.cls.xml)	(revision 55877)
+++ DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidBepaler/BestelEenheidLosseComponentenInBulkBepaler.cls.xml	(.../BestelEenheidLosseComponentenInBulkBepaler.cls.xml)	(revision 55894)
@@ -3,31 +3,37 @@
 <Class name="DOM.VKP.Maatwerk.impl.BestelService.BestelEenheidBepaler.BestelEenheidLosseComponentenInBulkBepaler">
 <Super>TECH.Mockable</Super>
 
-<Property name="DoosAfmetingenBodemBepaler">
-<Type>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponenten.DoosAfmetingenBodemBepaler</Type>
+<Property name="DoosAfmetingenBepalerFactory">
+<Type>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponenten.DoosAfmetingenBepalerFactory</Type>
 <Private>1</Private>
 </Property>
 
+<Property name="DoosAfmetingenBepaler">
+<Type>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponenten.DoosAfmetingenBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>DoosAfmetingenBodemBepaler:DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponenten.DoosAfmetingenBodemBepaler=""</FormalSpec>
+<FormalSpec>DoosAfmetingenBepalerFactory:DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponenten.DoosAfmetingenBepalerFactory=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..DoosAfmetingenBodemBepaler = $$$Inject(DoosAfmetingenBodemBepaler, ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponenten.DoosAfmetingenBodemBepaler).%New())
+	Set ..DoosAfmetingenBepalerFactory = $$$Inject(DoosAfmetingenBepalerFactory, ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponenten.DoosAfmetingenBepalerFactory).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="GeefBestelEenheidBodemLosseComponentenInBulk">
-<FormalSpec>LosseComponent:DOM.PM.Maatwerk.LadeInfo.impl.TAX.Bodem</FormalSpec>
+<FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.impl.TAX.Bodem</FormalSpec>
 <ReturnType>TECH.Integer</ReturnType>
 <Implementation><![CDATA[
 	#dim BestelEenheid As TECH.Integer
 	
-	Set BestelEenheid = ..DoosAfmetingenBodemBepaler.GeefMaximaalAantalOnderdelen(LosseComponent)
+	Set ..DoosAfmetingenBepaler = ..DoosAfmetingenBepalerFactory.MaakDoosAfmetingenBepaler(LadeOnderdeel)
+	Set BestelEenheid = ..DoosAfmetingenBepaler.GeefMaximaalAantalOnderdelen(LadeOnderdeel)
 	
 	Quit BestelEenheid
 ]]></Implementation>
Index: vhTest/Mock/DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidBepaler/BestelEenheidLosseComponentenInBulkBepaler.cls.xml
===================================================================
diff -u -r55877 -r55894
--- vhTest/Mock/DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidBepaler/BestelEenheidLosseComponentenInBulkBepaler.cls.xml	(.../BestelEenheidLosseComponentenInBulkBepaler.cls.xml)	(revision 55877)
+++ vhTest/Mock/DOM/VKP/Maatwerk/impl/BestelService/BestelEenheidBepaler/BestelEenheidLosseComponentenInBulkBepaler.cls.xml	(.../BestelEenheidLosseComponentenInBulkBepaler.cls.xml)	(revision 55894)
@@ -9,16 +9,16 @@
 <Inheritance>right</Inheritance>
 
 <Method name="%OnNew">
-<FormalSpec>DoosAfmetingenBodemBepaler:DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponenten.DoosAfmetingenBodemBepaler=""</FormalSpec>
+<FormalSpec>DoosAfmetingenBepalerFactory:DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponenten.DoosAfmetingenBepalerFactory=""</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="GeefBestelEenheidBodemLosseComponentenInBulk">
-<FormalSpec>LosseComponent:DOM.PM.Maatwerk.LadeInfo.impl.TAX.Bodem</FormalSpec>
+<FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.impl.TAX.Bodem</FormalSpec>
 <ReturnType>TECH.Integer</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefBestelEenheidBodemLosseComponentenInBulk",LosseComponent)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefBestelEenheidBodemLosseComponentenInBulk",LadeOnderdeel)
 ]]></Implementation>
 </Method>