Index: APPS/Halux/Planning/impl/EventCatcher.cls.xml
===================================================================
diff -u -r954 -r994
--- APPS/Halux/Planning/impl/EventCatcher.cls.xml	(.../EventCatcher.cls.xml)	(revision 954)
+++ APPS/Halux/Planning/impl/EventCatcher.cls.xml	(.../EventCatcher.cls.xml)	(revision 994)
@@ -1,9 +1,9 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-03-25 10:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-03-28 08:01:47">
 <Class name="APPS.Halux.Planning.impl.EventCatcher">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
-<TimeChanged>62175,36153.948292</TimeChanged>
+<TimeChanged>62178,28907.368431</TimeChanged>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="InitSubscriptions">
@@ -55,11 +55,9 @@
 <FormalSpec>Event:TECH.Events.ToeleveringDeletedEvent</FormalSpec>
 <Implementation><![CDATA[
 	Set ToeleveringsNummer = Event.Data.ToeleveringNummer
-	Do ##class(APPS.Halux.Planning.impl.ToeleveringInfo).%DeleteId(ToeleveringsNummer)
-	//&SQL(DELETE FROM APPS_Halux_Planning_impl.PlanningDataItem WHERE ToeleveringsNummer = :ToeleveringsNummer)
-	//&SQL(DELETE FROM APPS_Halux_Planning_impl.ExplicietePlanning WHERE ToeleveringsNummer = :ToeleveringsNummer)
+	&SQL(DELETE FROM APPS_Halux_Planning_impl.ToeleveringInfo WHERE ToeleveringNummer = :ToeleveringsNummer)
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="4149618244"/>
+<Checksum value="1857567287"/>
 </Export>