What a perfect sample app!

Here is the fix for IBA_LocateCursor.IMP for version 3.6Db TEST2:

...
lastItem := tmpItem;
lastOper := tmpOper;
lastParam := tmpParam;
end;
if ( ii > 0 ) or ( LocateLinks.Count = 1 ) {!!!>>>} or not LocateNearest
{<<<!!!} then
SQLWhereLow.Add( ')' );
end;
SQLOrder.Text := newOrdSQL;
end;

procedure TIB_LocateCursor.SysBeforeOpen;
...

The change you need to make is on line #212.
I have indicated it above with the !!!>>> <<<!!!
The code in there should be added.

Hope this will do it for you!

Jason Wharton
CPS - Mesa AZ
http://www.ibobjects.com

----- Original Message -----
From: "Daniel Rail" <daniel@...>
To: "Jason Wharton (E-mail)" <jwharton@...>
Sent: Saturday, April 21, 2001 12:40 PM
Subject: Locate Error


> Hi Jason,
>
> Attached, you'll find an executable, the source code, a simple database
and
> the script to regenerate the database.
>
> Daniel Rail
>
>
>