Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFDwarsverdelingv000/Bereken/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFDwarsverdelingv000/Bereken/Test.cls.xml	(revision 0)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFDwarsverdelingv000/Bereken/Test.cls.xml	(revision 40532)
@@ -0,0 +1,45 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.HFDwarsverdelingv000.Bereken.Test">
+<ClassType/>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>vhUnitTest.DOM.PM.Maatwerk.Calc.HF.impl.LBX.TestHalffabBuilderBase</Super>
+
+<Method name="VulHalffabTabel">
+<FormalSpec>HalffabTabel:vhUnitTest.DOM.PM.Maatwerk.HF.impl.InMemoryHalffabTabelUT</FormalSpec>
+<Implementation><![CDATA[
+	#dim ProductId As %String = 1000
+	Set Halffab = ##class(DOM.PM.Maatwerk.Calc.HF.impl.LBX.Halffab.HalffabDwarsverdeling).%New(ProductId)
+	Set Halffab.BewerkbaarOp = "Lengte"
+	Set Halffab.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).Zijdewit()
+	Do HalffabTabel.VoegToeHalffab(Halffab)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Indien geen dwarsverdelingen dan moet de builder niet werken en wordt er ook geen halffabItem gemaakt">
+<Implementation><![CDATA[
+	#dim KenmerkenStandaardLade As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken 
+	Set KenmerkenStandaardLade = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).StandaardLade()
+		
+	Set DwarsverdelingBuilder = ##class(DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.HFDwarsverdelingv000).%New("")
+	Do $$$AssertNotIsObject(DwarsverdelingBuilder.Bereken(KenmerkenStandaardLade, ..GeefContext()))
+]]></Implementation>
+</Method>
+
+<Method name="Test: de dwarsverdeling bij een LBX standaard lade wordt berekend volgens de breedte van de lade en is 90mm korter">
+<Implementation><![CDATA[
+	#dim KenmerkenStandaardLade As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken 
+	Set KenmerkenStandaardLade = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).StandaardLade()
+	Set KenmerkenStandaardLade.AantalDwarsverdelingen = 1
+	Set KenmerkenStandaardLade.InterneBreedte = 600
+		
+	Set DwarsverdelingBuilder = ##class(DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.HFDwarsverdelingv000).%New("")
+	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem = DwarsverdelingBuilder.Bereken(KenmerkenStandaardLade, ..GeefContext())
+	
+	Do $$$AssertEquals(HalffabItem.AfmetingTeBekomen, 510)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>