Index: vhLib/Logging.cls.xml =================================================================== diff -u -r3769 -r3787 --- vhLib/Logging.cls.xml (.../Logging.cls.xml) (revision 3769) +++ vhLib/Logging.cls.xml (.../Logging.cls.xml) (revision 3787) @@ -243,7 +243,7 @@ #dim ServerPrefix As %String = "["_$$$UCase($$$Server)_"] " #dim Subject As %String = ServerPrefix _ $S(Niveau="I":"Info",Niveau="E":"Error",Niveau="W":"Warning",Niveau="D":"Debug",1:"")_" - " - Set Subject = Subject _ oLog.Groep_" : "_ Actie _ " - " _ $ZDT($H,4) + Set Subject = Subject _ oLog.Groep_" : "_ Actie _ " - SessionID: " _ oLog.SessionID _ " - " _ $ZDT($H,4) ; voortijdige quit indien een fout bij het opslaan van de log @@ -252,6 +252,7 @@ If ( scSave ) && ( SendMail ) & ( Niveau '= "D" ){ #dim Body As %GlobalCharacterStream = ##class(%GlobalCharacterStream).%New() Do Body.WriteLine($$GetJobInfo^vhLib.System()) + Do Body.WriteLine("SessionID: " _ oLog.SessionID) Do Body.WriteLine("") ;Do Body.CopyFrom(oLog.GenMailBody()) Do Body.WriteLine(oLog.Detail)