>How can I duplicate the following code using the seek command:
>

> SCAN
> SELECT Invoice
> LOCATE FOR in_code = lnCustCode
>   DO WHILE FOUND()
>     do some code
>     CONTINUE
>   ENDDO
> SELECT sometable
> ENDSCAN
>

>
>The is extremely slow as this codes is already in another loop and therefore a locate for the whole table is execute each time.
>
>Thanks in advance.

 SCAN
 if seek(lnCustCode, "Invoice", "MyOrder")
   select Invoice
   set order to myOrder
  scan while myField = lnCustCode
     do some code
   ENDscan
   endif
 SELECT sometable
 ENDSCAN

I sent you a note by UT private messages.