I have a procedure which contains the following code:

do while not eof()
mxx=track+dist
copy to xA while track+dist==mxx and not eof()
do calcA
enddo

***************
procedure calcA
***************
select 0
use xA
copy to x2
(... and then it continues until ...)
use in x2
delete file x2.dbf

Problem : after doing several hundred calls to the procedure calcA, it gives me the 1705 error "File access is denied", indicating I am trying to write to a write protected file.

It runs perfectly on one computer with ME installed, however when I try to run it on my new 2003 Compaq notebook computer with Win2000 Professional, the problem appears at the line "copy to x2". The point in the do while loop at which it stops is purely random, varying each time. Looking in the debugger Watch window, both file('x2.dbf') and used('x2') return false.

The machine is not connected to a network and the program is a single user application. The Foxpro installations on both machines are VFP 6 and both are standard configurations.

I'd appreciate help in solving this puzzle.