Index: vhUnitTest/APPS/Halux/Afmelden/ProductieAfmeldenService/Controle/TestControleStaanProductenZelfdeOrderOpDragerUPRCP.cls.xml
===================================================================
diff -u -r29059 -r40228
--- vhUnitTest/APPS/Halux/Afmelden/ProductieAfmeldenService/Controle/TestControleStaanProductenZelfdeOrderOpDragerUPRCP.cls.xml	(.../TestControleStaanProductenZelfdeOrderOpDragerUPRCP.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/Halux/Afmelden/ProductieAfmeldenService/Controle/TestControleStaanProductenZelfdeOrderOpDragerUPRCP.cls.xml	(.../TestControleStaanProductenZelfdeOrderOpDragerUPRCP.cls.xml)	(revision 40228)
@@ -10,8 +10,8 @@
 </Property>
 
 <Method name="OnBeforeAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	Do ##super()
 	Do ..CleanUp()
 	
 	Set ..Sessie = ##class(APPS.algemeen.VhintraShell.impl.Sessie).%New(1000)
@@ -69,19 +69,16 @@
 	
 	do ##class(vhUnitTest.EventHelper).RaiseToeleveringGemaaktEvents(999994)
 	do ##class(vhUnitTest.EventHelper).RaiseToeleveringGemaaktEvents(298106)
-	
-	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="OnAfterAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Do ..Sessie.Delete()
 	
 	Do ..CleanUp()
 		
-	Quit $$$OK
+	Do ##super()
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/Halux/Afmelden/ProductieAfmeldenService/Controle/TestControleStaanProductenZelfdeOrderOpDragerEWMS.cls.xml
===================================================================
diff -u -r29059 -r40228
--- vhUnitTest/APPS/Halux/Afmelden/ProductieAfmeldenService/Controle/TestControleStaanProductenZelfdeOrderOpDragerEWMS.cls.xml	(.../TestControleStaanProductenZelfdeOrderOpDragerEWMS.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/Halux/Afmelden/ProductieAfmeldenService/Controle/TestControleStaanProductenZelfdeOrderOpDragerEWMS.cls.xml	(.../TestControleStaanProductenZelfdeOrderOpDragerEWMS.cls.xml)	(revision 40228)
@@ -10,8 +10,8 @@
 </Property>
 
 <Method name="OnBeforeAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	Do ##super()
 	Set ..Sessie = ##class(APPS.algemeen.VhintraShell.impl.Sessie).%New(1000)
 	Do ..Sessie.Save()	
 	Do ##class(TECH.Context.RuntimeContext).Instance().ZetSessieID(..Sessie.GeefSessieSleutel())
@@ -47,18 +47,16 @@
 	Set ^KTO(6332,298106,4)=3
 	Set ^KTO(6332,298106,101)="\620937\1\\\46.16\#\\46.16\46.16\\L\1\\100\46.16\KTRPL\\\\E\EUR\\\11/11\\123352\101\\\\\\\\"
 	do ##class(vhUnitTest.DataHelper).MaakToeleveringCompleet(6332,298106)
-	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="OnAfterAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Do ..Sessie.Delete()
 	
 	Do ..CleanUp()
 	
-	Quit $$$OK
+	Do ##super()
 ]]></Implementation>
 </Method>