Index: vhUnitTest/DOM/PM/impl/MaatwerkLangtekstCreator/Test.cls.xml
===================================================================
diff -u -r58484 -r62134
--- vhUnitTest/DOM/PM/impl/MaatwerkLangtekstCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 58484)
+++ vhUnitTest/DOM/PM/impl/MaatwerkLangtekstCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 62134)
@@ -24,6 +24,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="HalffabItemsBoomOnHerwerkt">
+<Type>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
@@ -36,15 +41,29 @@
 	do VertaalAPI.IndienMethodCall("GeefKleurCodeVertaler", Taal).DanReturn(VertalerStub)
 	do VertaalAPI.IndienMethodCall("GeefTaorKleurCodeVertaler", Taal).DanReturn(VertalerStub)
  	
+ 	
 	Set ..Kenmerken = ..GeefKenmerken()
 	Set ..HalffabItemsBoom = ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI().GeefHalffabItemsBoom(..Kenmerken)
+	Do ..InitieerHalffabItemsBoomOnherwerkt()
 	Set ..LangtekstCreator = ..GeefLangtekstCreator()
 ]]></Implementation>
 </Method>
 
+<Method name="InitieerHalffabItemsBoomOnherwerkt">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim BerekeningSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%New(1,##class(DOM.VKP.enu.Klant).Halux(),##class(DOM.common.VanHoeckePersonality).Instance())
+	Do BerekeningSpecificatie.ZetBerekeningWijze(##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).ProductieAansturing())
+	#dim HalffabContext As DOM.PM.Maatwerk.Calc.HF.HalffabContext = ##class(DOM.PM.Maatwerk.Calc.HF.HalffabContext).%New(..Kenmerken.GeefFamilie(),..Kenmerken.GeefVariant(), BerekeningSpecificatie)
+	#dim HalffabSpec As DOM.PM.Maatwerk.Calc.HF.HalffabSpec = HalffabContext.GeefHalffabSpec()
+	Do HalffabSpec.BerekenHalffabBerekeningDetails(HalffabContext, ..Kenmerken)
+	set ..HalffabItemsBoomOnHerwerkt = HalffabContext.HalffabItemsBoom
+]]></Implementation>
+</Method>
+
 <Method name="Test">
 <Implementation><![CDATA[
-	#dim Langtekst As DOM.PM.ProductLangtekst = ..LangtekstCreator.GeefLangtekst(..Kenmerken,..HalffabItemsBoom,##class(DOM.enu.Taal).Nederlands())
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..LangtekstCreator.GeefLangtekst(..Kenmerken,..HalffabItemsBoom,##class(DOM.enu.Taal).Nederlands(),, ..HalffabItemsBoomOnHerwerkt)
 	do $$$AssertEquals(Langtekst.GeefHoofding(),..GeefVerwachteHoofding())
 	do $$$AssertEqualsList(Langtekst.GeefDetail(),..GeefVerwachteDetaillijnen())
 ]]></Implementation>