This method is giving me a "Table has no index order set"......

CLOSE DATABASES
OPEN DATABASE ('c:\diamondaccounti\inventory')

if !used('intrancust')
use intrancust
else
select ('intrancust')
endif

SET ORDER TO stocknum

SEEK Thisform.Combo4.value


IF FOUND( )
Thisform.CHARGEPERKARAT1.VALUE = chgperkt
Thisform.MEASUREMENTS1.VALUE = measure
Thisform.Combo3.VALUE = cut

Is the syntax wrong? What exactly is this error telling me and how do I fix it?

Thanks
JD