Index: vhUnitTest/APPS/Halux/Planning/TestEventCatcher.cls.xml
===================================================================
diff -u -r1397 -r3526
--- vhUnitTest/APPS/Halux/Planning/TestEventCatcher.cls.xml	(.../TestEventCatcher.cls.xml)	(revision 1397)
+++ vhUnitTest/APPS/Halux/Planning/TestEventCatcher.cls.xml	(.../TestEventCatcher.cls.xml)	(revision 3526)
@@ -15,15 +15,27 @@
 	Set ^KTO1(296195)="6332\"
 	
 	Set ^KTO(6332,296195,0)=103
-	Set ^KTO(6332,296195,1)="\02.02.11\KOMM. OPTIMA PACK\\\6332\118153\6279\\\\\\\\\\EUR\62137,43200\\\2\\\\"
+	Set ^KTO(6332,296195,1)="\02.02.11\KOMM. OPTIMA PACK\\\6332\\6279\\\\\\\\\\EUR\62137,43200\\\2\\\\"
 	Set ^KTO(6332,296195,4)=2
-	Set ^KTO(6332,296195,101)="\629192\1\\\47.68\#\\47.68\47.68\\L\1\\100\47.68\KTRPL\\\\E\EUR\\\11/06\\118153\101\\\\\\\\"
-	Set ^KTO(6332,296195,102)="\629192\1\\\47.68\#\\47.68\47.68\\L\1\\100\47.68\KTRPL\\\\E\EUR\\\11/06\\118153\102\\\\\\\\"
+	Set ^KTO(6332,296195,101)="\629192\1\\\47.68\#\\47.68\47.68\\L\1\\100\47.68\KTRPL\\\\E\EUR\\\11/06\\\101\\\\\\\\"
+	Set ^KTO(6332,296195,102)="\629192\1\\\47.68\#\\47.68\47.68\\L\1\\100\47.68\KTRPL\\\\E\EUR\\\11/06\\\102\\\\\\\\"
 	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
+<Method name="OnAfterAllTests">
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Do ##super()
+	
+	Kill ^KTO(6332,296195)
+	Kill ^KTO1(296195)
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="TestEvents">
 <Implementation><![CDATA[
 	Set ToeleveringsNummer = 296195
@@ -41,7 +53,7 @@
 	Do $$$AssertTrue(Bestaat,"Het data item voor de planning werd bewaard")
 	
 	Set NieuweDueOut = "62136,43200"
-	Set ^KTO(6332,296195,1)="\02.02.11\KOMM. OPTIMA PACK\\\6332\118153\6279\\\\\\\\\\EUR\"_NieuweDueOut_"\\\2\\\\"
+	Set ^KTO(6332,296195,1)="\02.02.11\KOMM. OPTIMA PACK\\\6332\\6279\\\\\\\\\\EUR\"_NieuweDueOut_"\\\2\\\\"
 	
 	Set Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(ToeleveringsNummer)
  	Set ToeleveringModifiedEventData = ##class(TECH.Events.ToeleveringModifiedEventData).%New(Toelevering)