Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFAfdekkapBovenv000.cls.xml
===================================================================
diff -u -r54233 -r57380
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFAfdekkapBovenv000.cls.xml	(.../HFAfdekkapBovenv000.cls.xml)	(revision 54233)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFAfdekkapBovenv000.cls.xml	(.../HFAfdekkapBovenv000.cls.xml)	(revision 57380)
@@ -47,6 +47,10 @@
 		Set HalffabItem.Aantal = 2   ; i.e. 2x links+rechts 
 	}
 	
+	If ..IsDubbeleSifonlade(IngegevenKenmerken) {
+		Set HalffabItem.Aantal = HalffabItem.Aantal + 1
+	}
+	
 	If (..API.IngegevenKenmerkenTypeAPI.IsGemonteerdeLade(IngegevenKenmerken)) {		
 		Set HalffabItem.ProductieRoute = ..Enum.ProductieRoute.TeMonteren
 	} Else {		
@@ -72,6 +76,14 @@
 	Quit (Concept = ..Enum.Concept.Valinge)
 ]]></Implementation>
 </Method>
+
+<Method name="IsDubbeleSifonlade">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (IngegevenKenmerken.UitsparingData.AantalUitsparingen = ##class(DOM.PM.enu.AantalUitsparingen).Dubbel())
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFAfdekkapBovenv000/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFAfdekkapBovenv000/Test.cls.xml	(revision 0)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFAfdekkapBovenv000/Test.cls.xml	(revision 57380)
@@ -0,0 +1,87 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFAfdekkapBovenv000.Test">
+<IncludeCode>vhTest.Dummy</IncludeCode>
+<Super>vhUnitTest.DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Base</Super>
+
+<Method name="Test: Standaardlade =&gt; 1 keer AfdekkapBoven L+R">
+<Implementation><![CDATA[
+	Set ..TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade()
+	
+	Do ..AssertAfdekkapBovenAantal(1)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Standaardlade met verlaagde rug =&gt; Geen AfdekkapBoven">
+<Implementation><![CDATA[
+	Set ..TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).VerlaagdeRugLade()
+	
+	Do ..AssertAfdekkapBovenAantal(0)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Sifonlade =&gt; 2 keer AfdekkapBoven L+R">
+<Implementation><![CDATA[
+	Set ..TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardSifonlade()
+	
+	Do ..AssertAfdekkapBovenAantal(2)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Sifonlade met verlaagde rug =&gt; 1 keer AfdekkapBoven L+R">
+<Implementation><![CDATA[
+	Set ..TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).CSifonladeMetLageRug()
+	
+	Do ..AssertAfdekkapBovenAantal(1)
+]]></Implementation>
+</Method>
+
+<Method name="Test: DubbeleSifonlade =&gt; 3 keer AfdekkapBoven L+R">
+<Implementation><![CDATA[
+	Set ..TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardSifonladeMetDubbeleUitsparing()
+	
+	Do ..AssertAfdekkapBovenAantal(3)
+]]></Implementation>
+</Method>
+
+<Method name="Test: DubbeleSifonlade met verlaagde rug =&gt; 2 keer AfdekkapBoven L+R">
+<Implementation><![CDATA[
+	Set ..TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardSifonladeMetDubbeleUitsparing()
+	Set ..TAORKenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).C()
+	Set ..TAORKenmerken.RugHoogte = ##class(DOM.PM.enu.TAORRugHoogte).M()
+	
+	Do ..AssertAfdekkapBovenAantal(2)
+]]></Implementation>
+</Method>
+
+<Method name="VulHalffabTabel">
+<FormalSpec>HalffabTabel:vhUnitTest.DOM.PM.Maatwerk.HF.impl.InMemoryHalffabTabelUT</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set Halffab = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Halffab.HalffabAfdekkapBoven).%New($$$DummyProductID)
+	Set Halffab.AfdekkapBovenKleur = ##class(DOM.PM.enu.TAORAfdekkapBovenKleur).AluminiumLook()
+	Set Halffab.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).V1()
+	Set Halffab.LiRe = ##class(DOM.PM.enu.LiRe).LinksRechts()
+	
+	Do HalffabTabel.VoegToeHalffab(Halffab)
+]]></Implementation>
+</Method>
+
+<Method name="AssertAfdekkapBovenAantal">
+<FormalSpec>VerwachtAantal:%Integer</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim Builder As DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFAfdekkapBovenv000 = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFAfdekkapBovenv000).%New("")
+	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = Builder.Bereken(..TAORKenmerken, ..GeefContext())
+	
+	If (VerwachtAantal = 0) {
+		Do $$$AssertFalse($IsObject(HalffabItem))
+	} Else {
+		Do $$$AssertEquals(HalffabItem.Aantal, VerwachtAantal)
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>