Index: TECH/Exceptions/Exception.cls.xml =================================================================== diff -u -r3168 -r3169 --- TECH/Exceptions/Exception.cls.xml (.../Exception.cls.xml) (revision 3168) +++ TECH/Exceptions/Exception.cls.xml (.../Exception.cls.xml) (revision 3169) @@ -118,7 +118,9 @@ #dim Stream As %GlobalCharacterStream = ##class(%GlobalCharacterStream).%New() Do Stream.WriteLine(Prefix_"Omschrijving: "_$$$TAB_..GeefOmschrijving()) - Do:$$$ISERR($get(%objlasterror)) Stream.WriteLine("objlasterror : "_$$ParseStatus^vhLib(%objlasterror)) + If ($$$ISERR($get(%objlasterror)) && $$$Not($get(%objlasterror) = "")) { + Do Stream.WriteLine("objlasterror : "_$$ParseStatus^vhLib(%objlasterror)) + } Do Stream.WriteLine(..GeefStack())