>You get the error message by selecting from cursor to cursor, like so:
>
select A,B,C,D from CURSOR1 where;
>ITEM in ('TOY','GANE') into cursor CURSOR2 nofilter
>While I run your code I getting error message, please debug it
>Thank you
The following runs without error, and closes the table as expected.
function CloseAlias(tcAlias)
if used(tcAlias)
use in (tcAlias)
endif
In the original message, I confused the function name, using "CloseAlias" in one place, and "CloseCursor" in the other.
Hilmar.
Difference in opinions hath cost many millions of lives: for instance, whether flesh be bread, or bread be flesh; whether whistling be a vice or a virtue; whether it be better to kiss a post, or throw it into the fire... (from Gulliver's Travels)