Hi!

What about returning to the calleer program? In other words, you have following:

* Caller.PRG
...
DO MyLongProcess
...

* MyLongProcess.PRG
do while oValid.lContinue
   User pressed ESC here, so oValid.lContinue=.f.
   lots of other code
enddo

* SomeEvent.PRG

&& get the program name to return to using program() function
...
&& return to the program caled the lomg process
return to &lcProcName

I guess this will stop the long process immediately, though you will require to do the cleanup in the caller PRG instead of at th end of MyLongProcess PRG.

HTH.

>do while oValid.lContinue
> User pressed ESC here, so oValid.lContinue=.f.
> lots of other code
>enddo
>
>I don't want to execute lots of other code, I want to stop loop immediatelly, after oValid.lContinue=.f.
>
>In other words, do while checks its condition only in the next pass, it doesn't check its condition inside the loop, which is my desire.