Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider/HalffabContextMock.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider/HalffabContextMock.cls.xml	(revision 0)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider/HalffabContextMock.cls.xml	(revision 51460)
@@ -0,0 +1,121 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.impl.LBX.Halffab.HalffabGeleider.HalffabContextMock">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>DOM.PM.Maatwerk.Calc.HF.HalffabContext,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="%OnNew">
+<FormalSpec>Familie:DOM.PM.enu.Familie,Variant:DOM.PM.enu.Variant,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,HalffabRepository:DOM.PM.Maatwerk.Calc.HF.IHalffabRepository=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefBerekenDatum">
+<ReturnType>%Date</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefBerekenDatum")
+]]></Implementation>
+</Method>
+
+<Method name="GeefBerekeningProblemen">
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefBerekeningProblemen")
+]]></Implementation>
+</Method>
+
+<Method name="GeefBerekeningsSpecificatie">
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefBerekeningsSpecificatie")
+]]></Implementation>
+</Method>
+
+<Method name="GeefBerekingWijze">
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefBerekingWijze")
+]]></Implementation>
+</Method>
+
+<Method name="GeefBewerkingsInfo">
+<FormalSpec>ProductID:%String,BewerkingDimensie:%String</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.impl.BewerkingsInfo</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefBewerkingsInfo",ProductID,BewerkingDimensie)
+]]></Implementation>
+</Method>
+
+<Method name="GeefGeprobeerdeSelectieKenmerken">
+<FormalSpec>Rol:%String</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefGeprobeerdeSelectieKenmerken",Rol)
+]]></Implementation>
+</Method>
+
+<Method name="GeefGewichtInGram">
+<FormalSpec>ProductID:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefGewichtInGram",ProductID)
+]]></Implementation>
+</Method>
+
+<Method name="GeefHalffabSpec">
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabSpec</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefHalffabSpec")
+]]></Implementation>
+</Method>
+
+<Method name="GeefHalffabTabel">
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.IHalffabTabel</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefHalffabTabel")
+]]></Implementation>
+</Method>
+
+<Method name="GeefHoeveelheid">
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefHoeveelheid")
+]]></Implementation>
+</Method>
+
+<Method name="GeefKlantOrderInstellingen">
+<ReturnType>DOM.VKP.KlantOrderInstellingen</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefKlantOrderInstellingen")
+]]></Implementation>
+</Method>
+
+<Method name="GeefMaatwerkTypeCode">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("GeefMaatwerkTypeCode")
+]]></Implementation>
+</Method>
+
+<Method name="LogExceptie">
+<FormalSpec>Exceptie:TECH.IException</FormalSpec>
+<Implementation><![CDATA[	Do ..VerwerkMethodCall("LogExceptie",Exceptie)
+]]></Implementation>
+</Method>
+
+<Method name="RegistreerBerekeningProbleem">
+<FormalSpec>BerekeningProbleem:DOM.PM.Maatwerk.Calc.Common.Probleem.BerekeningProbleem</FormalSpec>
+<Implementation><![CDATA[	Do ..VerwerkMethodCall("RegistreerBerekeningProbleem",BerekeningProbleem)
+]]></Implementation>
+</Method>
+
+<Method name="SelecteerHalffabrikaten">
+<FormalSpec>IHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilder,SelectieKenmerken:%ArrayOfDataTypes,RedenVoorSelectie:%String=""</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("SelecteerHalffabrikaten",IHalffabItemBuilder,SelectieKenmerken,RedenVoorSelectie)
+]]></Implementation>
+</Method>
+
+<Method name="SelecteerKenmerkParenVoorMogelijkeWaardenBepaling">
+<FormalSpec>IHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilder,PropertyNaam1:%String,PropertyNaam2:%String,SelectieKenmerken:%ArrayOfDataTypes,RedenVoorSelectie:%String=""</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("SelecteerKenmerkParenVoorMogelijkeWaardenBepaling",IHalffabItemBuilder,PropertyNaam1,PropertyNaam2,SelectieKenmerken,RedenVoorSelectie)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Dummy/DOM/PM/Maatwerk/Calc/Common/BerekeningsSpecificatie.cls.xml
===================================================================
diff -u -r31309 -r51460
--- vhTest/Dummy/DOM/PM/Maatwerk/Calc/Common/BerekeningsSpecificatie.cls.xml	(.../BerekeningsSpecificatie.cls.xml)	(revision 31309)
+++ vhTest/Dummy/DOM/PM/Maatwerk/Calc/Common/BerekeningsSpecificatie.cls.xml	(.../BerekeningsSpecificatie.cls.xml)	(revision 51460)
@@ -18,6 +18,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetBerekeningWijze">
+<FormalSpec>BerekeningWijze:DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze</FormalSpec>
+<Implementation><![CDATA[	Set ..BerekeningWijze = BerekeningWijze
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 </Storage>
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider/Test.cls.xml
===================================================================
diff -u -r51455 -r51460
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider/Test.cls.xml	(.../Test.cls.xml)	(revision 51455)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Halffab/HalffabGeleider/Test.cls.xml	(.../Test.cls.xml)	(revision 51460)
@@ -8,7 +8,12 @@
 <Default>1000</Default>
 </Parameter>
 
-<Method name="Test: Default werking">
+<Parameter name="KlantId">
+<Type>%String</Type>
+<Default>K||1000</Default>
+</Parameter>
+
+<Method name="zTest: Default werking">
 <Implementation><![CDATA[
 	Set HalffabGeleider = ##class(DOM.PM.Maatwerk.Calc.HF.impl.LBX.Halffab.HalffabGeleider).%New(..#ProductId)
 	Set HalffabGeleider.GeleiderTechnologie = ##class(DOM.PM.enu.LBXGeleiderTechnologie).BLUMOTION()
@@ -31,12 +36,15 @@
 <Implementation><![CDATA[
 	#dim Familie As DOM.PM.enu.Familie = ##class(DOM.PM.enu.Familie).Lade()
 	#dim Variant As DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).LegraboxPure()
-	#dim BerekeningsSpecificatieDummy As DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie = ##class(vhTest.Dummy.DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%New()
-	#dim HalffabContextStub As DOM.PM.Maatwerk.Calc.HF.HalffabContext = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.HalffabContext).%New(Familie, Variant, BerekeningsSpecificatieDummy)
+	#dim Personality As DOM.common.VanHoeckePersonality = ##class(DOM.common.VanHoeckePersonality).Instance()
+	#dim BerekeningsSpecificatieDummy As DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie = ##class(vhTest.Dummy.DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%New(1,..#KlantId,Personality)
+	Do BerekeningsSpecificatieDummy.ZetBerekeningWijze(##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).ProductieAansturing())
+	
+	#dim HalffabContextStub As DOM.PM.Maatwerk.Calc.HF.HalffabContext = ##class(vhUnitTest.DOM.PM.Maatwerk.Calc.HF.impl.LBX.Halffab.HalffabGeleider.HalffabContextMock).%New(Familie, Variant, BerekeningsSpecificatieDummy)
 	Do HalffabContextStub.IndienMethodCall("GeefBerekenDatum").DanReturn($Horolog)
 	
 	Set ProductServiceStub = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.ProductService).%New()
-	Do ProductServiceStub.IndienMethodCall("GeefHalffabContext","Lade","LBX_Pure",BerekeningsSpecificatieDummy).DanReturn(HalffabContextStub)
+	Do ProductServiceStub.IndienMethodCall("GeefHalffabContext","Lade","LBX_Pure",$$$ElkeWaarde).DanReturn(HalffabContextStub)
 	
 	Quit ProductServiceStub
 ]]></Implementation>