Index: zTryout/CSC/PM/Maatwerk/HF/IntegratieTest.cls.xml
===================================================================
diff -u -r734 -r822
--- zTryout/CSC/PM/Maatwerk/HF/IntegratieTest.cls.xml	(.../IntegratieTest.cls.xml)	(revision 734)
+++ zTryout/CSC/PM/Maatwerk/HF/IntegratieTest.cls.xml	(.../IntegratieTest.cls.xml)	(revision 822)
@@ -1,16 +1,18 @@
 <?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-01-27 17:01:17">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-02-04 13:26:11">
 <Class name="zTryout.CSC.PM.Maatwerk.HF.IntegratieTest">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
-<TimeChanged>62118,54293.004532</TimeChanged>
+<TimeChanged>62126,48416.228961</TimeChanged>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="MaakProductTBXIntivo">
 <Description>
 Do ##class(zTryout.CSC.PM.Maatwerk.HF.IntegratieTest).MaakProductTBXIntivo()</Description>
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
+	Set Start = $ZU(188)
+	
 	Set Familie=##class(DOM.PM.enu.Familie).Lade()
 	Set Variant=##class(DOM.PM.enu.LadeVariant).TBXIntivo()
 	
@@ -37,6 +39,8 @@
 	Set ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI()
 	Set Product = ProductAPI.MaakProduct(ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)
 	
+	Set Stop = $ZU(188)
+	
 	write !
 	Do HalffabItems.Accept(WriterVisitor)
 	write !
@@ -49,7 +53,11 @@
 	w "-----------------------",!
 	w "PRNr: "_Product.GeefPRNr(),!
 	w "Korttekst: "_Product.GeefKorttekst(),!
-	w "DossierNr: #"_Product.GeefDossierNr(),!!
+	w "DossierNr: #"_Product.GeefDossierNr(),!
+	w "ProductSpecificatie: "_Product.GeefProductSpecificatie().%Id(),!
+	w "BerekeningsSpecificatie: "_Product.GeefBerekeningsSpecificatie().%Id(),!!
+	
+	w (($Piece(Stop,",",2)-$Piece(Start,",",2))*1000)_"ms"
 ]]></Implementation>
 </Method>
 
@@ -58,6 +66,8 @@
 Do ##class(zTryout.CSC.PM.Maatwerk.HF.IntegratieTest).MaakProductKaderdeur()</Description>
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
+	Set Start = $ZU(188)
+	
 	Set Familie=##class(DOM.PM.enu.Familie).AluKader()
 	Set Variant=##class(DOM.PM.enu.AluKaderVariant).Basis()
 	
@@ -84,6 +94,8 @@
 	Set ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI()
 	Set Product = ProductAPI.MaakProduct(ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)
 	
+	Set Stop = $ZU(188)
+	
 	write !
 	Do HalffabItems.Accept(WriterVisitor)
 	write !
@@ -96,7 +108,11 @@
 	w "-----------------------",!
 	w "PRNr: "_Product.GeefPRNr(),!
 	w "Korttekst: "_Product.GeefKorttekst(),!
-	w "DossierNr: #"_Product.GeefDossierNr(),!!
+	w "DossierNr: #"_Product.GeefDossierNr(),!
+	w "ProductSpecificatie: "_Product.GeefProductSpecificatie().%Id(),!
+	w "BerekeningsSpecificatie: "_Product.GeefBerekeningsSpecificatie().%Id(),!!
+	
+	w (($Piece(Stop,",",2)-$Piece(Start,",",2))*1000)_"ms"
 ]]></Implementation>
 </Method>
 
@@ -203,5 +219,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="783939552"/>
+<Checksum value="436087583"/>
 </Export>