Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFDwarsverdelingv000.cls.xml
===================================================================
diff -u -r29059 -r40535
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFDwarsverdelingv000.cls.xml	(.../HFDwarsverdelingv000.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFDwarsverdelingv000.cls.xml	(.../HFDwarsverdelingv000.cls.xml)	(revision 40535)
@@ -3,6 +3,32 @@
 <Class name="DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.HFDwarsverdelingv000">
 <Super>DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.Generated.HFDwarsverdelingv000</Super>
 
+<Property name="SpoelbakIngegevenKenmerkenAanpasser">
+<Type>DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.SpoelbakIngegevenKenmerkenAanpasser</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder,SpoelbakIngegevenKenmerkenAanpasser:DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.SpoelbakIngegevenKenmerkenAanpasser</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..SpoelbakIngegevenKenmerkenAanpasser = $$$Inject(SpoelbakIngegevenKenmerkenAanpasser,##class(DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.SpoelbakIngegevenKenmerkenAanpasser).%New())
+	
+	Set ..Rol=##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Dwarsverdeling()
+	Quit ##super(SamengesteldHalffabItemBuilder)
+]]></Implementation>
+</Method>
+
+<Method name="GeefAangepasteIngegevenKenmerken">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</ReturnType>
+<Implementation><![CDATA[	Quit ..SpoelbakIngegevenKenmerkenAanpasser.PasAan(IngegevenKenmerken)
+]]></Implementation>
+</Method>
+
 <Method name="PostProcessHalffabItem">
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
Index: vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/LBXKenmerken.cls.xml
===================================================================
diff -u -r39777 -r40535
--- vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/LBXKenmerken.cls.xml	(.../LBXKenmerken.cls.xml)	(revision 39777)
+++ vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/LBXKenmerken.cls.xml	(.../LBXKenmerken.cls.xml)	(revision 40535)
@@ -200,6 +200,21 @@
 ]]></Implementation>
 </Method>
 
+<Method name="StandaardSpoelbakLade">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken</ReturnType>
+<Implementation><![CDATA[
+	#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..StandaardLade()
+	
+  	Set LBXKenmerken.Klasse = ##class(DOM.PM.enu.LBXKlasse).Spoelbak()
+	Set LBXKenmerken.SpoelbakKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.LBX.SpoelbakKenmerken).%New()
+	Set LBXKenmerken.SpoelbakKenmerken.UitsparingBreedte1 = 248
+	Set LBXKenmerken.SpoelbakKenmerken.UitsparingPositie1 = 158
+	
+	Quit LBXKenmerken
+]]></Implementation>
+</Method>
+
 <Method name="CSpoelbakLadeZijwandTypeFree">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken</ReturnType>
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFDwarsverdelingv000/Bereken/Test.cls.xml
===================================================================
diff -u -r40532 -r40535
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFDwarsverdelingv000/Bereken/Test.cls.xml	(.../Test.cls.xml)	(revision 40532)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFDwarsverdelingv000/Bereken/Test.cls.xml	(.../Test.cls.xml)	(revision 40535)
@@ -39,6 +39,37 @@
 	Do $$$AssertEquals(HalffabItem.AfmetingTeBekomen, 510)
 ]]></Implementation>
 </Method>
+
+<Method name="Test: de dwarsverdeling bij een LBX spoelbak lade wordt berekend volgens de breedte van de kleine 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).StandaardSpoelbakLade()
+	Set KenmerkenStandaardLade.AantalDwarsverdelingen = 1
+	Set KenmerkenStandaardLade.InterneBreedte = 600
+	
+	Set SpoelbakIngegevenKenmerkenAanpasserMock = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.SpoelbakIngegevenKenmerkenAanpasser).%New()
+	Do SpoelbakIngegevenKenmerkenAanpasserMock.VerwachtMethodCall("PasAan",KenmerkenStandaardLade).DanReturn(..GeefAangepasteKenmerken())
+	
+	Set DwarsverdelingBuilder = ##class(DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.HFDwarsverdelingv000).%New("", SpoelbakIngegevenKenmerkenAanpasserMock)
+	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem = DwarsverdelingBuilder.Bereken(KenmerkenStandaardLade, ..GeefContext())
+	
+	Do SpoelbakIngegevenKenmerkenAanpasserMock.Verifieer()
+	Do $$$AssertEquals(HalffabItem.AfmetingTeBekomen, 74)
+]]></Implementation>
+</Method>
+
+<Method name="GeefAangepasteKenmerken">
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken</ReturnType>
+<Implementation><![CDATA[
+	#dim AangepastIngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken
+	Set AangepastIngegevenKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).StandaardSpoelbakLade() 
+	Set AangepastIngegevenKenmerken.AantalDwarsverdelingen = 1
+	Set AangepastIngegevenKenmerken.InterneBreedte = 164
+	Set AangepastIngegevenKenmerken.Klasse = ##class(DOM.PM.enu.LBXKlasse).Lade()
+	Set AangepastIngegevenKenmerken.SpoelbakKenmerken = ""
+	Quit AangepastIngegevenKenmerken
+]]></Implementation>
+</Method>
 </Class>