1 1 TECH.IException,TECH.RegisteredObject right TECH.IException list 1 TO DO : Stack zou een %Stream moeten worden. %String 1 %TimeStamp 1 %List 1 TECH.Exceptions.enu.Schaal ##class(TECH.Exceptions.enu.Schaal).Major() 1 1 1 %Status Exception:TECH.IException Exceptions:TECH.ExceptionList Exceptions:TECH.ExceptionList Prefix:%String="" %String 32000 { Set Result = Result _ $$$CRLF _ "Rest van de Exceptie is afgekapt!!!" } Quit Result ]]> Overschrijven in klasse TECH.Exceptions.RuntimeException 1 %String TECH.ExceptionList %String Schaal:TECH.Exceptions.enu.Schaal TECH.Exceptions.enu.Schaal %Boolean %TimeStamp %String %Boolean %XML.Adaptor 1 TECH.enu.ExceptionCode Wordt gebruikt om in de ecode weg te schrijven, de omschrijving blijft dus best beperkt. 1 %String