>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.
SNIP

But Vlad, isn't this just a GOTO in disguise?