Index: zTryout/CSC/PM/Maatwerk/HF/IntegratieTest.cls.xml
===================================================================
diff -u -r822 -r946
--- zTryout/CSC/PM/Maatwerk/HF/IntegratieTest.cls.xml	(.../IntegratieTest.cls.xml)	(revision 822)
+++ zTryout/CSC/PM/Maatwerk/HF/IntegratieTest.cls.xml	(.../IntegratieTest.cls.xml)	(revision 946)
@@ -1,22 +1,23 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-02-04 13:26:11">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-03-21 13:40:22">
 <Class name="zTryout.CSC.PM.Maatwerk.HF.IntegratieTest">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
-<TimeChanged>62126,48416.228961</TimeChanged>
+<TimeChanged>62171,49305.163974</TimeChanged>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="MaakProductTBXIntivo">
 <Description>
-Do ##class(zTryout.CSC.PM.Maatwerk.HF.IntegratieTest).MaakProductTBXIntivo()</Description>
+Set HFItemsBoom = ##class(zTryout.CSC.PM.Maatwerk.HF.IntegratieTest).MaakProductTBXIntivo()</Description>
 <ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
 <Implementation><![CDATA[
 	Set Start = $ZU(188)
 	
 	Set Familie=##class(DOM.PM.enu.Familie).Lade()
 	Set Variant=##class(DOM.PM.enu.LadeVariant).TBXIntivo()
 	
-	Set KlantID = 1000
+	Set KlantID = 7587
 	Set Personality = ##class(DOM.common.VanHoeckePersonality).Instance()
 	Set BerekeningsSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%New(1,KlantID,Personality)
 	Set Context=##class(DOM.PM.Maatwerk.Calc.HF.HalffabContext).%New(Familie,Variant,BerekeningsSpecificatie)
@@ -31,7 +32,7 @@
 	
 	Set KostContext = ##class(DOM.PM.Maatwerk.Calc.Kost.KostContext).%New(Familie, Variant, BerekeningsSpecificatie)
 	
-	Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom)
+	Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom,IngegevenKenmerken)
 	Set KostItemWriterVisitor = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.KostItemWriterVisitor).%New()
 	
 	Set ProductSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%New(Familie, Variant, IngegevenKenmerken)
@@ -58,6 +59,8 @@
 	w "BerekeningsSpecificatie: "_Product.GeefBerekeningsSpecificatie().%Id(),!!
 	
 	w (($Piece(Stop,",",2)-$Piece(Start,",",2))*1000)_"ms"
+	
+	Quit HalffabItemsBoom
 ]]></Implementation>
 </Method>
 
@@ -71,7 +74,7 @@
 	Set Familie=##class(DOM.PM.enu.Familie).AluKader()
 	Set Variant=##class(DOM.PM.enu.AluKaderVariant).Basis()
 	
-	Set KlantID = 1000
+	Set KlantID = 7587
 	Set Personality = ##class(DOM.common.VanHoeckePersonality).Instance()
 	Set BerekeningsSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%New(1,KlantID,Personality)
 	Set Context=##class(DOM.PM.Maatwerk.Calc.HF.HalffabContext).%New(Familie,Variant,BerekeningsSpecificatie)
@@ -86,7 +89,7 @@
 	
 	Set KostContext = ##class(DOM.PM.Maatwerk.Calc.Kost.KostContext).%New(Familie, Variant, BerekeningsSpecificatie)
 	
-	Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom)
+	Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom,IngegevenKenmerken)
 	Set KostItemWriterVisitor = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.KostItemWriterVisitor).%New()
 	
 	Set ProductSpecificatie = ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%New(Familie, Variant, IngegevenKenmerken)
@@ -140,7 +143,7 @@
 	
 	Set KostContext = ##class(DOM.PM.Maatwerk.Calc.Kost.KostContext).%New(Familie, Variant, BerekeningsSpecificatie)
 	
-	Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom)
+	Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom,IngegevenKenmerken)
 	Set KostItemWriterVisitor = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.KostItemWriterVisitor).%New()
 	
 	Set Stop = $ZU(188)
@@ -160,7 +163,7 @@
 	{
 		Set Start = $ZU(188)
 		Do Context.GeefHalffabSpec().BerekenHalffabDetails(Context,IngegevenKenmerken)
-		Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom)
+		Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom,IngegevenKenmerken)
 		Set Stop = $ZU(188)
 		w (($Piece(Stop,",",2)-$Piece(Start,",",2))*1000)_"ms",!
 	}
@@ -192,7 +195,7 @@
 	
 	Set KostContext = ##class(DOM.PM.Maatwerk.Calc.Kost.KostContext).%New(Familie, Variant, BerekeningsSpecificatie)
 	
-	Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom)
+	Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom,IngegevenKenmerken)
 	Set KostItemWriterVisitor = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.KostItemWriterVisitor).%New()
 	
 	Set Stop = $ZU(188)
@@ -212,12 +215,12 @@
 	{
 		Set Start = $ZU(188)
 		Do Context.GeefHalffabSpec().BerekenHalffabDetails(Context,IngegevenKenmerken)
-		Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom)
+		Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom,IngegevenKenmerken)
 		Set Stop = $ZU(188)
 		w (($Piece(Stop,",",2)-$Piece(Start,",",2))*1000)_"ms",!
 	}
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="436087583"/>
+<Checksum value="2028571002"/>
 </Export>