Deze class doet de eigenlijke error afhandeling. Bouwt het ErrorInfo dataobject, stuurt een email of logged de fout. De erroinfo is toegankelijk na afhandeling van de de fout via %ErrorObject TECH.Error 1 %RegisteredObject 0 1 Label:%String,Options:%String 1 Label:%String,Options:%String 1 Label:%String " { set Error.ErrorCode2=$ECODE } Set Error.StackTrace=..StackTrace(1) Set Error.ErrorCode=$ZERROR } Set Error.Device=$I Set Error.Job=$J Set Error.Server=$ZU(110) Set Error.NameSpace=$ZU(5) Do ..SetRemoteIP(Error) Do ..UserText(Error) Quit Error ]]> 1 Error:TECH.Error.dto.ErrorInfo 1 1 Error:TECH.Error.dto.ErrorInfo 1 Error:TECH.Error.dto.ErrorInfo 1 Error:TECH.Error.dto.ErrorInfo 1 Error:TECH.Error.dto.ErrorInfo %String 1 sc:%Status 1 From:%Integer=1 "_$STACK($STACK-i,"MCODE") } Quit Txt ]]>