Index: vhLib/WebServiceLogger/impl/VhLibLogger.cls.xml =================================================================== diff -u -r1350 -r2601 --- vhLib/WebServiceLogger/impl/VhLibLogger.cls.xml (.../VhLibLogger.cls.xml) (revision 1350) +++ vhLib/WebServiceLogger/impl/VhLibLogger.cls.xml (.../VhLibLogger.cls.xml) (revision 2601) @@ -34,7 +34,7 @@ While ('Stream.AtEnd && 'MaximumLengteBereikt){ Try { Set Debug = ##class(TECH.StringUtils).Append(Debug,Stream.ReadLine(),$C(13,10)) - }Catch E{ + } Catch { #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() If Exception.GeefOmschrijving()'["MAXSTRING" { Do ##class(TECH.ExceptionHandler).Rethrow() @@ -46,14 +46,13 @@ } } Do Stream.Rewind() - }Catch E - { + } Catch { Set Exception = ##class(TECH.ExceptionHandler).Catch() Set Debug = Exception.GeefOmschrijving() Do ##class(vhLib.Logger).LogEnMailExceptie(Exception) Try{ Do Stream.Rewind() - }Catch E{ + } Catch { Set Exception = ##class(TECH.ExceptionHandler).Catch() } }