>>
>>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?

That was off the top of my head. You could eliminate the RECCOUNT() > 0 and do further testing in the CASE. I use something similar in my framework and don't have a problem.