> function isempty
> local lnrecno, lntop,lnBottom
> lnRecno=recno()
> Go top
> lnTop=recno()
> go bottom
> lnBottom=recno()
> on error go top
> go lnRecno
> on error
> return lntop=lnbottom
>
> HTH.
>
> Have a happy day
> Vladimir Shevchenko
Shorter:
Go top
if recno()>recc()
table is empty
else
it's not
endif
"Table is empty" means there are records which can be displayed - they
are not all deleted, not filtered out etc.