+---------------------------------+
|              FOUND              |
+---------------------------------+
FOUND([<expN> | <expC>])

-----------------------------------
Determines if last CONTINUE, FIND, LOCATE or SEEK was successful.
Return value - Logical
-----------------------------------

<expN> | <expC>
        Work area number or alias.  If a database isn't open in the indicated
work area, FOUND() returns a value of false (.F.).  If the work area
argument isn't included, the value for the currently selected work area
is returned.

        The optional work area argument is especially useful when working with
related files, since it allows values to be obtained without selecting
each work area individually.

+---------------------------------+
|             Examples            |
+---------------------------------+
SET TALK WINDOW
SET SAFETY OFF
CLOSE ALL
SELECT 0
USE invoice TAG cust_id
SELECT 0
USE customer
SET RELATION TO cust_id INTO invoice
COPY TO newfile FOR FOUND('invoice')

In example below, all customers from Perrysburg are counted.

SET TALK OFF
CLOSE ALL
USE customer
STORE 0 TO mcount
LOCATE FOR city = 'Perrysburg'
DO WHILE FOUND()
        mcount = mcount + 1
        CONTINUE
ENDDO
WAIT WINDOW 'Total customers from Perrysburg: ' ;
        + LTRIM(STR(mcount)) NOWAIT
USE && close database

-----------------------------------

See Also:  CONTINUE, EOF(), FIND, LOCATE, SEEK

-----------------------------------