Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider.cls.xml
===================================================================
diff -u -r51466 -r51469
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider.cls.xml (.../HalffabGeleider.cls.xml) (revision 51466)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider.cls.xml (.../HalffabGeleider.cls.xml) (revision 51469)
@@ -60,10 +60,18 @@
%String
@@ -84,9 +92,10 @@
#dim KlantID As DOM.VKP.VanHoeckeKlantID = "K||1000"
#dim Personality As DOM.common.VanHoeckePersonality = ##class(DOM.common.VanHoeckePersonality).Instance()
- #dim HalffabContext As DOM.PM.Maatwerk.Calc.HF.HalffabContext
Set BerekeningsSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%New(1,KlantID,Personality)
Do BerekeningsSpecificatie.ZetBerekeningWijze(##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).ProductieAansturing())
+
+ #dim HalffabContext As DOM.PM.Maatwerk.Calc.HF.HalffabContext
Set HalffabContext = ..ProductService.GeefHalffabContext(##class(DOM.PM.enu.Familie).Lade(),##class(DOM.PM.enu.Variant).LegraboxPure(),BerekeningsSpecificatie)
Set Lijst = ##class(%ListOfObjects).%New()
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider/Test.cls.xml
===================================================================
diff -u -r51466 -r51469
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider/Test.cls.xml (.../Test.cls.xml) (revision 51466)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider/Test.cls.xml (.../Test.cls.xml) (revision 51469)
@@ -82,6 +82,19 @@
]]>
+
+
+
+
HalffabGeleider:DOM.PM.Maatwerk.Calc.HF.impl.LBX.Halffab.HalffabGeleider,DeAndereGeleiderTechnologie:%String
1