Index: TECH/Exceptions/Exception.cls.xml =================================================================== diff -u -r1570 -r1943 --- TECH/Exceptions/Exception.cls.xml (.../Exception.cls.xml) (revision 1570) +++ TECH/Exceptions/Exception.cls.xml (.../Exception.cls.xml) (revision 1943) @@ -92,6 +92,8 @@ #dim TekstStream As %GlobalCharacterStream = ##class(%GlobalCharacterStream).%New() Do TekstStream.WriteLine(Prefix_"Omschrijving: "_$$$TAB_..GeefOmschrijving()) + Do TekstStream.WriteLine(..GeefStack()) + if ..ExtraInfo.Size>0 { do TekstStream.WriteLine(Prefix_"Extra info:") do ..ExtraInfo.Rewind()