Dan,

Thanks to you and Nigel. I think I will do just that.

>Hi Naomi,
>
>How about changing your OUTER SCAN to use a different alias, then you don't have to worry about record pointers, skipping, changing alias, etc... Something like this...
>
>

>select YourCurrentAlias
>use (dbf()) again alias MyScanAlias in 0
>select MyScanAlias
>set order to OrderYouWant
>scan while / for
>    call your function to calculate sum based on "YourCurrentAlias"
>    select MyScanAlias
>    replace MyFields in this work area
>endscan
>
>use in MyScanAlias
>
>

>
>You'll obviously need to consider some slight change in code where it may need to look at the new "MyScanAlias" cursor name instead. But this SHOULD allow for a cleaner solution.
>
>
>
>
>
>
>>>Hello Naomi,
>>>
>>>>I have a table set in the particular order and then a
>>>>
>>>>I'm doing a SCAN on the table with some FOR and WHILE conditions.
>>>
>>>I take it that you're doing the SCAN based on some criteria. What is
>>>this criteria, and is it being met?
>>>
>>>>In the beginning on the scan I'm saving recno, then there are some calculations
>>>>involving this table, then I restore order on this table and goto saved recno.
>>>>I also update some fields in this table that don't participate in FOR/WHILE.
>>>
>>>This last line that you wrote. You could be changing/advancing the record pointer,
>>>yet SCAN thinks nothing has changed, and that you're still on the same record; therefore,
>>>your program might be trying to seek past EOF, in which case SCAN would
>>>return the error you describe.
>>>
>>>Or, your search criteria is not being met at all, and SCAN is letting you
>>>know (in it's own way) that nothing was found.
>>>
>>>>I'm getting record is out of range on the ENDSCAN command.
>>>>
>>>>Do you know why I'n having this problem and how can I fix it?
>>>
>>>It sounds like you are inadvertently changing the record pointer,
>>>and SCAN is getting confused. Either that, or your criteria is
>>>not being met.
>>>
>>>Hope this helps,
>>>
>>>Randall
>>
>>Randall,
>>
>>Thanks a lot for your reply. This is actually not my code, I'm just trying to make it work. Basically, originally the table is in particular order and it's scanned while code = lcCode FOR some criteria. In the middle of the scan loop there is another procedure called that sums records from the same table using different order. Then I restore the order and the record pointer.
>>
>>However, I found, that my table doesn't have an order set at the moment of this error, which is strange, since I have SET ORDER TO 1 in the loop...