Index: vhUnitTest/APPS/PM/BulkActie/TestWijzigStocktype.cls.xml
===================================================================
diff -u -r29059 -r40172
--- vhUnitTest/APPS/PM/BulkActie/TestWijzigStocktype.cls.xml	(.../TestWijzigStocktype.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/PM/BulkActie/TestWijzigStocktype.cls.xml	(.../TestWijzigStocktype.cls.xml)	(revision 40172)
@@ -5,6 +5,20 @@
 Do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","APPS.PM.BulkActie.TestWijzigStocktype")</Description>
 <Super>vhUnitTest.TestCase</Super>
 
+<Method name="OnBeforeAllTests">
+<Implementation><![CDATA[
+	do ##super()
+	do ##class(vhUnitTest.DOM.PM.TestData).%New().CreeerTestData(1001,1001)
+]]></Implementation>
+</Method>
+
+<Method name="OnAfterAllTests">
+<Implementation><![CDATA[
+	do ##class(vhUnitTest.DOM.PM.TestData).%New().VerwijderTestData(1001,1001)
+	do ##super()
+]]></Implementation>
+</Method>
+
 <Method name="TestValideer">
 <Implementation><![CDATA[
 	do ..Valideer(##class(APPS.PM.BulkActie.enu.StockType).Stock(),##class(DOM.PM.enu.StockType).Stock())
@@ -53,22 +67,6 @@
 	do $$$AssertEquals(Product.GeefStockType(),StockTypeOutput,"waarde in product ok")
 ]]></Implementation>
 </Method>
-
-<Method name="OnAfterAllTests">
-<ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[
-	do ##class(vhUnitTest.DOM.PM.TestData).%New().VerwijderTestData(1001,1001)
-	Quit $$$OK
-]]></Implementation>
-</Method>
-
-<Method name="OnBeforeAllTests">
-<ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[
-	do ##class(vhUnitTest.DOM.PM.TestData).%New().CreeerTestData(1001,1001)
- 	Quit $$$OK
-]]></Implementation>
-</Method>
 </Class>