persistent 1 MyStorage VHSys.Scheduler.Logging 61753,58860.793418 61695,29978.792775 0 195 %String %String Do ##class(VHSys.Scheduler.Logging).GetMailFields(.From,.lbTo,.Subj, "Error") 1 " Set lbTo=$LB("jcl@vanhoecke.be") Quit ]]> Niv:"_..Niveau_" Groep:"_..Groep_$S($L(..Actie):" Actie:"_..Actie,1:"")_$S($L(..Detail):" Detail:"_..Detail,1:"")_$S($L(..ProgLabel):" ProgLabel:"_..ProgLabel,1:"")) ]]> %Library.CacheStorage ^DOM.HR.Protime.Import.LoggingD LoggingDefaultData ^DOM.HR.Protime.Import.LoggingD ^DOM.HR.Protime.Import.LoggingI ^DOM.HR.Protime.Import.LoggingS "Logging" %%CLASSNAME Actie Detail Groep Niveau ProgLabel Tijd