Index: VHSys/Scheduler/Logging.cls.xml
===================================================================
diff -u -r29059 -r63762
--- VHSys/Scheduler/Logging.cls.xml	(.../Logging.cls.xml)	(revision 29059)
+++ VHSys/Scheduler/Logging.cls.xml	(.../Logging.cls.xml)	(revision 63762)
@@ -152,7 +152,8 @@
 <FormalSpec>Groep:%String,Actie:%String,Error:%Status,Detail:%String,blnSendMail:%Boolean=1</FormalSpec>
 <ReturnType>Logging</ReturnType>
 <Implementation><![CDATA[
-	Set Logging=..Create(,,"ERROR",.Groep,.Actie,$G(Detail)_"~"_$$ParseStatus^vhLib(Error),$STACK($STACK-2,"PLACE"))
+	#dim Logging As Logging = ..Create(,,"ERROR",.Groep,.Actie,$G(Detail)_"~"_$$ParseStatus^vhLib(Error),$STACK($STACK-2,"PLACE"))
+	Do ##class(vhLib.Logger).%New().Error($G(Actie), Logging.Detail)
 	Do:(blnSendMail) aelSendErrorMail()
 	Quit Logging
 aelSendErrorMail()   ; Mail versturen van de fout