Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001/LosseComponentenBuilderPAS.cls.xml
===================================================================
diff -u -r31687 -r32531
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001/LosseComponentenBuilderPAS.cls.xml	(.../LosseComponentenBuilderPAS.cls.xml)	(revision 31687)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001/LosseComponentenBuilderPAS.cls.xml	(.../LosseComponentenBuilderPAS.cls.xml)	(revision 32531)
@@ -3,7 +3,7 @@
 <Class name="DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponentenBuilderPAS">
 <Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001.LosseComponentenBuilder</Super>
 
-<Method name="VoegToeDoosVoorBodem">
+<Method name="VoegToeDoosEnTussenschotVoorBodem">
 <FormalSpec>Bodem:DOM.PM.Maatwerk.LadeInfo.Bodem</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[	Do ..VoegToeDoos(Bodem, ..BenamingVerpakkingen.ErrondDoos)
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001/LosseComponentenBuilder.cls.xml
===================================================================
diff -u -r32516 -r32531
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001/LosseComponentenBuilder.cls.xml	(.../LosseComponentenBuilder.cls.xml)	(revision 32516)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001/LosseComponentenBuilder.cls.xml	(.../LosseComponentenBuilder.cls.xml)	(revision 32531)
@@ -68,34 +68,53 @@
 	Set ..HalffabItemsBoom = HalffabItemsBoom
 	
 	#dim Lade As DOM.PM.Maatwerk.LadeInfo.Lade = ..MaatwerkCalcAPI.GeefLadeInfo(..HalffabItemsBoom, ..IngegevenKenmerken)
+
+	Do ..VoegToeDoosEnTussenschot(Lade.GeefBodemIterator())
+	Do ..VoegToeDoosEnTussenschot(Lade.GeefRugIterator())
+	Do ..VoegToeDoosEnTussenschot(Lade.GeefZijkantIterator())
+	Do ..VoegToeDoosEnTussenschot(Lade.GeefFrontIterator())
 	
-	Do ..VoegToeDoosEnTussenschotVoorLadeOnderdeel(Lade.GeefBodemIterator())
-	Do ..VoegToeDoosEnTussenschotVoorLadeOnderdeel(Lade.GeefRugIterator())
-	Do ..VoegToeDoosEnTussenschotVoorLadeOnderdeel(Lade.GeefZijkantIterator())
-	Do ..VoegToeDoosEnTussenschotVoorLadeOnderdeel(Lade.GeefFrontIterator())
-	
 	Do ..VoegToeOnderdelenDoos(Lade)
 	
 	Quit ..Builders
 ]]></Implementation>
 </Method>
 
-<Method name="VoegToeDoosEnTussenschotVoorLadeOnderdeel">
+<Method name="VoegToeDoosEnTussenschot">
 <FormalSpec>Iterator:TECH.Iterator</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	While (Iterator.HasNext()) {
 		#dim LadeOnderdeel As DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel = Iterator.Next()
 		
-		Do ..VoegToeDoos(LadeOnderdeel, ..BenamingVerpakkingen.Bodem)
-		Do ..VoegToeDoos(LadeOnderdeel, ..BenamingVerpakkingen.Deksel)
-		
-		Do ..VoegToeTussenschot(LadeOnderdeel, ##class(TECH.enu.Orientation).Horizontal())
-		Do ..VoegToeTussenschot(LadeOnderdeel, ##class(TECH.enu.Orientation).Vertical())
+		If (LadeOnderdeel.GeefRol() = ##class(DOM.PM.Maatwerk.LadeInfo.enu.LadeOnderdeel).Bodem()) {
+			Do ..VoegToeDoosEnTussenschotVoorBodem(LadeOnderdeel)
+		} Else {
+			Do ..VoegToeDoosEnTussenschotVoorLadeOnderdeel(LadeOnderdeel)
+		}
 	}
 ]]></Implementation>
 </Method>
 
+<Method name="VoegToeDoosEnTussenschotVoorLadeOnderdeel">
+<FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegToeDoos(LadeOnderdeel, ..BenamingVerpakkingen.Bodem)
+	Do ..VoegToeDoos(LadeOnderdeel, ..BenamingVerpakkingen.Deksel)
+	
+	Do ..VoegToeTussenschot(LadeOnderdeel, ##class(TECH.enu.Orientation).Horizontal())
+	Do ..VoegToeTussenschot(LadeOnderdeel, ##class(TECH.enu.Orientation).Vertical())
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeDoosEnTussenschotVoorBodem">
+<FormalSpec>Bodem:DOM.PM.Maatwerk.LadeInfo.Bodem</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[	Do ..VoegToeDoosEnTussenschotVoorLadeOnderdeel(Bodem)
+]]></Implementation>
+</Method>
+
 <Method name="VoegToeOnderdelenDoos">
 <FormalSpec>Lade:DOM.PM.Maatwerk.LadeInfo.Lade</FormalSpec>
 <Private>1</Private>