Thanks, John! Didn't know about that one! Karen
> You can make use of the CHKCUR Function.
>
> The resulting variable will return a 1 if the
> cursor exists, or a 0 if it does not exist.
>
> SET VAR vCheckCursor INTEGER = (CHKCUR('c1'))
> IF vCheckCursor = 1 THEN
> DROP CURSOR c1
> ENDIF
>
> John

