Index: TECH/BackgroundProcess/Uitvoerder.cls.xml =================================================================== diff -u -r3801 -r3802 --- TECH/BackgroundProcess/Uitvoerder.cls.xml (.../Uitvoerder.cls.xml) (revision 3801) +++ TECH/BackgroundProcess/Uitvoerder.cls.xml (.../Uitvoerder.cls.xml) (revision 3802) @@ -45,7 +45,10 @@ Do ##class(TECH.BackgroundProcess.impl.Data).DeleteId(DataID) } Catch { - #dim Exception As TECH.Exceptions = ##class(TECH.ExceptionHandler).Catch() + #dim Exception As TECH.Exceptions.GeneralErrorException = ##class(TECH.ExceptionHandler).Catch() + #dim ExtraInfoBackgroundProcess As %String = ##class(TECH.BackgroundProcess.Helper).GeefBackGroundProcessInfo(Data) + + Do Exception.VoegToeExtraInfo(ExtraInfoBackgroundProcess) Do ##class(vhLib.Logger).LogEnMailExceptie(Exception, "voor background process data met ID="_DataID) }