hi,
i try as under, replacment only on record

CLOSE all

USE alltrim(thisform.text5.value) in 0 alias file1
USE alltrim(thisform.text6.value) in 0 alias file2
sele file1
 xfield1=alltrim(thisform.text1.value)
 myfield='newvalue' &&----- it's your field

scan for file1.&xfield1=file2.&xfield1
     repl file2.&myfield with file1.bill_value 
endscan
 

>My advice like Terry's,
>
>use scan, seek/locate commands and a simple replace.
>Your codes not clear so much.
>I tried a sample:
>

>
>CLOSE all
>
>USE alltrim(thisform.text5.value) in 0 alias file1
>USE alltrim(thisform.text6.value) in 0 alias file2
>sele file1
>
>xfield1=alltrim(thisform.text1.value)
>myfield="somefield" &&----- it's your field
>
>repl file2.&myfield with file1.bill_value for file1.&xfield1=file2.&xfield1
>
>