Index: vhUnitTest/APPS/Halux/Voorbereiding/TestVoorbereidingService.cls.xml
===================================================================
diff -u -r29059 -r40190
--- vhUnitTest/APPS/Halux/Voorbereiding/TestVoorbereidingService.cls.xml	(.../TestVoorbereidingService.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/Halux/Voorbereiding/TestVoorbereidingService.cls.xml	(.../TestVoorbereidingService.cls.xml)	(revision 40190)
@@ -6,8 +6,8 @@
 <Super>vhUnitTest.TestCase</Super>
 
 <Method name="OnBeforeAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	Do ##super()
 	Set ^KO2("F",1000,123346) = ""
 	Set ^KO1(123346,"F") = "1000\"
 	
@@ -30,12 +30,10 @@
 	
 	Set ^HADPR("F","298104;100","K") = "33\62038,59594\\\\\\\\\\"
 	Set ^HADPR("F","298104;100","F") = "33\62094,58737\A\\\\\\\\\"
-	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="OnAfterAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Kill ^KO2("F",1000,123346)
 	Kill ^KO1(123346,"F")
@@ -45,8 +43,7 @@
 	Kill ^KTO1(298104)
 	Kill ^KTO(6332,298104)
 	
-	
-	Quit $$$OK
+	Do ##super()
 ]]></Implementation>
 </Method>