Index: vhUnitTest/DOM/common/impl/TestcommonAPI.cls.xml
===================================================================
diff -u -r29059 -r40249
--- vhUnitTest/DOM/common/impl/TestcommonAPI.cls.xml	(.../TestcommonAPI.cls.xml)	(revision 29059)
+++ vhUnitTest/DOM/common/impl/TestcommonAPI.cls.xml	(.../TestcommonAPI.cls.xml)	(revision 40249)
@@ -8,27 +8,19 @@
 </Parameter>
 
 <Method name="OnBeforeAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	do ##super()
 	do ..VerwijderData()
- 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="OnAfterAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	do ##super()
 	do ..VerwijderData()
- 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
-<Method name="VerwijderData">
-<Private>1</Private>
-<Implementation><![CDATA[	do ExecDynQuery^vhLib.Query("DELETE FROM DOM_common_impl.LogItem WHERE OnderwerpType = ?",$listbuild(..#OnderwerpType))
-]]></Implementation>
-</Method>
-
 <Method name="Test">
 <Implementation><![CDATA[
 	#dim OnderwerpType As %String = "vhUnitTest"
@@ -47,6 +39,12 @@
 	do $$$AssertEquals(Log.GetAt(3).GeefOmschrijving(),"Item 1")
 ]]></Implementation>
 </Method>
+
+<Method name="VerwijderData">
+<Private>1</Private>
+<Implementation><![CDATA[	do ExecDynQuery^vhLib.Query("DELETE FROM DOM_common_impl.LogItem WHERE OnderwerpType = ?",$listbuild(..#OnderwerpType))
+]]></Implementation>
+</Method>
 </Class>