>CLOSE all
> lcTable1 = alltrim(thisform.text5.value)
> lcTable2 = alltrim(thisform.text6.value)
> lcBillValue = lcTable1. bill_value&&"lcTable1" is not an object
>
> Use ( lcTable1) in 0
> Use ( lcTable2) in 0
>
> lcField = alltrim(thisform.text1.value)
>
>replace IN lcTable2 ;&& Too few arguments
> FOR EVAL(lcField)==LookUp(lcTable1.&lcfield), EVAL(lcField), (lcTable1.&lcfield)) AND NOT EOF('lcTable1');
>NEWVALUE with VAL(lcBillValue)


When using variables in the above example, you must use macro substitution:

CLOSE all
lcTable1 = alltrim(thisform.text5.value)
lcTable2 = alltrim(thisform.text6.value) 
lcBillValue = &lcTable1..bill_value       && Note you must use double periods here

Use ( lcTable1) in 0
Use ( lcTable2) in 0

lcField = alltrim(thisform.text1.value)

replace IN  &lcTable2..somefield ;        && Note the macro and double periods
   FOR EVAL(lcField)==LookUp(lcTable1.&lcfield), EVAL(lcField), (lcTable1.&lcfield)) AND NOT EOF('lcTable1');
NEWVALUE with VAL(lcBillValue)