Index: vhUnitTest/End2End/TBX/BouwsteenCreatie/Test.cls.xml
===================================================================
diff -u -r65420 -r65428
--- vhUnitTest/End2End/TBX/BouwsteenCreatie/Test.cls.xml	(.../Test.cls.xml)	(revision 65420)
+++ vhUnitTest/End2End/TBX/BouwsteenCreatie/Test.cls.xml	(.../Test.cls.xml)	(revision 65428)
@@ -3,6 +3,11 @@
 <Class name="vhUnitTest.End2End.TBX.BouwsteenCreatie.Test">
 <Super>vhUnitTest.DOM.PM.Maatwerk.TBX.Base</Super>
 
+<Parameter name="Type">
+<Type>%String</Type>
+<Default>IntegratieTest</Default>
+</Parameter>
+
 <Method name="TestStandaardLade">
 <Implementation><![CDATA[
 	#dim TBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).StandaardLadeVoorHerwerkingBOMBOL()
@@ -106,19 +111,18 @@
 <FormalSpec>TbxKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken,Omschrijving:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim PRNr As %String = 775965
+	#dim PRNr As %String = 1000
 	
 	Do ##class(vhUnitTest.DOM.PM.TestData).%New().VerwijderTestData(PRNr,PRNr)
-	Do ##class(vhUnitTest.DOM.PM.TestData).%New().CreeerTestData(PRNr,PRNr)
 	
 	
 	#dim ProductDataService As vhTest.Utils.DOM.PM.Maatwerk.ProductDataService = ##class(vhTest.Utils.DOM.PM.Maatwerk.ProductDataService).%New() 	
-	Do ProductDataService.MaakProduct(TbxKenmerken, PRNr, "A3YD")
+	Do ProductDataService.MaakProduct(TbxKenmerken, PRNr, "AAAA")
 	
-	#dim PRBS As TECH.MultiDim
-	Merge PRBS = ^PRBS("BS",PRNr)
+	#dim mdPRBS As TECH.MultiDim
+	Merge mdPRBS = ^PRBS("BS",PRNr)
 	
-	Do ..DataExporteerder.ExporteerMultiDim(.PRBS,Omschrijving)
+	Do ..DataExporteerder.ExporteerMultiDim(.mdPRBS,Omschrijving)
 	
 	Do ##class(vhUnitTest.DOM.PM.TestData).%New().VerwijderTestData(PRNr,PRNr)
 ]]></Implementation>