That is what the code does. I was just wondering if second set of SEEKs were necessary. U think is was done to be sure record pointer was not moved.

>How many checks are you doing? Set a flag instead:

>llCommit = .t.
>llCommit = iif(seek(valuea,tablea,ordera), llCommit, .f.)
>llCommit = iif(seek(valueb,tableb,orderb), llCommit, .f.)
>llCommit = iif(seek(valueX,tableX,orderX), llCommit, .f.)
>if llCommit
>   * do replaces here
>else
>   * do error stuff here
>endif

>If that does not meet your needs, then more information is needed if you want to try to avoid issuing the SEEK() functions again.
>
>>Replace is not done earlier because this is a mult-user system and do not want to do updates and inserts until all data is checked.