Index: TECH/Exceptions/Exception.cls.xml =================================================================== diff -u -r1943 -r1955 --- TECH/Exceptions/Exception.cls.xml (.../Exception.cls.xml) (revision 1943) +++ TECH/Exceptions/Exception.cls.xml (.../Exception.cls.xml) (revision 1955) @@ -174,7 +174,7 @@ #dim ErrorListIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(..InnerExceptions) While ErrorListIterator.HasNext() { #dim InnerException As TECH.Exceptions.Exception = ErrorListIterator.Next() - Set ErrorInfo = ErrorInfo_ $$$CRLF _ "InnerExceptie: "_ ErrorListIterator.Key() _ $$$CRLF _"***"_ InnerException.ToString() + Set ErrorInfo = ErrorInfo_ $$$CRLF _ "InnerExceptie: "_ ErrorListIterator.Key() _ $$$CRLF _"***"_ InnerException.GeefErrorInformatie() } If ('$IsObject(..InnerExceptions) || (ErrorInfo [ ##class(TECH.LogUtils).GeefTekstGeenInfo())){ Do ##class(TECH.LogUtils).GeefErrorInformatie(..ErrorID)