Index: vhUnitTest/BL/PPS/TBX/TestDocs.cls.xml
===================================================================
diff -u -r29059 -r40261
--- vhUnitTest/BL/PPS/TBX/TestDocs.cls.xml	(.../TestDocs.cls.xml)	(revision 29059)
+++ vhUnitTest/BL/PPS/TBX/TestDocs.cls.xml	(.../TestDocs.cls.xml)	(revision 40261)
@@ -31,6 +31,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="OnAfterAllTests">
+<Implementation><![CDATA[
+	Do ..CleanUp()
+	do ##super()
+]]></Implementation>
+</Method>
+
 <Method name="TestGlasSnijLijst001">
 <Implementation><![CDATA[
 	#dim Product As DOM.PM.Product = ..ProductAPI.GeefProduct(1000)
@@ -223,17 +230,13 @@
 </Method>
 
 <Method name="CleanUp">
+<Private>1</Private>
 <Implementation><![CDATA[
 	Kill ^KPR(1000)
 	Kill ^KPR(1001)
 	Kill ^KPR(1002)
 ]]></Implementation>
 </Method>
-
-<Method name="OnAfterAllTests">
-<Implementation><![CDATA[	Do ..CleanUp()
-]]></Implementation>
-</Method>
 </Class>