>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.
__________________________________
hi Nadya,

I'll be following the thread closely.
I basically tried the same a couple of weeks ago and I failed

The intent was to let the user interrupt a long process. During that process some requery()s might occur

on escape do abc


func abc()
     Escaped = TRUE
     retry             && I added this one since I got the error during the requery
endfunc


and in a loop I checked Escaped once a second