Is the error in a method of the class with the error? or is in in a prg or another class?
this example sort of shows when it does and doesnt get used
clear
lotest1 = createobject( "testA" )
lotest1.MkError1()
lotest1.CallError()
lotest3 = createobject( "testB" )
lotest3.MkError2()
define class testA as custom
procedure CallError
local loTest2
lotest2 = createobject( "testB" )
lotest2.MkError2()
return
procedure MkError1
? abc
return
endproc
function error( tnErr, tcMth, tnLin )
? prog(), message(), tnErr, tcMth, tnLin
return
endproc
enddefine
define class testB as custom
procedure MkError2
? def
return
endproc
enddefine