>>
>>For a start, you might get the call stack, I think it would be something like this:
>>
>>

>>WriteLog("Call stack:")
>>for i = 1 to program(-1)
>>  WriteLog(program(i))
>>next
>>

>
>Thank you, Hilmar. I will try adding the above code and see how it works.

I would suggest to use ASTACK() function.