Index: BL/Legacy/FLOWHALUX.cls.xml
===================================================================
diff -u -r63368 -r63370
--- BL/Legacy/FLOWHALUX.cls.xml	(.../FLOWHALUX.cls.xml)	(revision 63368)
+++ BL/Legacy/FLOWHALUX.cls.xml	(.../FLOWHALUX.cls.xml)	(revision 63370)
@@ -48,6 +48,7 @@
 <ClassMethod>1</ClassMethod>
 <FormalSpec>ToeleveringNr:%String</FormalSpec>
 <Implementation><![CDATA[
+	Set Logger = ##class(vhLib.Logger).%New("HALUX.Planning")
 	
 	#dim DateTimeAPI= ##class(TECH.Context).Instance().GeefDateTimeAPI()
 	#dim ToeleveringAPI As DOM.AKP.ToeleveringAPI = ##class(DOM.DomeinContext).%New().GeefToeleveringAPI()
@@ -60,6 +61,7 @@
 	#dim Message As %String = ""
    	Do Body.WriteLine(Message)
    	
+   	Do Logger.Info("Toelevering gemaakt met minstens 1 SST", Subject)
 	Do SendMiniMail^vhLib($$$SystemMail("SST toelevering"_ToeleveringNr),MailTo,Subject,Body,1,1)
 	
 	Quit