>>>>> snipped
>>>
>>
>>How much time demands one direct opening and scan?:
>>

>>t1=seconds()
>>USE tacust SHARED
>>? 'open header',seconds()-t1
>>t1=seconds()
>>scan
>>endscan
>>? 'first scan',seconds()-t1
>>t1=seconds()
>>scan
>>endscan
>>? 'second scan',seconds()-t1
>>

>
>Good morning Fabio,
>
>Open header took .65 seconds.
>First scan took 132.74 seconds.
>Second scan took 44.95 seconds.
>Third scan took 26.4 seconds.
>
>Re-ran 2nd time
>Open header took .21 seconds.
>First scan took 17.59 seconds.
>Second scan took 11.58 seconds.
>Third scan took 8.64 seconds.
>
>Hmm...


try this and post results:

* first time
t1=seconds()
USE tacust SHARED
SEEK 2^30 ORDER Tagcmrno
? seconds()-t1
? header()+recsize()*reccount()