Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Common/Aansturing/TestBase.cls.xml
===================================================================
diff -u -r73026 -r73429
--- vhTest/Integratie/Productie/Planning/ActieveBatches/Common/Aansturing/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 73026)
+++ vhTest/Integratie/Productie/Planning/ActieveBatches/Common/Aansturing/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 73429)
@@ -121,7 +121,7 @@
 	Do ##super(aTestCase)
 	Do ##class(APPS.Halux.PPS.Activiteit.impl.TBX.KlantEtiketIoCContainer).Instance().Reset()
 	
-	Do ..VhConfigRepository.VerwijderTestData()
+	Do ..VerwijderGemaakteProducten()
 ]]></Implementation>
 </Method>
 
@@ -423,6 +423,22 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwijderGemaakteProducten">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim ProductIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(..Producten)
+	
+	While (ProductIterator.HasNext()) {
+		#dim Product As DOM.PM.Product = ProductIterator.Next()	
+		#dim ProductId As %String = Product.GeefID()
+		
+		Do ..ProductDataService.VerwijderProduct()
+	}
+	
+	Do ..VhConfigRepository.VerwijderTestData()
+]]></Implementation>
+</Method>
+
 <Method name="GeefOBJTIdentLookupService">
 <Private>1</Private>
 <ReturnType>OBJTimpl.PM.OBJTIdentLookupService</ReturnType>