>Actually, there's still a problem...
>
>For ESCAPE to work, I must have SET ESCAPE ON. So now, when I press ESCAPE, I get the "Cancel, Suspend,Ignore" message.
>
>Is there a way to have the ESCAPE only apply to the SQL progress and not interrupt the entire program?
>
>Thanks again...
>
>>Glad to help //;^)
How about something like...

PROC SQLPROC
SET ESCA OFF
ON KEY LABEL ESC DO CANCSQL
*YOUR SELECT SQL STATEMENTS....
ON KEY LABEL ESC
RETURN.
.
.
PROCEDURE CANCSQL
ON KEY LABEL ESC
*SET FLAGS...ETC
RETURN TO SQLPROC