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.

>Better code might be:

>    if seek(valuea,tablea,ordera)
>       replace feieldlista with valuelista in tablea
>    else
>       *!* do error stuff here
>    endif
>    if seek(valueb,tableb,orderb)
>       replace feieldlistb with valuelistb in tableb
>    else
>       *!* do error stuff here
>    endif
>