Index: TECH/Error/impl/ErrorHandler.cls.xml
===================================================================
diff -u -r1969 -r1976
--- TECH/Error/impl/ErrorHandler.cls.xml	(.../ErrorHandler.cls.xml)	(revision 1969)
+++ TECH/Error/impl/ErrorHandler.cls.xml	(.../ErrorHandler.cls.xml)	(revision 1976)
@@ -111,6 +111,8 @@
 	
 	if $data(%Exception) && $IsObject(%Exception) {
 		Set Info = Info _ $$$CRLF_%Exception.ToString()
+		Set Info = Info _ "GebruikersInitialen: "_##class(TECH.Context.RuntimeContext).Instance().GeefGebruikerInitialen()
+		Set Info = Info _ "ComputerNaam: "_##class(TECH.Context.RuntimeContext).Instance().GeefComputerNaam()
 		Set Info = Info _ $$$CRLF_%Exception.GeefErrorInformatie()
 	}
 	Set Logger=##class(vhLib.Logger).%New("TECH.Error")
@@ -136,6 +138,8 @@
 	do Body.WriteLine("RemoteIP: "_Error.RemoteIP)
 	do Body.WriteLine("Device: "_Error.Device_"  Job: "_Error.Job)
 	do Body.WriteLine("Server: "_Error.Server_"  NameSpace: "_Error.NameSpace)
+	do Body.WriteLine("GebruikerInitialen: "_##class(TECH.Context.RuntimeContext).Instance().GeefGebruikerInitialen())
+	do Body.WriteLine("ComputerNaam: "_##class(TECH.Context.RuntimeContext).Instance().GeefComputerNaam())
 	do Body.WriteLine()
 
 	if $data(%Exception) && $IsObject(%Exception) {