Index: vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/ZijkantLogo/Test.cls.xml
===================================================================
diff -u -r56894 -r62134
--- vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/ZijkantLogo/Test.cls.xml	(.../Test.cls.xml)	(revision 56894)
+++ vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/ZijkantLogo/Test.cls.xml	(.../Test.cls.xml)	(revision 62134)
@@ -36,6 +36,8 @@
 
 <Method name="Test: taorlade zonder zijkantlogo ">
 <Implementation><![CDATA[
+	Set HalffabItemCreator = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.HF.HalffabItem).%New()
+	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = HalffabItemCreator.GeefDummyHalffabItemsBoom()
 	Set ..LangtekstCreator = ##class(DOM.PM.impl.TAORLangtekstCreator).%New()
 	Set ..Korttekst = "171A5070   W-DIST    NENE"	; random korttekst 
 	
@@ -76,7 +78,7 @@
 <ReturnType>DOM.PM.ProductLangtekst</ReturnType>
 <Implementation><![CDATA[
 	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..GeefHalffabItemsBoom(..TAORKenmerken)
-	quit ..LangtekstCreator.GeefLangtekst(..TAORKenmerken, HalffabItemsBoom, ..Taal,..Korttekst)
+	quit ..LangtekstCreator.GeefLangtekst(..TAORKenmerken, HalffabItemsBoom, ..Taal,..Korttekst, HalffabItemsBoom)
 ]]></Implementation>
 </Method>
 
Index: DOM/PM/impl/LangtekstCreator.cls.xml
===================================================================
diff -u -r62130 -r62134
--- DOM/PM/impl/LangtekstCreator.cls.xml	(.../LangtekstCreator.cls.xml)	(revision 62130)
+++ DOM/PM/impl/LangtekstCreator.cls.xml	(.../LangtekstCreator.cls.xml)	(revision 62134)
@@ -75,11 +75,15 @@
 	set ..HalffabItemsBoom = HalffabItemsBoom
 	set ..Taal = Taal
 	set ..KortTekst = Korttekst
+	Set ..HalffabItemsBoomOnHerwerkt = HalffabItemsBoomOnHerwerkt
+	
+	/*
 	If ($IsObject(HalffabItemsBoomOnHerwerkt)) {
 		Set ..HalffabItemsBoomOnHerwerkt = HalffabItemsBoomOnHerwerkt
 	} Else {
 		Do ..InitieerHalffabItemsBoomOnherwerkt()
 	}
+	*/
 	
 	
 	do ..BepaalHoofding()
@@ -97,14 +101,12 @@
 <Method name="InitieerHalffabItemsBoomOnherwerkt">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do ##class(TECH.Timing.TimerUtils).Start("InitieerHalffabItemsBoomOnherwerktInCreator")
 	#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(..IngegevenKenmerken.GeefFamilie(), ..IngegevenKenmerken.GeefVariant(), BerekeningSpecificatie)
 	#dim HalffabSpec As DOM.PM.Maatwerk.Calc.HF.HalffabSpec = HalffabContext.GeefHalffabSpec()
 	Do HalffabSpec.BerekenHalffabBerekeningDetails(HalffabContext, ..IngegevenKenmerken)
 	set ..HalffabItemsBoomOnHerwerkt = HalffabContext.HalffabItemsBoom
-	Do ##class(TECH.Timing.TimerUtils).Stop()
 ]]></Implementation>
 </Method>
 
Index: DOM/PM/impl/DataM/DataMMATBasisCreator.cls.xml
===================================================================
diff -u -r62130 -r62134
--- DOM/PM/impl/DataM/DataMMATBasisCreator.cls.xml	(.../DataMMATBasisCreator.cls.xml)	(revision 62130)
+++ DOM/PM/impl/DataM/DataMMATBasisCreator.cls.xml	(.../DataMMATBasisCreator.cls.xml)	(revision 62134)
@@ -38,7 +38,7 @@
 <ReturnType>DOM.PM.ProductLangtekst</ReturnType>
 <Implementation><![CDATA[
 	#dim LangtekstCreator As DOM.PM.impl.MATBasisLangtekstCreator = ##class(DOM.PM.impl.MATBasisLangtekstCreator).%New()
-	Quit LangtekstCreator.GeefLangtekst(..ProductSpecificatie.GeefIngegevenKenmerken(),..HalffabItemsBoom, Taal, ,..HalffabItemsBoomOnHerwerkt)
+	Quit LangtekstCreator.GeefLangtekst(..ProductSpecificatie.GeefIngegevenKenmerken(),..HalffabItemsBoom, Taal,, ..HalffabItemsBoomOnHerwerkt)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/Standaard/Test.cls.xml
===================================================================
diff -u -r30180 -r62134
--- vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/Standaard/Test.cls.xml	(.../Test.cls.xml)	(revision 30180)
+++ vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/Standaard/Test.cls.xml	(.../Test.cls.xml)	(revision 62134)
@@ -23,6 +23,19 @@
 ]]></Implementation>
 </Method>
 
+<Method name="InitieerHalffabItemsBoomOnherwerkt">
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
+<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(..TAORKenmerken.GeefFamilie(),..TAORKenmerken.GeefVariant(), BerekeningSpecificatie)
+	#dim HalffabSpec As DOM.PM.Maatwerk.Calc.HF.HalffabSpec = HalffabContext.GeefHalffabSpec()
+	Do HalffabSpec.BerekenHalffabBerekeningDetails(HalffabContext, ..TAORKenmerken)
+	Quit HalffabContext.HalffabItemsBoom
+]]></Implementation>
+</Method>
+
 <Method name="Test: Standaard hoofding start met &apos;TA&apos;OR BOX &apos;">
 <Implementation><![CDATA[
 	#dim Hoofding As TECH.String = ..MaakStandaardHoofding()
@@ -37,7 +50,8 @@
 <Implementation><![CDATA[
 	#dim Taal As DOM.enu.Taal = ##class(DOM.enu.Taal).Nederlands()
 	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..GeefHalffabItemsBoom(..TAORKenmerken)
-	#dim Langtekst As DOM.PM.ProductLangtekst = ..LangtekstCreator.GeefLangtekst(..TAORKenmerken, HalffabItemsBoom, Taal)
+	#dim HalffabItemsBoomOnherwerkt As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..InitieerHalffabItemsBoomOnherwerkt()
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..LangtekstCreator.GeefLangtekst(..TAORKenmerken, HalffabItemsBoom, Taal,,HalffabItemsBoomOnherwerkt)
 	
 	quit Langtekst.GeefHoofding()
 ]]></Implementation>
Index: DOM/PM/impl/TAORLangtekstCreator.cls.xml
===================================================================
diff -u -r60451 -r62134
--- DOM/PM/impl/TAORLangtekstCreator.cls.xml	(.../TAORLangtekstCreator.cls.xml)	(revision 60451)
+++ DOM/PM/impl/TAORLangtekstCreator.cls.xml	(.../TAORLangtekstCreator.cls.xml)	(revision 62134)
@@ -81,12 +81,12 @@
 </Method>
 
 <Method name="GeefLangtekst">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Taal:DOM.enu.Taal,KortTekst:%String=""</FormalSpec>
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Taal:DOM.enu.Taal,KortTekst:%String="",HalffabItemsBoomOnHerwerkt:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom=""</FormalSpec>
 <ReturnType>DOM.PM.ProductLangtekst</ReturnType>
 <Implementation><![CDATA[
 	Set ..Lade = ..LadeInfoAPI.GeefLade(HalffabItemsBoom, IngegevenKenmerken)
 	Set ..PlaatMateriaalKleurVertaler = ##class(DOM.DomeinContext).Instance().GeefVertaalAPI().GeefTaorKleurCodeVertaler(Taal)
-	Quit ##super(IngegevenKenmerken, HalffabItemsBoom, Taal, KortTekst)
+	Quit ##super(IngegevenKenmerken, HalffabItemsBoom, Taal, KortTekst, HalffabItemsBoomOnHerwerkt)
 ]]></Implementation>
 </Method>
 
Index: vhTest/Integratie/ProductBeheer/Maatwerk/Langteksten/TestBase.cls.xml
===================================================================
diff -u -r58519 -r62134
--- vhTest/Integratie/ProductBeheer/Maatwerk/Langteksten/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 58519)
+++ vhTest/Integratie/ProductBeheer/Maatwerk/Langteksten/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 62134)
@@ -32,12 +32,12 @@
 	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI().GeefHalffabItemsBoom(Kenmerken)
 	#dim LangtekstCreator As DOM.PM.impl.LangtekstCreator = ..GeefLangtekstCreator()
 	#dim TaalIterator As TECH.ListIterator = ##class(DOM.enu.Taal).ValueListIterator()
-	
+	#dim HalffabItemsBoomOnHerwerkt As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..InitieerHalffabItemsBoomOnherwerkt(Kenmerken)
 	while TaalIterator.HasNext() {
 		set Taal = TaalIterator.Next()
 		Continue:($$$Not(..IsGeldigeTaalVoorLangtekst(Taal)))
 		
-		set ProductLangtekst = LangtekstCreator.GeefLangtekst(Kenmerken, HalffabItemsBoom, Taal)
+		set ProductLangtekst = LangtekstCreator.GeefLangtekst(Kenmerken, HalffabItemsBoom, Taal, ,HalffabItemsBoomOnHerwerkt)
 		
 		#dim Langtekst As %String = ProductLangtekst.GeefString()
 		
@@ -57,7 +57,7 @@
 	do VertaalAPI.IndienMethodCall("GeefKleurCodeVertaler", Taal).DanReturn(VertalerStub)
 	do VertaalAPI.IndienMethodCall("GeefTaorKleurCodeVertaler", Taal).DanReturn(VertalerStub)
 	
-	set ProductLangtekst = LangtekstCreator.GeefLangtekst(Kenmerken, HalffabItemsBoom, Taal)
+	set ProductLangtekst = LangtekstCreator.GeefLangtekst(Kenmerken, HalffabItemsBoom, Taal,, HalffabItemsBoomOnHerwerkt)
 	
 	do FileWriter.WriteLine("Vertaling met sleutels:")
 	do FileWriter.WriteLine(ProductLangtekst.GeefString())
@@ -70,6 +70,20 @@
 ]]></Implementation>
 </Method>
 
+<Method name="InitieerHalffabItemsBoomOnherwerkt">
+<FormalSpec>Kenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
+<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)
+	Quit HalffabContext.HalffabItemsBoom
+]]></Implementation>
+</Method>
+
 <Method name="GeefIngegevenKenmerken">
 <Abstract>1</Abstract>
 <Private>1</Private>
Index: vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/TestBaseSpecifiek.cls.xml
===================================================================
diff -u -r52155 -r62134
--- vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/TestBaseSpecifiek.cls.xml	(.../TestBaseSpecifiek.cls.xml)	(revision 52155)
+++ vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/TestBaseSpecifiek.cls.xml	(.../TestBaseSpecifiek.cls.xml)	(revision 62134)
@@ -24,17 +24,35 @@
 <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[
 	do ##super(aTestName)
-	
+
 	set ..LangtekstCreator = ##class(DOM.PM.impl.TAORLangtekstCreator).%New()
 	set ..Taal = ##class(DOM.enu.Taal).Nederlands()
 	set ..Korttekst = ""
 ]]></Implementation>
 </Method>
 
+<Method name="InitieerHalffabItemsBoomOnherwerkt">
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
+<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(..TAORKenmerken.GeefFamilie(),..TAORKenmerken.GeefVariant(), BerekeningSpecificatie)
+	#dim HalffabSpec As DOM.PM.Maatwerk.Calc.HF.HalffabSpec = HalffabContext.GeefHalffabSpec()
+	Do HalffabSpec.BerekenHalffabBerekeningDetails(HalffabContext, ..TAORKenmerken)
+	Quit HalffabContext.HalffabItemsBoom
+]]></Implementation>
+</Method>
+
 <Method name="Test: hoofding start met &apos;TA&apos;OR BOX &apos;">
 <Implementation><![CDATA[	do $$$AssertEquals($Extract(..GeefHoofding(), 1, 10), "TA'OR BOX ")
 ]]></Implementation>
@@ -59,7 +77,9 @@
 <ReturnType>DOM.PM.ProductLangtekst</ReturnType>
 <Implementation><![CDATA[
 	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..GeefHalffabItemsBoom(..TAORKenmerken)
-	quit ..LangtekstCreator.GeefLangtekst(..TAORKenmerken, HalffabItemsBoom, ..Taal,..Korttekst)
+	#dim HalffabItemsBoomOnHerwerkt As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..InitieerHalffabItemsBoomOnherwerkt()
+
+	quit ..LangtekstCreator.GeefLangtekst(..TAORKenmerken, HalffabItemsBoom, ..Taal,..Korttekst, HalffabItemsBoomOnHerwerkt)
 ]]></Implementation>
 </Method>
 
Index: DOM/PM/impl/MATTAORLangtekstCreator.cls.xml
===================================================================
diff -u -r30521 -r62134
--- DOM/PM/impl/MATTAORLangtekstCreator.cls.xml	(.../MATTAORLangtekstCreator.cls.xml)	(revision 30521)
+++ DOM/PM/impl/MATTAORLangtekstCreator.cls.xml	(.../MATTAORLangtekstCreator.cls.xml)	(revision 62134)
@@ -8,11 +8,11 @@
 </Property>
 
 <Method name="GeefLangtekst">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Taal:DOM.enu.Taal,Korttekst:%String=""</FormalSpec>
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Taal:DOM.enu.Taal,Korttekst:%String="",HalffabItemsBoomOnHerwerkt:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom=""</FormalSpec>
 <ReturnType>DOM.PM.ProductLangtekst</ReturnType>
 <Implementation><![CDATA[
 	Set ..MATLangteksten = ##class(DOM.PM.impl.DataM.MATLangteksten).%New(IngegevenKenmerken, Taal)
-	quit ##super(IngegevenKenmerken,HalffabItemsBoom,Taal,Korttekst)
+	quit ##super(IngegevenKenmerken,HalffabItemsBoom,Taal,Korttekst, HalffabItemsBoomOnHerwerkt)
 ]]></Implementation>
 </Method>
 
Index: DOM/PM/impl/ProductAPI.cls.xml
===================================================================
diff -u -r62130 -r62134
--- DOM/PM/impl/ProductAPI.cls.xml	(.../ProductAPI.cls.xml)	(revision 62130)
+++ DOM/PM/impl/ProductAPI.cls.xml	(.../ProductAPI.cls.xml)	(revision 62134)
@@ -262,15 +262,10 @@
 	}
 	ElseIf (ProductSpecificatie.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade()) && (ProductSpecificatie.GeefVariant() =  ##class(DOM.PM.enu.LadeVariant).LBXPure())
 	{
-		Do ##class(TECH.Timing.TimerUtils).Start("DataMLBXLadeCreator")
 		Set ProductCreator = ##class(DOM.PM.impl.DataM.DataMLBXLadeCreator).%New(ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem, ProductData)
 		Set ProductID = ProductCreator.GeefPRNr()
-		Do ##class(TECH.Timing.TimerUtils).Stop()
-		
-		Do ##class(TECH.Timing.TimerUtils).Start("DataMBouwsteenCreator")
 		Set BouwsteenCreator = ##class(DOM.PM.impl.DataM.DataMBouwsteenCreator).%New()
 		Do BouwsteenCreator.Init(ProductID, ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)
-		Do ##class(TECH.Timing.TimerUtils).Stop()
 	}
 	ElseIf (ProductSpecificatie.GeefFamilie() = ##class(DOM.PM.enu.Familie).AluKader())
 	{
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>
Index: WS/AX/CalculatedProduct/CalculatedProductService.cls.xml
===================================================================
diff -u -r62130 -r62134
--- WS/AX/CalculatedProduct/CalculatedProductService.cls.xml	(.../CalculatedProductService.cls.xml)	(revision 62130)
+++ WS/AX/CalculatedProduct/CalculatedProductService.cls.xml	(.../CalculatedProductService.cls.xml)	(revision 62134)
@@ -50,18 +50,11 @@
 <Implementation><![CDATA[
 	Do ##class(vhLib.Logger).%New().Debug("GetCalculatedProductData IN HTML decoded",In)
 	
-	Do ##class(TECH.Timing.TimerUtils).EnableTiming("BomBolTraagheid")
-	
-	Do ##class(TECH.Timing.TimerUtils).Start("CalculatedProductService")
 	#dim GUID As %String = ..MessageManager.GenerateID()
 	#dim BOMBOLOutQuery As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdADUMsgBOMBOLOutQuery = ..XmlCorrelater.FromStream(In, ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdADUMsgBOMBOLOutQuery).%ClassName($$$True), "ADUMsgBOMBOLOutQuery")
 	#dim BOMBOLInQuery As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdADUMsgBOMBOLInQuery = ..Converter.Convert(BOMBOLOutQuery, GUID)
 	Set OutStream = ##class(TECH.XmlObjectUtils).GeefXMLStream(BOMBOLInQuery)
-	Do ##class(TECH.Timing.TimerUtils).Stop()	
 	
-	Do ##class(TECH.Timing.TimerUtils).DisableTiming()
-	Do ##class(TECH.Timing.TimerUtils).Flush()
-	
 	Quit OutStream
 ]]></Implementation>
 </Method>
Index: DOM/PM/impl/DataM/DataMProductCreator.cls.xml
===================================================================
diff -u -r62130 -r62134
--- DOM/PM/impl/DataM/DataMProductCreator.cls.xml	(.../DataMProductCreator.cls.xml)	(revision 62130)
+++ DOM/PM/impl/DataM/DataMProductCreator.cls.xml	(.../DataMProductCreator.cls.xml)	(revision 62134)
@@ -75,7 +75,6 @@
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	Do ##class(TECH.Timing.TimerUtils).Start("DataMProductCreator--tot voor Save")
 	Set ..LangtekstPieces = ##class(DOM.PM.impl.LangtekstBewaarderPieces).%New()
 	Set ..ProductSpecificatie = ProductSpecificatie
 	Set ..BerekeningsSpecificatie = BerekeningsSpecificatie
@@ -105,12 +104,8 @@
 	Do ..ZetVertaler()
 	Do ..BepaalLangtekst()
 	
-	Do ##class(TECH.Timing.TimerUtils).Stop()
-	
-	Do ##class(TECH.Timing.TimerUtils).Start("SaveEnGeefPRNr")
 	// Schrijf alle wijzigingen naar de global
 	Set ..PRNr = ..SaveEnGeefPRNr()
-	Do ##class(TECH.Timing.TimerUtils).Stop()
 	// Op het einde van de save worden bepaalde routines opgeroepen
 	// hierdoor is de data in ..ProductData out of sync.
 	// Indien ..ProductData toch nog gebruikt moet worden -> herladen vanuit de global
@@ -122,14 +117,12 @@
 <Method name="InitieerHalffabItemsBoomOnherwerkt">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do ##class(TECH.Timing.TimerUtils).Start("InitieerHalffabItemsBoomOnherwerkt")
 	#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(..ProductSpecificatie.GeefIngegevenKenmerken().GeefFamilie(), ..ProductSpecificatie.GeefIngegevenKenmerken().GeefVariant(), BerekeningSpecificatie)
 	#dim HalffabSpec As DOM.PM.Maatwerk.Calc.HF.HalffabSpec = HalffabContext.GeefHalffabSpec()
 	Do HalffabSpec.BerekenHalffabBerekeningDetails(HalffabContext, ..ProductSpecificatie.GeefIngegevenKenmerken())
 	set ..HalffabItemsBoomOnHerwerkt = HalffabContext.HalffabItemsBoom
-	Do ##class(TECH.Timing.TimerUtils).Stop()
 ]]></Implementation>
 </Method>
 
@@ -145,10 +138,8 @@
 <Private>1</Private>
 <ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[
-	Do ##class(TECH.Timing.TimerUtils).Start("GeefGenerischPRNr")
 	Set Bepaler = ##class(DOM.PM.Maatwerk.GenerischProductBepaler).%New()
 	#Dim GenerischPRNr As %Integer = Bepaler.GeefGenerischProductID(..ProductSpecificatie.GeefIngegevenKenmerken())
-	Do ##class(TECH.Timing.TimerUtils).Stop()
 	Quit GenerischPRNr
 ]]></Implementation>
 </Method>
@@ -164,7 +155,6 @@
 <FormalSpec>GenerischPRNr:%Integer</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do ##class(TECH.Timing.TimerUtils).Start("LaadTemplate")
 	#dim Sleutel As %String = $Order(^KPR(GenerischPRNr,""))
 	While ((Sleutel '= "") && $ISVALIDNUM(Sleutel)) {
 		Do ..ProductData.SetAt(^KPR(GenerischPRNr,Sleutel),Sleutel)
@@ -175,14 +165,12 @@
 	#dim i As %String = ""
 	For i="I","J" Do ..ProductData.SetAt(^KPR(GenerischPRNr,$Order(^KPR(GenerischPRNr,i))),i)
 	Do ..ZetWaarde(0,3,GenerischPRNr)
-	Do ##class(TECH.Timing.TimerUtils).Stop()
 ]]></Implementation>
 </Method>
 
 <Method name="KuisOpTemplate">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do ##class(TECH.Timing.TimerUtils).Start("KuisOpTemplate")
 	// Ligging,Beginstock,FysStock,,Laatste beweging, Bestelling, Schaduwkorttekst, Schaduw sectie, Omschrijving N1, Omschrijving N2
 	#dim i As %Integer
 	For i=6,12,13,14,16,17,20,21,2,11 Do ..ZetWaarde(0,i,"")
@@ -200,7 +188,6 @@
 	Do ..ZetWaarde("J",10,20) ; KSDB%
 	
 	Do ..KuisOpLangtekstPiecesVanTemplate()
-	Do ##class(TECH.Timing.TimerUtils).Stop()
 ]]></Implementation>
 </Method>
 
@@ -226,7 +213,6 @@
 <Method name="VulTemplate">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do ##class(TECH.Timing.TimerUtils).Start("VulTemplate")
 	#dim DossierNummer As %String = ..DossierNummer
 	
 	Do ..ProductData.SetAt("","G")
@@ -254,22 +240,19 @@
  	// Zie kpcFILL() method in Prod.GAData.Product.tmpKPRCreate.MAC
  	// 
  	//  Set $P(NewRec("G"),"\",13)=..%Id() // id van de GAData
- 	Do ##class(TECH.Timing.TimerUtils).Stop()
 ]]></Implementation>
 </Method>
 
 <Method name="ZetClassificatie">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do ##class(TECH.Timing.TimerUtils).Start("ZetClassificatie")
 	#dim Classificatie As %Integer = ..GeefClassificatie()
 	If (Classificatie '= "") {
 		Do ..ZetWaarde("I",1,$$GETSORT^KLASS(Classificatie,1))
 		Do ..ZetWaarde("I",2,$$GETSORT^KLASS(Classificatie,2))
 		Do ..ZetWaarde("I",3,$$GETSORT^KLASS(Classificatie,3))
 		Do ..ZetWaarde("I",4,Classificatie)
 	}
-	Do ##class(TECH.Timing.TimerUtils).Stop()
 ]]></Implementation>
 </Method>
 
@@ -366,15 +349,13 @@
 <Method name="BepaalLangtekst">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do ##class(TECH.Timing.TimerUtils).Start("BepaalLangtekst")
 	// Posities die nodig zijn voor de langtekst in een array steken
 	Do ..BuildLangtekstPosities()
 	Do ..VulLangtekst("N", ..GeefLangtekst(##class(DOM.enu.Taal).Nederlands()))
 	Do ..VulLangtekst("F", ..GeefLangtekst(##class(DOM.enu.Taal).Frans()))
 	Do ..VulLangtekst("D", ..GeefLangtekst(##class(DOM.enu.Taal).Duits()))
 	Do ..VulLangtekst("E", ..GeefLangtekst(##class(DOM.enu.Taal).Engels()))
 	Do ..VulLangtekst("BR", ..GeefLangtekst(##class(DOM.enu.Taal).Nederlands()))
-	Do ##class(TECH.Timing.TimerUtils).Stop()
 ]]></Implementation>
 </Method>
 
Index: DOM/PM/impl/MATBasisLangtekstCreator.cls.xml
===================================================================
diff -u -r29059 -r62134
--- DOM/PM/impl/MATBasisLangtekstCreator.cls.xml	(.../MATBasisLangtekstCreator.cls.xml)	(revision 29059)
+++ DOM/PM/impl/MATBasisLangtekstCreator.cls.xml	(.../MATBasisLangtekstCreator.cls.xml)	(revision 62134)
@@ -8,11 +8,11 @@
 </Property>
 
 <Method name="GeefLangtekst">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Taal:DOM.enu.Taal</FormalSpec>
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Taal:DOM.enu.Taal,Korttekst:%String="",HalffabItemsBoomOnHerwerkt:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom=""</FormalSpec>
 <ReturnType>DOM.PM.ProductLangtekst</ReturnType>
 <Implementation><![CDATA[
 	Set ..MATLangteksten = ##class(DOM.PM.impl.DataM.MATLangteksten).%New(IngegevenKenmerken, Taal)
-	quit ##super(IngegevenKenmerken,HalffabItemsBoom,Taal)
+	quit ##super(IngegevenKenmerken,HalffabItemsBoom,Taal,, HalffabItemsBoomOnHerwerkt)
 ]]></Implementation>
 </Method>