RecordRef.Find([Text]) Method

Article
02/26/2024

Version: Available or changed with runtime version 1.0.

Finds a record in a table based on the values stored in the key fields.

Syntax

[Ok := ]  RecordRef.Find([Which: Text])

Parameters

RecordRef
Type: RecordRef
An instance of the RecordRef data type.

[Optional] Which
Type: Text
Specifies how to perform the search. The table will be searched until the record is found or there are no more records. Each character in the string can be present only one time. You can use the following characters:

= search for a record that equals the key values (default)
> search for a record that is larger than the key values
< search for a record that is less than the key values
+ search for the last record in the table (+ can only be used alone)
- search for the first record in the table (- can only be used alone) You can combine the '=', '>', and '<' characters. If this parameter contains '=', '>', or '<', then you must assign value to all fields of the current and primary keys before you call FIND.

Return Value

[Optional] Ok
Type: Boolean
true if the operation was successful; otherwise false. If you omit this optional return value and the operation does not execute successfully, a runtime error will occur.

Remarks

Find retrieves the first record that meets the conditions set by the Which parameter and the filters associated with the record. The search path reflects the sort order defined by the current key. If the current key is not the primary key, there is a chance that several records might have the same values in current key fields. If this occurs, the sort order defined by the primary key is used as the search path.

Example

The following example opens table 18 (Customer) as a RecordRef variable named CustomerRecref. The value for the field 1 (No.) is set to a specified record. In this example, the field is set to record 40000. The code uses the Find method to find the record that matches. 40000 in the table. If the record is found, the number, name, address and city of the customer are displayed in message boxes. The values in the fields are retrieved by using the Field Method (RecordRef).

var
    CustomerRecref: RecordRef;
    MyFieldRef: FieldRef;
    varCustomerNo: Code;
    Text000: Label 'The customer was found.\\';
    Text001: Label 'Customer No. %1 is:\\%2';
    Text002: Label 'Sorry, that customer could not be found.';
begin
    varCustomerNo := '40000';  
    CustomerRecref.Open(18);  
    MyFieldRef := CustomerRecref.Field(1);  
    MyFieldRef.Value := varCustomerNo;  
    if CustomerRecref.Find('=') then begin  
      Message(Text000 + Text001,  CustomerRecref.Field(1), CustomerRecref.Field(2));  
      Message('Address: %1, %2',  CustomerRecref.Field(5),  CustomerRecref.Field(7));  
    end else
      Message(Text002);  
end;