Index: DOM/PM/Maatwerk/Calc/HF/impl/Probox/Builder/HFProboxBodemdoosv001.cls.xml
===================================================================
diff -u -r56593 -r57068
--- DOM/PM/Maatwerk/Calc/HF/impl/Probox/Builder/HFProboxBodemdoosv001.cls.xml	(.../HFProboxBodemdoosv001.cls.xml)	(revision 56593)
+++ DOM/PM/Maatwerk/Calc/HF/impl/Probox/Builder/HFProboxBodemdoosv001.cls.xml	(.../HFProboxBodemdoosv001.cls.xml)	(revision 57068)
@@ -43,12 +43,15 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	#define VoorraadCorrectieFactorBodemdoos		(1 + 0.30)
-	#define AandeelPerLadeFlatpackProbox			(1/4)
+	#define AandeelPerLadeTaorFlatpackProbox			(1/4)
 	
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, .HalffabList)
 	
-	If (IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).FlatpackProbox()) {
-		Set HalffabItem.Aantal = $$$AandeelPerLadeFlatpackProbox
+	#dim IsTaorbox As %Boolean = (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).Taorbox())
+	#dim IsTaorFlatpackProboxVerpakking As %Boolean = (IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).FlatpackProbox())
+	
+	If (IsTaorbox && IsTaorFlatpackProboxVerpakking) {
+		Set HalffabItem.Aantal = $$$AandeelPerLadeTaorFlatpackProbox
 	} Else {
 		#dim Breedte As %Double = ..BreedteBepaler.GeefVerpakkingBreedte(IngegevenKenmerken)
 		#dim VolumeAandeel As %Decimal = ##class(APPS.PM.Maatwerk.impl.Verpakking.Probox.Calculator).GeefVolumeAandeel(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.IsBinnenlade, IngegevenKenmerken.LadeDiepte, IngegevenKenmerken.LadeHoogte, IngegevenKenmerken.LadeHoogte, Breedte)