Index: APPS/Halux/Planning/impl/EventCatcher.cls.xml
===================================================================
diff -u -r994 -r1019
--- APPS/Halux/Planning/impl/EventCatcher.cls.xml	(.../EventCatcher.cls.xml)	(revision 994)
+++ APPS/Halux/Planning/impl/EventCatcher.cls.xml	(.../EventCatcher.cls.xml)	(revision 1019)
@@ -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-28 08:01:47">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-04-19 15:46:17">
 <Class name="APPS.Halux.Planning.impl.EventCatcher">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
-<TimeChanged>62178,28907.368431</TimeChanged>
+<TimeChanged>62200,56792.879302</TimeChanged>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="InitSubscriptions">
@@ -30,7 +30,7 @@
 		Set Calculator = ##class(APPS.Halux.Planning.impl.ResourceGebruikCalculator).%New(Toelevering)
 		Set ToeleveringInfo = Calculator.BerekenToeleveringInfo()
 		Set Status = ToeleveringInfo.%Save()
-		If ($$$ISERR(Status)) { Do ##class(vhLib.Logger).%New("Halux planningstool").Error("Aangemaakte ToeleveringInfo object kon niet gesaved worden!","Toelevering: "_Toelevering.GeefToeNr()_$c(10)_$c(13)_"Status: "_$$ParseStatus^vhLib(Status)) }
+		If ($$$ISERR(Status)) { Do ##class(vhLib.Logger).%New("Halux planningstool").Error("Aangemaakte ToeleveringInfo object kon niet gesaved worden!","Toelevering: "_Toelevering.GeefToeNr()_$C(13,10)_"Status: "_$$ParseStatus^vhLib(Status)) }
 	}
 ]]></Implementation>
 </Method>
@@ -45,7 +45,7 @@
 		Set Calculator = ##class(APPS.Halux.Planning.impl.ResourceGebruikCalculator).%New(Toelevering)
 		Set ToeleveringInfo = Calculator.BerekenToeleveringInfo()
 		Set Status = ToeleveringInfo.%Save()
-		If ($$$ISERR(Status)) { Do ##class(vhLib.Logger).%New("Halux planningstool").Error("Gewijzigde ToeleveringInfo object kon niet gesaved worden!","Toelevering: "_Toelevering.GeefToeNr()_$c(10)_$c(13)_"Status: "_$$ParseStatus^vhLib(Status)) }
+		If ($$$ISERR(Status)) { Do ##class(vhLib.Logger).%New("Halux planningstool").Error("Gewijzigde ToeleveringInfo object kon niet gesaved worden!","Toelevering: "_Toelevering.GeefToeNr()_$C(13,10)_"Status: "_$$ParseStatus^vhLib(Status)) }
 	}
 ]]></Implementation>
 </Method>
@@ -59,5 +59,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="1857567287"/>
+<Checksum value="366071724"/>
 </Export>