> SCAN > SELECT Invoice > LOCATE FOR in_code = lnCustCode > DO WHILE FOUND() > do some code > CONTINUE > ENDDO > SELECT sometable > ENDSCAN >>
SCAN if seek(lnCustCode, "Invoice", "MyOrder") select Invoice set order to myOrder scan while myField = lnCustCode do some code ENDscan endif SELECT sometable ENDSCANI sent you a note by UT private messages.