Index: DOM/VKP/Maatwerk/impl/BestelService.cls.xml
===================================================================
diff -u -r55885 -r55971
--- DOM/VKP/Maatwerk/impl/BestelService.cls.xml	(.../BestelService.cls.xml)	(revision 55885)
+++ DOM/VKP/Maatwerk/impl/BestelService.cls.xml	(.../BestelService.cls.xml)	(revision 55971)
@@ -8,6 +8,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="LadeInfoApi">
+<Type>DOM.PM.Maatwerk.LadeInfoAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="LosseComponentFactory">
 <Type>DOM.PM.Maatwerk.LadeInfo.impl.LosseComponentFactory</Type>
 <Private>1</Private>
@@ -19,7 +24,7 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>MaatwerkCalcAPI:DOM.PM.MaatwerkCalcAPI="",LosseComponentFactory:DOM.PM.Maatwerk.LadeInfo.impl.LosseComponentFactory="",BestelEenheidBepaler:DOM.VKP.Maatwerk.impl.BestelService.BestelEenheidBepaler=""</FormalSpec>
+<FormalSpec>MaatwerkCalcAPI:DOM.PM.MaatwerkCalcAPI="",LosseComponentFactory:DOM.PM.Maatwerk.LadeInfo.impl.LosseComponentFactory="",BestelEenheidBepaler:DOM.VKP.Maatwerk.impl.BestelService.BestelEenheidBepaler="",LadeInfoApi:DOM.PM.Maatwerk.LadeInfoAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -28,6 +33,7 @@
 	Set ..MaatwerkCalcAPI = $$$Inject(MaatwerkCalcAPI, ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI())
 	Set ..LosseComponentFactory = $$$Inject(LosseComponentFactory, ##class(DOM.PM.Maatwerk.LadeInfo.impl.LosseComponentFactory).%New())
 	Set ..BestelEenheidBepaler = $$$Inject(BestelEenheidBepaler, ##class(DOM.VKP.Maatwerk.impl.BestelService.BestelEenheidBepaler).%New())
+	Set ..LadeInfoApi = $$$Inject(LadeInfoApi, ##class(DOM.PM.Maatwerk.impl.LadeInfoAPI).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -47,7 +53,8 @@
 			Set LadeOnderdeel = ..MaakLosseComponent(Kenmerken)
 			Set BestelEenheid = ..BestelEenheidBepaler.GeefBestelEenheidLosseComponentenInBulk(LadeOnderdeel)
 		} ElseIf (Kenmerken.VerpakkingType = VerpakkingType.BulkPerOnderdeelGegroepeerd) {
-			Set LadeOnderdeel = ..MaakLosseComponent(Kenmerken)
+			#dim Lade As DOM.PM.Maatwerk.LadeInfo.impl.Lade = ..GeefLade(Kenmerken)
+			Set LadeOnderdeel = Lade.GeefZijkant(##class(DOM.PM.Maatwerk.Lade.enu.ZijkantRol).Links())
 			Set BestelEenheid = ..BestelEenheidBepaler.GeefBestelEenheidBulkPerOnderdeelGegroepeerd(LadeOnderdeel)
 		}
 	}
@@ -71,10 +78,19 @@
 <Implementation><![CDATA[
 	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(Kenmerken)
 	#dim LosseComponent As DOM.PM.Maatwerk.Lade.enu.LosseComponent = ##class(DOM.PM.Maatwerk.TAX.impl.ProductieWijzeNaarLosseComponentConverter).%New().Convert(Kenmerken.ProductieWijze)
-	
 	Quit ..LosseComponentFactory.MaakLosseComponent(HalffabItemsBoom, Kenmerken, LosseComponent)
 ]]></Implementation>
 </Method>
+
+<Method name="GeefLade">
+<FormalSpec>Kenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel</ReturnType>
+<Implementation><![CDATA[
+	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(Kenmerken)
+	Quit ..LadeInfoApi.GeefLade(HalffabItemsBoom, Kenmerken)
+]]></Implementation>
+</Method>
 </Class>