replace IN alltrim(thisform.text6.value) ; FOR EVAL(lcField)==LookUp(alltrim(thisform.text5.value.&lcfield), EVAL(lcField), alltrim(thisform.text5.value.lcfield)) AND NOT EOF('alltrim(thisform.text5.value)'); val with thisform.text5.value.bill_value>thisform.text5.value.bill_value
>>CLOSE all >> >>USE alltrim(thisform.text5.value) in 0 >>USE alltrim(thisform.text6.value) in 0 >> lcField = alltrim(thisform.text1.value) >> >>replace IN alltrim(thisform.text6.value) ; >> FOR EVAL(lcField)==LookUp(alltrim(thisform.text5.value.&lcfield), EVAL(lcField), alltrim(thisform.text5.value.lcfield)) AND NOT EOF('alltrim(thisform.text5.value)'); >>val with VAL(ALLTRIM(thisform.text5.value.bill_value)) >>