I am using Locate but it doesn't seem to work:

The following code snippets all fail to find an existing record
and try to append a record with the same primary key, with a
resultant key violation. I have tried deleting all the indices
(including the primary .px) and rebuilding them to no avail. The
primary key in A_Book is Address No so I know FindKey is the
preferred option but nothing seems to work. I have found this to
be a problem before in some other smaller tables and resorted to
filtering and checking the record count but that can't be right
- What am I doing wrong?

This seems a pretty vital function which cannot afford to be
unreliable.

vTemp:Variant;

vTemp:=dm.SourceSourceRef.Value;
   dm.A_Book.First;
    if not dm.A_book.Locate('AddressNo',vTemp,[]) then begin    
      dm.A_Book.Append;
      dm.A_BookAddressNo.Value := dm.SourceSourceRef.Value;
    end else dm.A_Book.Edit;
.. field content changes.

I have also tried
if not dm.A_book.Locate('AddressNo',sTemp,[])      then begin
..

and
if not
dm.A_book.Locate('AddressNo',dm.SourceSourceRef.AsString,[])    
..

and

and
if not dm.A_book.FindKey([nTemp]) >>

and

if not dm.A_book.FindKey([sTemp]) >>

and

Pat Bell

Pat Bell

Opening and closing A_Book was not all I had been doing - I also
set a filter which I did not clear. Simple and stupid that's me
<g>

Pat Bell