Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFSifonkapv000.cls.xml
===================================================================
diff -u -r50557 -r50573
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFSifonkapv000.cls.xml (.../HFSifonkapv000.cls.xml) (revision 50557)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFSifonkapv000.cls.xml (.../HFSifonkapv000.cls.xml) (revision 50573)
@@ -49,7 +49,7 @@
If (..BuilderMoetWerken(IngegevenKenmerken, Context)) {
Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem).%New(Context, ..GeefRol())
- Set ..IsSifonType3 = (IngegevenKenmerken.UitsparingData.UitsparingZ1 = ##class(DOM.PM.enu.UitsparingCode).Smal160()) ; LadeUitsparingHelper.IsSifonType3(IngegevenKenmerken.UitsparingData)
+ Set ..IsSifonType3 = ..LadeUitsparingHelper.IsSifonType3(IngegevenKenmerken.UitsparingData)
#dim SifonkapKleur As TECH.String = ..GeefSifonkapKleur(IngegevenKenmerken)
#dim SubItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem
Index: DOM/PM/Maatwerk/Calc/Kost/impl/LBX/Builder/Multiplier/FrezenSifonBodemUitsparing.cls.xml
===================================================================
diff -u -r50509 -r50573
--- DOM/PM/Maatwerk/Calc/Kost/impl/LBX/Builder/Multiplier/FrezenSifonBodemUitsparing.cls.xml (.../FrezenSifonBodemUitsparing.cls.xml) (revision 50509)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/LBX/Builder/Multiplier/FrezenSifonBodemUitsparing.cls.xml (.../FrezenSifonBodemUitsparing.cls.xml) (revision 50573)
@@ -17,8 +17,10 @@
Context:DOM.PM.Maatwerk.Calc.Kost.KostContext,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken
%Float
Context:DOM.PM.Maatwerk.Calc.Kost.KostContext,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken
%Float
1
+
+DOM.PM.Maatwerk.Calc.Common.impl.LadeUitsparingHelper
+1
+
+
%Decimal
1
@@ -27,6 +32,7 @@
Do ##super(SamengesteldHalffabItemBuilder)
Set ..SpoelbakHalffabItemVerwerker = $$$Implementation(SpoelbakHalffabItemVerwerker,##class(DOM.PM.Maatwerk.Calc.HF.impl.LBX.SpoelbakHalffabItemVerwerker).%New())
Set ..SpoelbakIngegevenKenmerkenAanpasser = $$$Implementation(SpoelbakIngegevenKenmerkenAanpasser,##class(DOM.PM.Maatwerk.Calc.HF.impl.LBX.Builder.SpoelbakIngegevenKenmerkenAanpasser).%New())
+ Set ..LadeUitsparingHelper = ##class(DOM.PM.Maatwerk.Calc.Common.impl.LadeUitsparingHelper).%New()
Quit $$$OK
]]>
@@ -60,7 +66,7 @@
If (..API.IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken)) {
#dim SubRol As %String = ""
#dim AftrekRugVerbindingMetSifonkap As %Decimal = 0
- #dim IsSifonType3 As %Boolean = (IngegevenKenmerken.UitsparingData.UitsparingZ1 = ##class(DOM.PM.enu.UitsparingCode).Smal160()) ; LadeUitsparingHelper.IsSifonType3(IngegevenKenmerken.UitsparingData)
+ #dim IsSifonType3 As %Boolean = ..LadeUitsparingHelper.IsSifonType3(IngegevenKenmerken.UitsparingData)
If IsSifonType3 {
Set AftrekRugVerbindingMetSifonkap = 8.5
}
Index: DOM/PM/Maatwerk/Calc/Kost/impl/LBX/SifonType3Evaluator.cls.xml
===================================================================
diff -u -r50514 -r50573
--- DOM/PM/Maatwerk/Calc/Kost/impl/LBX/SifonType3Evaluator.cls.xml (.../SifonType3Evaluator.cls.xml) (revision 50514)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/LBX/SifonType3Evaluator.cls.xml (.../SifonType3Evaluator.cls.xml) (revision 50573)
@@ -11,7 +11,11 @@
HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Context:DOM.PM.Maatwerk.Calc.Kost.KostContext,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
%Boolean
-