Index: DOM/PM/Maatwerk/Calc/HF/HalffabSpec.cls.xml
===================================================================
diff -u -r29692 -r29708
--- DOM/PM/Maatwerk/Calc/HF/HalffabSpec.cls.xml (.../HalffabSpec.cls.xml) (revision 29692)
+++ DOM/PM/Maatwerk/Calc/HF/HalffabSpec.cls.xml (.../HalffabSpec.cls.xml) (revision 29708)
@@ -213,6 +213,8 @@
Set HalffabItem = HFGegegevensVisitor.GeefHalffabItem()
}
+ Set HalffabItem.OpnemenInEindproduct = 1
+
Set:$IsObject(HalffabrikaatAanpassing.VerwijderenAanpassing) HalffabItem.OpnemenInEindproduct = 0
#dim HalffabrikaatNietMeeleveren As %Boolean = NietMeeLeveren.IsDefined(HalffabItem.GeefRol())
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKoppelingSchroefv000.cls.xml
===================================================================
diff -u -r29686 -r29708
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKoppelingSchroefv000.cls.xml (.../HFKoppelingSchroefv000.cls.xml) (revision 29686)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKoppelingSchroefv000.cls.xml (.../HFKoppelingSchroefv000.cls.xml) (revision 29708)
@@ -15,16 +15,18 @@
0)
- #dim HeeftSchroefkoppeling As %Boolean = (IngegevenKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Schroef())
- #dim IsNodig As %Boolean = (HeeftSchroefkoppeling && BevatKoppeling)
-
- Do HalffabItem.ZetIsMeeTeRekenenVoorVoorraad(IsNodig)
- Do HalffabItem.ZetIsMeeTeRekenenInPrijs(IsNodig)
- Set HalffabItem.OpnemenInEindproduct = IsNodig
- Set HalffabItem.BuilderBepaaltOpnemenInEindproduct = 1
+ Do HalffabItem.ZetIsMeeTeRekenenVoorVoorraad(IngegevenKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Schroef())
+ Do HalffabItem.ZetIsMeeTeRekenenInPrijs(IngegevenKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Schroef())
]]>
+
+
+IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext
+1
+%Boolean
+ 0)
+]]>
+