Index: vhTest/Mock/APPS/Halux/PPS/TAORVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u
--- vhTest/Mock/APPS/Halux/PPS/TAORVerpakking/impl/DoosBerekenaar.cls.xml	(revision 0)
+++ vhTest/Mock/APPS/Halux/PPS/TAORVerpakking/impl/DoosBerekenaar.cls.xml	(revision 37219)
@@ -0,0 +1,22 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar">
+<Super>%RegisteredObject,APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar,Tools.Mock.MockClassBase</Super>
+
+<Method name="GeefDoosLade">
+<ReturnType>DOM.PM.Verpakking.impl.Doos</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefDoosLade")
+]]></Implementation>
+</Method>
+
+<Method name="BerekenDozen">
+<Private>1</Private>
+</Method>
+
+<Method name="MaakKartonSpecificaties">
+<Private>1</Private>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/EC/Winkelkar/impl/VerpakteAfmetingBerekenaarFactory/GeefVerpakteAfmetingBerekenaar/Test.cls.xml
===================================================================
diff -u -r37145 -r37219
--- vhUnitTest/APPS/EC/Winkelkar/impl/VerpakteAfmetingBerekenaarFactory/GeefVerpakteAfmetingBerekenaar/Test.cls.xml	(.../Test.cls.xml)	(revision 37145)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/VerpakteAfmetingBerekenaarFactory/GeefVerpakteAfmetingBerekenaar/Test.cls.xml	(.../Test.cls.xml)	(revision 37219)
@@ -7,7 +7,8 @@
 <Implementation><![CDATA[
 	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakTAXMaatwerkLijn(##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1())
 	Set VerpakteAfmetingBerekenaarFactory = ##class(APPS.EC.Winkelkar.impl.VerpakteAfmetingBerekenaarFactory).%New()
-	#dim ClassName As %String = VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(MaatwerkLijn.GeefIngegevenKenmerken()).%ClassName(1)
+	Set HalffabItemsBoom = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
+	#dim ClassName As %String = VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(HalffabItemsBoom, MaatwerkLijn.GeefIngegevenKenmerken()).%ClassName(1)
 	Do $$$AssertEquals(ClassName,"APPS.EC.Winkelkar.impl.TAX.FlatPackV1.VerpakteAfmetingBerekenaar")
 ]]></Implementation>
 </Method>
@@ -16,33 +17,39 @@
 <Implementation><![CDATA[
 	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakTAXMaatwerkLijn(##class(DOM.PM.enu.TAORVerpakkingType).V1())
 	Set VerpakteAfmetingBerekenaarFactory = ##class(APPS.EC.Winkelkar.impl.VerpakteAfmetingBerekenaarFactory).%New()
-	#dim ClassName As %String = VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(MaatwerkLijn.GeefIngegevenKenmerken()).%ClassName(1)
+	Set HalffabItemsBoom = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
+	Do HalffabItemsBoom.IndienMethodCall("BevatRol",$$$ElkeWaarde).DanDoeNiks()
+	#dim ClassName As %String = VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(HalffabItemsBoom, MaatwerkLijn.GeefIngegevenKenmerken()).%ClassName(1)
 	Do $$$AssertEquals(ClassName,"APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar")
 ]]></Implementation>
 </Method>
 
 <Method name="Test: geeft geen VerpakteAfmetingBerekenaar als de ingegevenkenmerken een TAOR lade is in Probox verpakking">
 <Implementation><![CDATA[
 	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakTAXMaatwerkLijn(##class(DOM.PM.enu.TAORVerpakkingType).Probox())
+	Set HalffabItemsBoom = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
 	Set VerpakteAfmetingBerekenaarFactory = ##class(APPS.EC.Winkelkar.impl.VerpakteAfmetingBerekenaarFactory).%New()
-	Do $$$AssertNotIsObject(VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(MaatwerkLijn.GeefIngegevenKenmerken()))
+	Do $$$AssertNotIsObject(VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(HalffabItemsBoom, MaatwerkLijn.GeefIngegevenKenmerken()))
 ]]></Implementation>
 </Method>
 
 <Method name="Test: geeft VerpakteAfmetingBerekenaar LBX V1 als de ingegevenkenmerken een LBX lade is in V1 verpakking">
 <Implementation><![CDATA[
 	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakLBXMaatwerkLijn(##class(DOM.PM.enu.LBXVerpakkingType).V1())
+	Set HalffabItemsBoom = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
+	Do HalffabItemsBoom.IndienMethodCall("BevatRol",$$$ElkeWaarde).DanDoeNiks()
 	Set VerpakteAfmetingBerekenaarFactory = ##class(APPS.EC.Winkelkar.impl.VerpakteAfmetingBerekenaarFactory).%New()
-	#dim ClassName As %String = VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(MaatwerkLijn.GeefIngegevenKenmerken()).%ClassName(1)
+	#dim ClassName As %String = VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(HalffabItemsBoom, MaatwerkLijn.GeefIngegevenKenmerken()).%ClassName(1)
 	Do $$$AssertEquals(ClassName,"APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar")
 ]]></Implementation>
 </Method>
 
 <Method name="Test: geeft geen VerpakteAfmetingBerekenaar als de ingegevenkenmerken een LBX lade is in Probox verpakking">
 <Implementation><![CDATA[
 	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakLBXMaatwerkLijn(##class(DOM.PM.enu.LBXVerpakkingType).Probox())
+	Set HalffabItemsBoom = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
 	Set VerpakteAfmetingBerekenaarFactory = ##class(APPS.EC.Winkelkar.impl.VerpakteAfmetingBerekenaarFactory).%New()
-	Do $$$AssertNotIsObject(VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(MaatwerkLijn.GeefIngegevenKenmerken()))
+	Do $$$AssertNotIsObject(VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(HalffabItemsBoom, MaatwerkLijn.GeefIngegevenKenmerken()))
 ]]></Implementation>
 </Method>
 
@@ -52,6 +59,7 @@
 <ReturnType>vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
 <Implementation><![CDATA[
 	#dim LBXKenmerkenFake As vhTest.Fake.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Fake.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).%New()
+	Set LBXKenmerkenFake.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).M()
 	Set LBXKenmerkenFake.VerpakkingType = VerpakkingsType
 	
 	#dim MaatwerkLijn AS vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn).%New()
@@ -67,6 +75,7 @@
 <ReturnType>vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
 <Implementation><![CDATA[
 	#dim TAORKenmerkenFake As vhTest.Fake.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(vhTest.Fake.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).%New()
+	Set TAORKenmerkenFake.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).M()
 	Set TAORKenmerkenFake.VerpakkingType = VerpakkingsType
 	
 	#dim MaatwerkLijn AS vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn).%New()
Index: vhTest/Mock/APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u
--- vhTest/Mock/APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(revision 0)
+++ vhTest/Mock/APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(revision 37219)
@@ -0,0 +1,22 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar">
+<Super>%RegisteredObject,APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar,Tools.Mock.MockClassBase</Super>
+
+<Method name="GeefDoosLade">
+<ReturnType>DOM.PM.Verpakking.impl.Doos</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefDoosLade")
+]]></Implementation>
+</Method>
+
+<Method name="BerekenDozen">
+<Private>1</Private>
+</Method>
+
+<Method name="MaakKartonSpecificaties">
+<Private>1</Private>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/EC/Winkelkar/impl/TAX/FlatPackV1/VerpakteAfmetingBerekenaar/GeefVerpakteAfmeting/Test.cls.xml
===================================================================
diff -u -r37138 -r37219
--- vhUnitTest/APPS/EC/Winkelkar/impl/TAX/FlatPackV1/VerpakteAfmetingBerekenaar/GeefVerpakteAfmeting/Test.cls.xml	(.../Test.cls.xml)	(revision 37138)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/TAX/FlatPackV1/VerpakteAfmetingBerekenaar/GeefVerpakteAfmeting/Test.cls.xml	(.../Test.cls.xml)	(revision 37219)
@@ -5,30 +5,26 @@
 
 <Method name="Test: ZetVerpakteAfmeting zet de verpakkingsafmeting van een ongekende TAOR verpakking maatwerklijn">
 <Implementation><![CDATA[
-	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakTAXMaatwerkLijn(##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1())
 	#dim VerpakteAfmetingResultaat As APPS.Halux.common.impl.VerpakteAfmeting 
-	Set VerpakteAfmetingResultaat = ..MaakVerpakteAfmetingBerekenaar("0000000").GeefVerpakteAfmeting(MaatwerkLijn.GeefIngegevenKenmerken())
+	Set VerpakteAfmetingResultaat = ..MaakVerpakteAfmetingBerekenaar(##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1(),"0000000").GeefVerpakteAfmeting()
 	
 	Do ..AssertLegeVerpakkingAfmeting(VerpakteAfmetingResultaat)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: ZetVerpakteAfmeting zet de verpakkingsafmeting VPK.OD1260X240 van een maatwerklijn">
 <Implementation><![CDATA[
-	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakTAXMaatwerkLijn(##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1())
 	#dim VerpakteAfmetingResultaat As APPS.Halux.common.impl.VerpakteAfmeting 
-	Set VerpakteAfmetingResultaat = ..MaakVerpakteAfmetingBerekenaar("1235098").GeefVerpakteAfmeting(MaatwerkLijn.GeefIngegevenKenmerken())
+	Set VerpakteAfmetingResultaat = ..MaakVerpakteAfmetingBerekenaar(##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1(), "1235098").GeefVerpakteAfmeting()
 	
 	Do ..AssertVerpakkingAfmetingVPKOD1260X240(VerpakteAfmetingResultaat)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: ZetVerpakteAfmeting zet de verpakkingsafmeting VPK.OD1260X240 van een maatwerklijn met meerdere producten">
 <Implementation><![CDATA[
-	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakTAXMaatwerkLijn(##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1())
-
 	#dim VerpakteAfmetingResultaat As APPS.Halux.common.impl.VerpakteAfmeting 
-	Set VerpakteAfmetingResultaat = ..MaakVerpakteAfmetingBerekenaar("1235098","1525632","1854621").GeefVerpakteAfmeting(MaatwerkLijn.GeefIngegevenKenmerken())
+	Set VerpakteAfmetingResultaat = ..MaakVerpakteAfmetingBerekenaar(##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1(),"1235098","1525632","1854621").GeefVerpakteAfmeting()
 	
 	Do ..AssertVerpakkingAfmetingVPKOD1260X240(VerpakteAfmetingResultaat)
 ]]></Implementation>
@@ -73,14 +69,12 @@
 </Method>
 
 <Method name="MaakVerpakteAfmetingBerekenaar">
-<FormalSpec>ProductIDs...:%String</FormalSpec>
+<FormalSpec>VerpakkingsType:DOM.PM.enu.TAORVerpakkingType,ProductIDs...:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.EC.Winkelkar.impl.TAX.FlatPackV1.VerpakteAfmetingBerekenaar</ReturnType>
 <Implementation><![CDATA[
-	#dim MaatwerkCalcAPI As vhTest.Mock.DOM.PM.impl.MaatwerkCalcAPI = ##class(vhTest.Mock.DOM.PM.impl.MaatwerkCalcAPI).%New()
-	Do MaatwerkCalcAPI.IndienMethodCall("GeefHalffabItemsBoom", $$$ElkeWaarde ,1).DanReturn(..MaakHalffabItemsBoom(ProductIDs...))
-	
-	Set VerpakteAfmetingBerekenaar = ##class(APPS.EC.Winkelkar.impl.TAX.FlatPackV1.VerpakteAfmetingBerekenaar).%New(MaatwerkCalcAPI)
+	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakTAXMaatwerkLijn(VerpakkingsType)
+	Set VerpakteAfmetingBerekenaar = ##class(APPS.EC.Winkelkar.impl.TAX.FlatPackV1.VerpakteAfmetingBerekenaar).%New(..MaakHalffabItemsBoom(ProductIDs...),MaatwerkLijn.GeefIngegevenKenmerken())
 	Quit VerpakteAfmetingBerekenaar
 ]]></Implementation>
 </Method>
Index: vhTest/Fake/DOM/PM/Verpakking/Doos.cls.xml
===================================================================
diff -u
--- vhTest/Fake/DOM/PM/Verpakking/Doos.cls.xml	(revision 0)
+++ vhTest/Fake/DOM/PM/Verpakking/Doos.cls.xml	(revision 37219)
@@ -0,0 +1,22 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.DOM.PM.Verpakking.Doos">
+<Super>DOM.PM.Verpakking.impl.Doos</Super>
+
+<Method name="%OnNew">
+<FormalSpec>Breedte:%Numeric,Diepte:%Numeric,Hoogte:%Numeric</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..Breedte = Breedte
+	Set ..Diepte = Diepte
+	Set ..Hoogte = Hoogte
+	Quit $$$OK
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/EC/Winkelkar/impl/TAX/FlatPackV1/VerpakteAfmetingBerekenaar.cls.xml
===================================================================
diff -u -r37138 -r37219
--- APPS/EC/Winkelkar/impl/TAX/FlatPackV1/VerpakteAfmetingBerekenaar.cls.xml	(.../VerpakteAfmetingBerekenaar.cls.xml)	(revision 37138)
+++ APPS/EC/Winkelkar/impl/TAX/FlatPackV1/VerpakteAfmetingBerekenaar.cls.xml	(.../VerpakteAfmetingBerekenaar.cls.xml)	(revision 37219)
@@ -4,11 +4,9 @@
 <Super>APPS.EC.Winkelkar.VerpakteAfmetingBerekenaar</Super>
 
 <Method name="GeefVerpakteAfmeting">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <ReturnType>APPS.Halux.common.impl.VerpakteAfmeting</ReturnType>
 <Implementation><![CDATA[
-	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(IngegevenKenmerken) 
-	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Verpakking())
+	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem = ..HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Verpakking())
 	#dim ProductID As %String = HalffabItem.GeefHalffabItem("FPV1_omdoos").GeefHalffab().GeefProductID()
 	
 	Quit:(ProductID = "1235098") ##class(APPS.Halux.common.impl.VerpakteAfmeting).%New(244, 175, 1265)
Index: vhTest/Fake/DOM/PM/Maatwerk/Calc/Common/impl/LBXKenmerken.cls.xml
===================================================================
diff -u -r33802 -r37219
--- vhTest/Fake/DOM/PM/Maatwerk/Calc/Common/impl/LBXKenmerken.cls.xml	(.../LBXKenmerken.cls.xml)	(revision 33802)
+++ vhTest/Fake/DOM/PM/Maatwerk/Calc/Common/impl/LBXKenmerken.cls.xml	(.../LBXKenmerken.cls.xml)	(revision 37219)
@@ -3,6 +3,30 @@
 <Class name="vhTest.Fake.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken">
 <Super>TECH.RegisteredObject</Super>
 
+<Property name="LadeDiepte">
+<Type>DOM.PM.enu.LBXLadeDiepte</Type>
+</Property>
+
+<Property name="LadeHoogte">
+<Type>DOM.PM.enu.LBXLadeHoogte</Type>
+</Property>
+
+<Property name="RugHoogte">
+<Type>DOM.PM.enu.LBXRugHoogte</Type>
+</Property>
+
+<Property name="LadeKleur">
+<Type>DOM.PM.enu.LBXLadeKleur</Type>
+</Property>
+
+<Property name="InterneBreedte">
+<Type>TECH.Numeric</Type>
+</Property>
+
+<Property name="IsBinnenlade">
+<Type>%Boolean</Type>
+</Property>
+
 <Property name="VerpakkingType">
 <Type>DOM.PM.enu.LBXVerpakkingType</Type>
 </Property>
@@ -23,6 +47,10 @@
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
+
+<Method name="Accept">
+<FormalSpec>IngegevenKenmerkenVisitor:APPS.PM.Maatwerk.dto.IngegevenKenmerkenVisitor</FormalSpec>
+</Method>
 </Class>
 
 
Index: APPS/EC/Winkelkar/VerpakteAfmetingBerekenaar.cls.xml
===================================================================
diff -u -r37138 -r37219
--- APPS/EC/Winkelkar/VerpakteAfmetingBerekenaar.cls.xml	(.../VerpakteAfmetingBerekenaar.cls.xml)	(revision 37138)
+++ APPS/EC/Winkelkar/VerpakteAfmetingBerekenaar.cls.xml	(.../VerpakteAfmetingBerekenaar.cls.xml)	(revision 37219)
@@ -4,26 +4,31 @@
 <Abstract>1</Abstract>
 <Super>TECH.RegisteredObject</Super>
 
-<Property name="MaatwerkCalcAPI">
-<Type>DOM.PM.impl.MaatwerkCalcAPI</Type>
+<Property name="HalffabItemsBoom">
+<Type>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</Type>
 <Private>1</Private>
 </Property>
 
+<Property name="IngegevenKenmerken">
+<Type>DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>MaatwerkCalcAPI:DOM.PM.impl.MaatwerkCalcAPI</FormalSpec>
+<FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..MaatwerkCalcAPI = $$$Inject(MaatwerkCalcAPI,##class(DOM.PM.impl.MaatwerkCalcAPI).%New())
+	Set ..HalffabItemsBoom = HalffabItemsBoom
+	Set ..IngegevenKenmerken = IngegevenKenmerken
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="GeefVerpakteAfmeting">
 <Abstract>1</Abstract>
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <ReturnType>APPS.Halux.common.impl.VerpakteAfmeting</ReturnType>
 </Method>
 </Class>
Index: vhTest/Fake/DOM/PM/Maatwerk/Calc/Common/impl/TAORKenmerken.cls.xml
===================================================================
diff -u -r33802 -r37219
--- vhTest/Fake/DOM/PM/Maatwerk/Calc/Common/impl/TAORKenmerken.cls.xml	(.../TAORKenmerken.cls.xml)	(revision 33802)
+++ vhTest/Fake/DOM/PM/Maatwerk/Calc/Common/impl/TAORKenmerken.cls.xml	(.../TAORKenmerken.cls.xml)	(revision 37219)
@@ -3,6 +3,26 @@
 <Class name="vhTest.Fake.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken">
 <Super>TECH.RegisteredObject</Super>
 
+<Property name="LadeDiepte">
+<Type>DOM.PM.enu.TAORLadeDiepte</Type>
+</Property>
+
+<Property name="LadeHoogte">
+<Type>DOM.PM.enu.TAORLadeHoogte</Type>
+</Property>
+
+<Property name="LadeKleur">
+<Type>DOM.PM.enu.TAORLadeKleur</Type>
+</Property>
+
+<Property name="InterneBreedte">
+<Type>TECH.Numeric</Type>
+</Property>
+
+<Property name="IsBinnenlade">
+<Type>%Boolean</Type>
+</Property>
+
 <Property name="VerpakkingType">
 <Type>DOM.PM.enu.TAORVerpakkingType</Type>
 </Property>
Index: APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml
===================================================================
diff -u -r37218 -r37219
--- APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 37218)
+++ APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 37219)
@@ -486,9 +486,7 @@
 	#dim BerekenTotaalGewichtOpdracht As APPS.EC.Winkelkar.impl.MaatwerkLijnGewichtOpdracht = ##class(APPS.EC.Winkelkar.impl.MaatwerkLijnGewichtOpdracht).%New()
 	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(Lijn.GeefIngegevenKenmerken()) 
 	#dim CommandList As %ListOfObjects = ##class(TECH.ListUtils).CreateListOfObjects(BerekenTotaalGewichtOpdracht)
-	
 	Do ##class(TECH.IteratorUitvoerder).%New(HalffabItemsBoom.GeefHalffabItemsIterator(), CommandList).VoerUit()
-	
 	Do Lijn.ZetTotaalGewicht(BerekenTotaalGewichtOpdracht.GeefResultaat())
 ]]></Implementation>
 </Method>
@@ -497,11 +495,11 @@
 <FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
+	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(Lijn.GeefIngegevenKenmerken()) 
 	#dim VerpakteAfmetingBerekenaar	As APPS.EC.Winkelkar.VerpakteAfmetingBerekenaar
-	Set VerpakteAfmetingBerekenaar = ..VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(Lijn.GeefIngegevenKenmerken())
-	
+	Set VerpakteAfmetingBerekenaar = ..VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(HalffabItemsBoom,Lijn.GeefIngegevenKenmerken())
 	if $IsObject(VerpakteAfmetingBerekenaar) {
-		Do Lijn.ZetVerpakteAfmeting(VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting(Lijn.GeefIngegevenKenmerken()))
+		Do Lijn.ZetVerpakteAfmeting(VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting())
 	}
 ]]></Implementation>
 </Method>
Index: APPS/EC/Winkelkar/impl/VerpakteAfmetingBerekenaarFactory.cls.xml
===================================================================
diff -u -r37145 -r37219
--- APPS/EC/Winkelkar/impl/VerpakteAfmetingBerekenaarFactory.cls.xml	(.../VerpakteAfmetingBerekenaarFactory.cls.xml)	(revision 37145)
+++ APPS/EC/Winkelkar/impl/VerpakteAfmetingBerekenaarFactory.cls.xml	(.../VerpakteAfmetingBerekenaarFactory.cls.xml)	(revision 37219)
@@ -4,7 +4,7 @@
 <Super>TECH.RegisteredObject</Super>
 
 <Method name="GeefVerpakteAfmetingBerekenaar">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.VerpakteAfmetingBerekenaar</ReturnType>
 <Implementation><![CDATA[
 	#dim IsFamilieLade As %Boolean = (IngegevenKenmerken.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade())
@@ -15,14 +15,14 @@
 	 	If IsVariantTAX {
 			#dim TAXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = IngegevenKenmerken
 			if (TAXKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1()) {
-				Quit ##class(APPS.EC.Winkelkar.impl.TAX.FlatPackV1.VerpakteAfmetingBerekenaar).%New()
+				Quit ##class(APPS.EC.Winkelkar.impl.TAX.FlatPackV1.VerpakteAfmetingBerekenaar).%New(HalffabItemsBoom, IngegevenKenmerken)
 			} elseif (TAXKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).V1()) {
-				Quit ##class(APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar).%New()
+				Quit ##class(APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar).%New(HalffabItemsBoom, IngegevenKenmerken)
 			} 
 		} elseif IsVariantLBX {
 			#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = IngegevenKenmerken
 			if (LBXKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).V1()) {
-				Quit ##class(APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar).%New()
+				Quit ##class(APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar).%New(HalffabItemsBoom, IngegevenKenmerken)
 			}
 		}
 	}
Index: APPS/EC/Winkelkar/impl/LBX/V1/VerpakteAfmetingBerekenaar.cls.xml
===================================================================
diff -u -r37145 -r37219
--- APPS/EC/Winkelkar/impl/LBX/V1/VerpakteAfmetingBerekenaar.cls.xml	(.../VerpakteAfmetingBerekenaar.cls.xml)	(revision 37145)
+++ APPS/EC/Winkelkar/impl/LBX/V1/VerpakteAfmetingBerekenaar.cls.xml	(.../VerpakteAfmetingBerekenaar.cls.xml)	(revision 37219)
@@ -3,23 +3,42 @@
 <Class name="APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar">
 <Super>APPS.EC.Winkelkar.VerpakteAfmetingBerekenaar</Super>
 
+<Property name="DoosBerekenaar">
+<Type>APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,DoosBerekenaar:APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Do ..HackKenmerkenZonderRugHoogte(IngegevenKenmerken)
+	Do ##super(HalffabItemsBoom,IngegevenKenmerken)
+	Set ..DoosBerekenaar = $$$Inject(DoosBerekenaar,##class(APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar).%New(..HalffabItemsBoom, ..IngegevenKenmerken))
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="GeefVerpakteAfmeting">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <ReturnType>APPS.Halux.common.impl.VerpakteAfmeting</ReturnType>
 <Implementation><![CDATA[
-	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(IngegevenKenmerken) 
-	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Verpakking())
-
-	#dim DoosBerekenaar As APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar
-	Set DoosBerekenaar = ##class(APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar).%New(HalffabItemsBoom, IngegevenKenmerken)
+	#dim DoosLade As DOM.PM.Verpakking.impl.Doos = ..DoosBerekenaar.GeefDoosLade()
 	
-	#dim DoosLade As DOM.PM.Verpakking.impl.Doos = DoosBerekenaar.GeefDoosLade()
-	
 	Quit:$IsObject(DoosLade) ##class(APPS.Halux.common.impl.VerpakteAfmeting).%New(DoosLade.Diepte ,DoosLade.Hoogte,DoosLade.Breedte)
 	
 	Quit ##class(APPS.Halux.common.impl.VerpakteAfmeting).%New(0,0,0)
 ]]></Implementation>
 </Method>
+
+<Method name="HackKenmerkenZonderRugHoogte">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[	If (IngegevenKenmerken.RugHoogte = "") { Set IngegevenKenmerken.RugHoogte = IngegevenKenmerken.LadeHoogte }
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/APPS/EC/Winkelkar/impl/TAX/V1/VerpakteAfmetingBerekenaar/GeefVerpakteAfmeting/Test.cls.xml
===================================================================
diff -u -r37138 -r37219
--- vhUnitTest/APPS/EC/Winkelkar/impl/TAX/V1/VerpakteAfmetingBerekenaar/GeefVerpakteAfmeting/Test.cls.xml	(.../Test.cls.xml)	(revision 37138)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/TAX/V1/VerpakteAfmetingBerekenaar/GeefVerpakteAfmeting/Test.cls.xml	(.../Test.cls.xml)	(revision 37219)
@@ -2,6 +2,92 @@
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting.Test">
 <Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: De verpakteafmeting van TAX V1 wordt bepaald aan de hand van de ingegeven kenmerken">
+<Implementation><![CDATA[
+	#dim HalffabItemBoomDummy As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaakHalffabItemsBoom()
+	#dim MaatwerkLijnDummy As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakTAXMaatwerkLijn(##class(DOM.PM.enu.TAORVerpakkingType).V1())
+	
+	#dim DoosBerekenaarMock As vhTest.Mock.APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar
+	Set DoosBerekenaarMock = ##class(vhTest.Mock.APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar).%New(HalffabItemBoomDummy, MaatwerkLijnDummy.GeefIngegevenKenmerken())
+	
+	Do DoosBerekenaarMock.VerwachtMethodCall("GeefDoosLade").DanReturn("")
+	
+	#dim VerpakteAfmetingBerekenaar As APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar
+	Set VerpakteAfmetingBerekenaar = ##class(APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar).%New(HalffabItemBoomDummy ,MaatwerkLijnDummy.GeefIngegevenKenmerken() ,DoosBerekenaarMock)
+	
+	Do VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting()
+	
+	Do DoosBerekenaarMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: De verpakteafmeting van TAX V1 geeft hoogte 0, breedte 0 en diepte 0 als er geen doos berekend wordt">
+<Implementation><![CDATA[
+	#dim HalffabItemBoomDummy As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaakHalffabItemsBoom()
+	#dim MaatwerkLijnDummy As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakTAXMaatwerkLijn(##class(DOM.PM.enu.TAORVerpakkingType).V1())
+	
+	#dim DoosBerekenaarStub As vhTest.Mock.APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar
+	Set DoosBerekenaarStub = ##class(vhTest.Mock.APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar).%New(HalffabItemBoomDummy, MaatwerkLijnDummy.GeefIngegevenKenmerken())
+	
+	Do DoosBerekenaarStub.IndienMethodCall("GeefDoosLade").DanReturn("")
+	
+	#dim VerpakteAfmetingBerekenaar As APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar
+	Set VerpakteAfmetingBerekenaar = ##class(APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar).%New(HalffabItemBoomDummy ,MaatwerkLijnDummy.GeefIngegevenKenmerken() ,DoosBerekenaarStub)
+	
+	#dim VerpakteAfmeting As APPS.Halux.common.impl.VerpakteAfmeting = VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting()
+	Do $$$AssertEquals(VerpakteAfmeting.Diepte,0)
+	Do $$$AssertEquals(VerpakteAfmeting.Hoogte,0)
+	Do $$$AssertEquals(VerpakteAfmeting.Breedte,0)
+]]></Implementation>
+</Method>
+
+<Method name="Test: De verpakteafmeting van TAX V1 geeft de afmeting van de dooslade">
+<Implementation><![CDATA[
+	#dim HalffabItemBoomDummy As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaakHalffabItemsBoom()
+	#dim MaatwerkLijnDummy As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakTAXMaatwerkLijn(##class(DOM.PM.enu.TAORVerpakkingType).V1())
+	
+	#dim DoosBerekenaarStub As vhTest.Mock.APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar
+	Set DoosBerekenaarStub = ##class(vhTest.Mock.APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar).%New(HalffabItemBoomDummy, MaatwerkLijnDummy.GeefIngegevenKenmerken())
+	
+	#dim DoosLadeDummy As vhTest.Fake.DOM.PM.Verpakking.Doos = ##class(vhTest.Fake.DOM.PM.Verpakking.Doos).%New(10,20,30)
+	Do DoosBerekenaarStub.IndienMethodCall("GeefDoosLade").DanReturn(DoosLadeDummy)
+	
+	#dim VerpakteAfmetingBerekenaar As APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar
+	Set VerpakteAfmetingBerekenaar = ##class(APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar).%New(HalffabItemBoomDummy ,MaatwerkLijnDummy.GeefIngegevenKenmerken() ,DoosBerekenaarStub)
+	
+	#dim VerpakteAfmeting As APPS.Halux.common.impl.VerpakteAfmeting = VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting()
+	Do $$$AssertEquals(VerpakteAfmeting.Diepte,20)
+	Do $$$AssertEquals(VerpakteAfmeting.Hoogte,30)
+	Do $$$AssertEquals(VerpakteAfmeting.Breedte,10)
+]]></Implementation>
+</Method>
+
+<Method name="MaakTAXMaatwerkLijn">
+<FormalSpec>VerpakkingsType:DOM.PM.enu.TAORVerpakkingType</FormalSpec>
+<Private>1</Private>
+<ReturnType>vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
+<Implementation><![CDATA[
+	#dim TAORKenmerkenFake As vhTest.Fake.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(vhTest.Fake.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).%New()
+	Set TAORKenmerkenFake.VerpakkingType = VerpakkingsType
+	
+	#dim MaatwerkLijn AS vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn).%New()
+	Do MaatwerkLijn.ZetIngegevenKenmerken(TAORKenmerkenFake)
+	Quit MaatwerkLijn
+]]></Implementation>
+</Method>
+
+<Method name="MaakHalffabItemsBoom">
+<Private>1</Private>
+<ReturnType>vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
+<Implementation><![CDATA[
+	Set SamenGesteldHalffabItemTAORRol = ##class(vhTest.Dummy.DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem).%New(, ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Verpakking())
+	Set HalffabItemsBoom = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
+	Do HalffabItemsBoom.IndienMethodCall("GeefHalffabItem", ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Verpakking()).DanReturn(SamenGesteldHalffabItemTAORRol)
+	
+	Quit HalffabItemsBoom
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/EC/Winkelkar/impl/TAX/V1/VerpakteAfmetingBerekenaar.cls.xml
===================================================================
diff -u -r37144 -r37219
--- APPS/EC/Winkelkar/impl/TAX/V1/VerpakteAfmetingBerekenaar.cls.xml	(.../VerpakteAfmetingBerekenaar.cls.xml)	(revision 37144)
+++ APPS/EC/Winkelkar/impl/TAX/V1/VerpakteAfmetingBerekenaar.cls.xml	(.../VerpakteAfmetingBerekenaar.cls.xml)	(revision 37219)
@@ -3,18 +3,29 @@
 <Class name="APPS.EC.Winkelkar.impl.TAX.V1.VerpakteAfmetingBerekenaar">
 <Super>APPS.EC.Winkelkar.VerpakteAfmetingBerekenaar</Super>
 
+<Property name="DoosBerekenaar">
+<Type>APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,DoosBerekenaar:APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Do ##super(HalffabItemsBoom,IngegevenKenmerken)
+	Set ..DoosBerekenaar = $$$Inject(DoosBerekenaar,##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar).%New(..HalffabItemsBoom, ..IngegevenKenmerken))
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="GeefVerpakteAfmeting">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <ReturnType>APPS.Halux.common.impl.VerpakteAfmeting</ReturnType>
 <Implementation><![CDATA[
-	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(IngegevenKenmerken) 
-	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Verpakking())
-
-	#dim DoosBerekenaar As APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar
-	Set DoosBerekenaar = ##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar).%New(HalffabItemsBoom, IngegevenKenmerken)
+	#dim DoosLade As DOM.PM.Verpakking.impl.Doos = ..DoosBerekenaar.GeefDoosLade()
 	
-	#dim DoosLade As DOM.PM.Verpakking.impl.Doos = DoosBerekenaar.GeefDoosLade()
-	
 	Quit:$IsObject(DoosLade) ##class(APPS.Halux.common.impl.VerpakteAfmeting).%New(DoosLade.Diepte ,DoosLade.Hoogte,DoosLade.Breedte)
 	
 	Quit ##class(APPS.Halux.common.impl.VerpakteAfmeting).%New(0,0,0)
Index: vhUnitTest/APPS/EC/Winkelkar/impl/LBX/V1/VerpakteAfmetingBerekenaar/GeefVerpakteAfmeting/Test.cls.xml
===================================================================
diff -u -r37145 -r37219
--- vhUnitTest/APPS/EC/Winkelkar/impl/LBX/V1/VerpakteAfmetingBerekenaar/GeefVerpakteAfmeting/Test.cls.xml	(.../Test.cls.xml)	(revision 37145)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/LBX/V1/VerpakteAfmetingBerekenaar/GeefVerpakteAfmeting/Test.cls.xml	(.../Test.cls.xml)	(revision 37219)
@@ -2,6 +2,91 @@
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting.Test">
 <Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: De verpakteafmeting van LBX V1 wordt bepaald aan de hand van de ingegeven kenmerken">
+<Implementation><![CDATA[
+	#dim HalffabItemBoomDummy As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaakHalffabItemsBoom()
+	#dim MaatwerkLijnDummy As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakLBXMaatwerkLijn(##class(DOM.PM.enu.LBXVerpakkingType).V1())
+	
+	#dim DoosBerekenaarMock As vhTest.Mock.APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar
+	Set DoosBerekenaarMock = ##class(vhTest.Mock.APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar).%New(HalffabItemBoomDummy, MaatwerkLijnDummy.GeefIngegevenKenmerken())
+	
+	Do DoosBerekenaarMock.VerwachtMethodCall("GeefDoosLade").DanReturn("")
+	
+	#dim VerpakteAfmetingBerekenaar As APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar
+	Set VerpakteAfmetingBerekenaar = ##class(APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar).%New(HalffabItemBoomDummy ,MaatwerkLijnDummy.GeefIngegevenKenmerken() ,DoosBerekenaarMock)
+	
+	Do VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting()
+	
+	Do DoosBerekenaarMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: De verpakteafmeting van LBX V1 geeft hoogte 0, breedte 0 en diepte 0 als er geen doos berekend wordt">
+<Implementation><![CDATA[
+	#dim HalffabItemBoomDummy As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaakHalffabItemsBoom()
+	#dim MaatwerkLijnDummy As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakLBXMaatwerkLijn(##class(DOM.PM.enu.LBXVerpakkingType).V1())
+	
+	#dim DoosBerekenaarStub As vhTest.Mock.APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar
+	Set DoosBerekenaarStub = ##class(vhTest.Mock.APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar).%New(HalffabItemBoomDummy, MaatwerkLijnDummy.GeefIngegevenKenmerken())
+	
+	Do DoosBerekenaarStub.IndienMethodCall("GeefDoosLade").DanReturn("")
+	
+	#dim VerpakteAfmetingBerekenaar As APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar
+	Set VerpakteAfmetingBerekenaar = ##class(APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar).%New(HalffabItemBoomDummy ,MaatwerkLijnDummy.GeefIngegevenKenmerken() ,DoosBerekenaarStub)
+	
+	#dim VerpakteAfmeting As APPS.Halux.common.impl.VerpakteAfmeting = VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting()
+	Do $$$AssertEquals(VerpakteAfmeting.Diepte,0)
+	Do $$$AssertEquals(VerpakteAfmeting.Hoogte,0)
+	Do $$$AssertEquals(VerpakteAfmeting.Breedte,0)
+]]></Implementation>
+</Method>
+
+<Method name="Test: De verpakteafmeting van LBX V1 geeft de afmeting van de dooslade">
+<Implementation><![CDATA[
+	#dim HalffabItemBoomDummy As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaakHalffabItemsBoom()
+	#dim MaatwerkLijnDummy As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ..MaakLBXMaatwerkLijn(##class(DOM.PM.enu.LBXVerpakkingType).V1())
+	
+	#dim DoosBerekenaarStub As vhTest.Mock.APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar
+	Set DoosBerekenaarStub = ##class(vhTest.Mock.APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar).%New(HalffabItemBoomDummy, MaatwerkLijnDummy.GeefIngegevenKenmerken())
+	
+	#dim DoosLadeDummy As vhTest.Fake.DOM.PM.Verpakking.Doos = ##class(vhTest.Fake.DOM.PM.Verpakking.Doos).%New(10,20,30)
+	Do DoosBerekenaarStub.IndienMethodCall("GeefDoosLade").DanReturn(DoosLadeDummy)
+	
+	#dim VerpakteAfmetingBerekenaar As APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar
+	Set VerpakteAfmetingBerekenaar = ##class(APPS.EC.Winkelkar.impl.LBX.V1.VerpakteAfmetingBerekenaar).%New(HalffabItemBoomDummy ,MaatwerkLijnDummy.GeefIngegevenKenmerken() ,DoosBerekenaarStub)
+	
+	#dim VerpakteAfmeting As APPS.Halux.common.impl.VerpakteAfmeting = VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting()
+	Do $$$AssertEquals(VerpakteAfmeting.Diepte,20)
+	Do $$$AssertEquals(VerpakteAfmeting.Hoogte,30)
+	Do $$$AssertEquals(VerpakteAfmeting.Breedte,10)
+]]></Implementation>
+</Method>
+
+<Method name="MaakLBXMaatwerkLijn">
+<FormalSpec>VerpakkingsType:DOM.PM.enu.LBXVerpakkingType</FormalSpec>
+<Private>1</Private>
+<ReturnType>vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
+<Implementation><![CDATA[
+	#dim LBXKenmerkenFake As vhTest.Fake.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Fake.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).%New()
+	Set LBXKenmerkenFake.VerpakkingType = VerpakkingsType
+	
+	#dim MaatwerkLijn AS vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn).%New()
+	Do MaatwerkLijn.ZetIngegevenKenmerken(LBXKenmerkenFake)
+	Quit MaatwerkLijn
+]]></Implementation>
+</Method>
+
+<Method name="MaakHalffabItemsBoom">
+<Private>1</Private>
+<ReturnType>vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
+<Implementation><![CDATA[
+	Set SamenGesteldHalffabItemLBXRol = ##class(vhTest.Dummy.DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem).%New(, ##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Verpakking())
+	Set HalffabItemsBoom = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
+	Do HalffabItemsBoom.IndienMethodCall("GeefHalffabItem", ##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Verpakking()).DanReturn(SamenGesteldHalffabItemLBXRol)
+	Quit HalffabItemsBoom
+]]></Implementation>
+</Method>
 </Class>