hi,
thank you , no error and 0 replacment

CLOSE all

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

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

>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
>
>