FIND-FIRST( ) method

FIND-FIRST( ) method

Gets a single record. This method lets a user get the first record that satisfies the predicate expression.

Return type: LOGICAL

Applies to: Buffer object handle
Syntax
FIND-FIRST (predicate-expression [ , lockmode [ , wait-mode ] ] ) 
predicate-expression
A character expression that evaluates to the following syntax:
Syntax
[ WHERE [ logical-expression ] ] [ USE-INDEX index-name ] 
Once evaluated, predicate-expression can contain only constants and unabbreviated references to fields from the buffer.

The predicate-expression itself can be built using a concatenation of character expressions.
lockmode

An integer expression evaluating to one of the following constants: SHARE-LOCK, EXCLUSIVE-LOCK, or NO-LOCK. You can assign any of these constants to an integer variable. For example, mylock = NO-LOCK.

The default is SHARE-LOCK.

wait-mode

An integer expression evaluating to one of the following: NO-WAIT, 0, or the Unknown value (?). You can assign NO-WAIT to an integer variable. For example, mywait = NO-WAIT. The default is to wait.

The following shows some examples of FIND-FIRST method:
DEFINE VARIABLE bh     AS HANDLE    NO-UNDO. 
DEFINE VARIABLE myname AS CHARACTER NO-UNDO. 
bh = BUFFER Customer:HANDLE. 
bh:FIND-FIRST("WHERE Customer.CustNum > 2", NO-LOCK). 
DO TRANSACTION: 
  bh:FIND-FIRST("", EXCLUSIVE-LOCK). 
END. 
bh:FIND-FIRST("WHERE Customer.Name = " + QUOTER(myname) , NO-LOCK). 
If FIND-FIRST succeeds, it returns TRUE, otherwise it returns FALSE.

If FIND-FIRST fails, it does not raise an error but displays a message. You can suppress this message by using NO-ERROR on the statement containing the method.

See also: FIND-BY-ROWID( ) method, FIND-CURRENT( ) method, FIND-LAST( ) method, FIND-UNIQUE( ) method, FIND statement

Syntax
FIND-FIRST (`predicate-expression` [ , `lockmode` [ , `wait-mode` ] ] )

Syntax
[ WHERE [ `logical-expression` ] ] [ USE-INDEX `index-name` ]

DEFINE VARIABLE bh AS HANDLE NO-UNDO. DEFINE VARIABLE myname AS CHARACTER NO-UNDO. bh = BUFFER Customer:HANDLE. bh:FIND-FIRST("WHERE Customer.CustNum > 2", NO-LOCK). DO TRANSACTION: bh:FIND-FIRST("", EXCLUSIVE-LOCK). END. bh:FIND-FIRST("WHERE Customer.Name = " + QUOTER(myname) , NO-LOCK).

OpenEdge Release 10.2B