Hi everybody,

I want to be able to stop or not stop query execution if the user pressed an ESC while running query.

First of all, I found that the documentation on Error 1839 is very limited and incorrect.

Here is what I have in my Search button:

SET ESCAPE ON
		SET NOTIFY ON
		ON ESCAPE plStop = YesNo("Are you sure you want to stop?")
		SET TALK WINDOW NOWINDOW
		SET TALK ON
		.nRecords = EVALUATE('thisform.obizObj.PopulateCursor('+ ;
			.cParams +')')

and this is the code from Error method:

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)
ENDIF

However, if I say No, I don't want to stop, my view is not required (?spell) again. Is there a way to achieve the desired functionality? I do not see a way.

Thanks in advance.