I currently use the following code in my project file to globally catch exceptions. When exception run:
I'm trying to add the exception stack to the error message. But if I call dbgInfo(dbgStack) from the exception case in the project file the only text in the stack is for the current line of code calling dbgInfo(), "Initializing APP(), line 801". Is there a way around this without having to do a CASE EXCEPTION for every window?
I also tried running a procedure instead of using case exception and it doesn't work at all. The break point at the beginning of the procedure never hits.
CASE EXCEPTION: sException is string // Get error string IF ExceptionInfo() <> "" THEN sException = "ExceptionInfo: " + ExceptionInfo() + " " IF HErrorInfo() <> "" THEN sException += "Last Db Error: " + HErrorInfo() + " " IF ErrorInfo() <> "" THEN sException += "Last Error: " + ErrorInfo() LogError(sException) ExceptionDisplay() // Normal automatic WD error RESULT opEndProgram
I'm trying to add the exception stack to the error message. But if I call dbgInfo(dbgStack) from the exception case in the project file the only text in the stack is for the current line of code calling dbgInfo(), "Initializing APP(), line 801". Is there a way around this without having to do a CASE EXCEPTION for every window?
I also tried running a procedure instead of using case exception and it doesn't work at all. The break point at the beginning of the procedure never hits.