Index: vhUnitTest/APPS/PM/Kenmerk/TestMogelijkeWaarden.cls.xml
===================================================================
diff -u -r33032 -r40171
--- vhUnitTest/APPS/PM/Kenmerk/TestMogelijkeWaarden.cls.xml	(.../TestMogelijkeWaarden.cls.xml)	(revision 33032)
+++ vhUnitTest/APPS/PM/Kenmerk/TestMogelijkeWaarden.cls.xml	(.../TestMogelijkeWaarden.cls.xml)	(revision 40171)
@@ -4,22 +4,19 @@
 <Super>vhUnitTest.TestCase</Super>
 
 <Method name="OnBeforeAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	Do ##super()
 	Do ##class(vhUnitTest.DOM.PM.TestData).%New().CreeerTestData(1000,1000)
 	
 	Do ##class(TECH.Config.ConfigMgr).Instance().SetBoolean("APPS.PM.Kenmerk.MogelijkeWaarden.InclusiefReedsIngevulde",0,..#Applicatie)
 	
 	Set RepositoryManager = ##class(APPS.PM.Kenmerk.MogelijkeWaardenManager).%New()
 	Set Repository = ##class(vhUnitTest.APPS.PM.Kenmerk.UnitTestMogelijkeWaardenRepository).%New()
 	Do RepositoryManager.RegistreerMogelijkeWaardenRepository(Repository)
-	
- 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="OnAfterAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Set RepositoryManager = ##class(APPS.PM.Kenmerk.MogelijkeWaardenManager).%New()
 	
@@ -32,7 +29,7 @@
 	
 	Do ##class(vhUnitTest.DOM.PM.TestData).%New().VerwijderTestData(1000,1000)
 	
-	Quit $$$OK
+	Do ##super()
 ]]></Implementation>
 </Method>