Index: vhUnitTest/APPS/Halux/Afmelden/ProductieAfmeldenService/TestWisselToeleveringTijdensAfmelden.cls.xml
===================================================================
diff -u -r29059 -r40267
--- vhUnitTest/APPS/Halux/Afmelden/ProductieAfmeldenService/TestWisselToeleveringTijdensAfmelden.cls.xml	(.../TestWisselToeleveringTijdensAfmelden.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/Halux/Afmelden/ProductieAfmeldenService/TestWisselToeleveringTijdensAfmelden.cls.xml	(.../TestWisselToeleveringTijdensAfmelden.cls.xml)	(revision 40267)
@@ -1,21 +1,21 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.APPS.Halux.Afmelden.ProductieAfmeldenService.TestWisselToeleveringTijdensAfmelden">
-<Description>
-Do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","APPS.Halux.Afmelden.ProductieAfmeldenService.TestWisselToeleveringTijdensAfmelden")</Description>
 <Super>vhUnitTest.TestCase</Super>
 
 <Property name="Sessie">
 <Type>APPS.algemeen.VhintraShell.impl.Sessie</Type>
+<Private>1</Private>
 </Property>
 
 <Parameter name="GebruiktVariabeleControle">
 <Default>0</Default>
 </Parameter>
 
 <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())
@@ -57,13 +57,10 @@
 	
 	Set ^HADPR("F","298105;100","K") = "33\62038,59594\\\\\\\\\\"
 	Set ^HADPR("F","298105;100","F") = "33\62094,58737\A\\\\\\\\\"
-
-	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="OnAfterAllTests">
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Do ..Sessie.Delete()
 	
@@ -78,7 +75,7 @@
 	&SQL(DELETE "EWMS"."Inventory" where loc_id = '0000TBSE')
 	&SQL(DELETE "EWMS"."Locations" where Loc_id = '0000TBSE')
 	
-	Quit $$$OK
+	Do ##super()
 ]]></Implementation>
 </Method>