>Naomi
>
>I have tried it but am getting an error message," Table has no index order set". I have used the line
>
>

>Index on bcode to mcode
>

Also, don't use this syntax. Use TAG MCODE instead. This will create a permanent index. The index will be called MCODE, but it will be part of the file MyTable.CDX (assuming the table is called MyTable.DBF). Here is an example of how to use it:

* The following must be done only once. You can also create indexes interactively (with MODIFY STRUCTURE).
index on bcode TAG mcode

* In your main program:
use MyTable order MCode
* Or, alternatively:
use MyTable
set order to MCode

seek lnValue
if found()
  * Do something with the record here

* Alternatively:
if seek(lnValue)
  * Do something with the record here