>
>IF RECCOUNT() > 0
> lnCurrRec = RECNO()
> GO TOP
> lnTopRec = RECNO()
> GO BOTTOM
> lnBottomRec = RECNO()
>
> DO CASE
> CASE lnCurrRec = lnTopRec
> WAIT WINDOW "At Top Record"
> CASE lnCurrRec = lnBottomRec
> WAIT WINDOW "At Bottom Record"
> OTHERWISE
> WAIT WINDOW "Someplace in the middle
> ENDCASE
>ENDIF
>This is a little picky, Craig, but how does this handle a case with all deleted records, so RECCOUNT() > 0?
The Anonymous Bureaucrat,
and frankly, quite content not to be
a member of either major US political party.
