Could a single UPDATE ... do the things that you want to do in SCAN..END loop?



>Thanks Borislav,
>
>That is what I am doing now. I was hoping (since it is Friday afterall) that I was overlooking a better way...
>
>Tracy
>
>>>field de_sysnum n(8,0)
>>>field de_histnum n(4,0)
>>>
>>>EXACT is on
>>>NEAR is off
>>>
>>>Example records:
>>>
>>>de_sysnum de_histnum
>>>13609 1
>>>13609 2
>>>13609 4
>>>13609 3
>>>14102 1
>>>1360 1
>>>1360 9
>>>
>>>active index is:
>>>
>>>transform(de_sysnum,'99999999')+transform(de_histnum,'9999')
>>>
>>>want to move to the first record with a de_sysnum of numeric 13609 and then want to scan while...endscan through only those records that have a de_sysnum of 13609 and ANY de_histnum.
>>
>>

>>old_exact = SET("EXACT")
>>SET EXACT OFF
>>SEEK transform(13609,'99999999')
>>SCAN WHILE de_sysnum == 13609
>>   **** Do something
>>ENDSCAN
>>SET EXACT &old_exact
>>