Index: vhUnitTest/APPS/PM/Maatwerk/impl/VerpakkingService/ProboxVolumeAandeel/Test.cls.xml
===================================================================
diff -u -r37471 -r37472
--- vhUnitTest/APPS/PM/Maatwerk/impl/VerpakkingService/ProboxVolumeAandeel/Test.cls.xml	(.../Test.cls.xml)	(revision 37471)
+++ vhUnitTest/APPS/PM/Maatwerk/impl/VerpakkingService/ProboxVolumeAandeel/Test.cls.xml	(.../Test.cls.xml)	(revision 37472)
@@ -3,6 +3,32 @@
 <Class name="vhUnitTest.APPS.PM.Maatwerk.impl.VerpakkingService.ProboxVolumeAandeel.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Method name="Test: VolumeAandeel wordt bepaald voor LBX lade">
+<Implementation><![CDATA[
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerkenBasisv000 = ##class(DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerkenBasisv000).%New()
+	Set IngegevenKenmerken.LadeDiepte = 550
+	Set IngegevenKenmerken.LadeHoogte = "M"
+	Set IngegevenKenmerken.IsBinnenlade = $$$False
+	Set IngegevenKenmerken.InterneBreedte = 600
+	
+	#dim VerpakkingService As APPS.PM.Maatwerk.impl.VerpakkingService = ##class(APPS.PM.Maatwerk.impl.VerpakkingService).%New()
+	Do $$$AssertEquals(VerpakkingService.ProboxVolumeAandeel(IngegevenKenmerken),0.112)
+]]></Implementation>
+</Method>
+
+<Method name="Test: VolumeAandeel wordt bepaald voor Taor lade">
+<Implementation><![CDATA[
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).%New()
+	Set IngegevenKenmerken.LadeDiepte = 650
+	Set IngegevenKenmerken.LadeHoogte = "M"
+	Set IngegevenKenmerken.IsBinnenlade = $$$False
+	Set IngegevenKenmerken.InterneBreedte = 700
+	
+	#dim VerpakkingService As APPS.PM.Maatwerk.impl.VerpakkingService = ##class(APPS.PM.Maatwerk.impl.VerpakkingService).%New()
+	Do $$$AssertEquals(VerpakkingService.ProboxVolumeAandeel(IngegevenKenmerken),0.16)
+]]></Implementation>
+</Method>
+
 <Method name="Test: geeft foutmelding indien geen Taor of Legrabox lade ingegeven is">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
Index: APPS/PM/Maatwerk/impl/VerpakkingService.cls.xml
===================================================================
diff -u -r37471 -r37472
--- APPS/PM/Maatwerk/impl/VerpakkingService.cls.xml	(.../VerpakkingService.cls.xml)	(revision 37471)
+++ APPS/PM/Maatwerk/impl/VerpakkingService.cls.xml	(.../VerpakkingService.cls.xml)	(revision 37472)
@@ -25,7 +25,7 @@
 <ReturnType>%Decimal</ReturnType>
 <Implementation><![CDATA[
 	if (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).Taorbox()) || (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure()) {
-		Quit ..Calculator.GeefVolumeAandeel(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.IsBinnenLade, IngegevenKenmerken.LadeDiepte, IngegevenKenmerken.LadeHoogte, "", IngegevenKenmerken.InterneBreedte)
+		Quit ..Calculator.GeefVolumeAandeel(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.IsBinnenlade, IngegevenKenmerken.LadeDiepte, IngegevenKenmerken.LadeHoogte, "", IngegevenKenmerken.InterneBreedte)
 	} else {
 		Set Exception = ##class(TECH.Exceptions.InvalidInputException).%New("Probox VolumeAandeel wordt momenteel enkel berekend voor Taor en Legrabox!")
 		Do ##class(TECH.ExceptionHandler).Throw(Exception)