Click above to get retro games delivered to your door ever month!

RECNO()


Syntax:     RECNO()

Purpose:    To determine the record number of the current work area.

Returns:    An integer numeric value.

            If a database file contains no records, RECNO() returns the
            value 1 and the BOF() and EOF() both return true (.T.).

            If the record pointer is set to point past the last record
            in the file (by using a SKIP command to skip past the last
            record), RECNO() returns LASTREC() + 1 and EOF() returns
            true (.T.).  If an attempt is made to set the record pointer
            before the first record in a file, RECNO() returns the value
            1 and BOF() returns true (.T.).

Library:    CLIPPER.LIB


----------------------------------- Example --------------------------------

   USE Customers
   GO 3
   record = RECNO()
   ? RECNO()                  && Result: 3
   GO record
   ? RECNO()                  && Result: 3
   GO TOP
   ? RECNO()                  && Result: 1