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
>
.·*´¨)
.·`TCH
(..·*
010000110101001101101000011000010111001001110000010011110111001001000010011101010111001101110100
"When the debate is lost, slander becomes the tool of the loser." - Socrates
Vita contingit, Vive cum eo. (Life Happens, Live With it.)
"Life is not measured by the number of breaths we take, but by the moments that take our breath away." -- author unknown
"De omnibus dubitandum"