Sets a simple filter on a field, such as a single range or a single value.

FieldRef.SETRANGE([FromValue] [, ToValue])

Parameters

FieldRef

Type: FieldRef

The FieldRef that refers to the field that you want to place a filter on.

FromValue

Type: any

The lower limit of the range. The data type of FromValue must match the data type of the field referred to by FieldRef.

ToValue

Type: any

The upper limit of the range. If you omit this parameter, the FromValue you specified is used. The data type of ToValue must match the data type of the field referred to by FieldRef.

Remarks

The SETRANGE function provides a quick way to set a simple filter on a field.

If you call this function by using a field that already has a filter, that filter is removed before the new filter is set.

If you omit all of the optional parameters, all filters set for that field are removed.

The SETRANGE function fails if no field is selected.

This function is like the SETRANGE Function (Record) function.

Example

The following example opens the Customer table as a RecordRef object, creates a reference to the first (No.) field, and stores the reference in the MyFieldRef variable. The SETRANGE function sets a filter that selects all records from 10000 to 40000 in the No. field. The FIND Function (RecordRef) searches and selects the first record in the filter and counts the number of records that are found. The number of records is stored in the Count variable. The process is repeated by looping through all the records in the filter until no more records are found. The number of records that are found in the range is stored in the Count variable and displayed in a message box. This example requires that you create the following variables in the C/AL Globals windows.

Variable name DataType

CustomerRecref

RecordRef

MyFieldRef

FieldRef

Count

Integer

Text constant ENU value

Text000

%1 records were retrieved.

 Copy Code
CustomerRecref.OPEN(DATABASE::Customer);
MyFieldRef := CustomerRecref.FIELD(1);
MyFieldRef.SETRANGE('10000' , '40000');
Count := 0;
IF CustomerRecref.FIND('-') THEN
  REPEAT
    Count := Count + 1;
  UNTIL CustomerRecref.NEXT = 0;
MESSAGE(Text000 , Count);

See Also