Index: vhUnitTest/DOM/PM/impl/MaatwerkLangtekstCreator/Test.cls.xml
===================================================================
diff -u -r62134 -r62175
--- vhUnitTest/DOM/PM/impl/MaatwerkLangtekstCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 62134)
+++ vhUnitTest/DOM/PM/impl/MaatwerkLangtekstCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 62175)
@@ -44,23 +44,12 @@
  	
 	Set ..Kenmerken = ..GeefKenmerken()
 	Set ..HalffabItemsBoom = ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI().GeefHalffabItemsBoom(..Kenmerken)
-	Do ..InitieerHalffabItemsBoomOnherwerkt()
+	Set HalffabItemsBoomOnherwerktBepaler = ##class(DOM.PM.impl.HalffabItemsBoomOnherwerktBepaler).%New()
+	Set ..HalffabItemsBoomOnHerwerkt = HalffabItemsBoomOnherwerktBepaler.InitieerHalffabItemsBoomOnherwerkt(..Kenmerken)
 	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(),, ..HalffabItemsBoomOnHerwerkt)