LPARAMETERS nError, cMethod, nLine, tcSys16, toErrObj IF m.nError = 1839 && Requery cancelled IF VARTYPE(m.plStop) = "L" AND m.plStop * Have we stopped already? ELSE RETRY ENDIF ELSE DODEFAULT(nError, cMethod, nLine, tcSys16, toErrObj) ENDIFI think you should code it like this...
LPARAMETERS m.tnError, m.tcMethod, m.tnLine, m.tcSys16, m.toErrObj IF m.tnError = 1839 && Requery cancelled IF VARTYPE(m.plStop) = "L" AND m.plStop * Have we stopped already? ELSE RETRY ENDIF ELSE DODEFAULT(m.tnError, m.tcMethod, m.tnLine, m.tcSys16, m.toErrObj) ENDIFBecause! nError with or without the mdot is possibly a field name in some naming conventions. You can run into a conflict. Further, you are mixing different types of notations. nError and toErr. Every parameter is supposed to be prefaced with "t". You can and IMO should name them properly.