обрабатываю большую таблицу, для записей делаю определенные действия, связанные с запросом и получением данных в курсор, но периодически появляется ошибка, что ресурс не найден, и появляется окно обработки ошибки
file is in use
cancel suspend ignore help
игнорируя ошибки вручную, несколько раз, обработка возобновляется.

вопрос
можно ли сделать чтобы оно автоматически игнорировала все эти ошибки?
складывается ощущение что файл занят, из-за того что не успел обработаться оператором, как подождать когда он освободится?

никто не работает, я могу предполагать, что просто фокс запросом вытаскивает данные из таблицы, и тут же следующий оператор пытаеца опять использовать эту таблицу..
но с другой стороны если все выполняется последовательно, то почему возникает ошибка доступа к файлу?

примерно так


авторclose table
set deleted on
use x:\moregistr alias moregistr in 2
use x:\uslper alias uslper in 3

select 3
go top

do while !eof()
st1=alltrim(uslper.s1)
st2=alltrim(uslper.s2)
st3=alltrim(uslper.s3)
st4=alltrim(uslper.s4)
sex1=uslper.sex
vg1=uslper.vg
if st4+'s'='s'
*p(Ej|Ek)
if (st3+'s'='s')and(st4+'s'='s')
select count(*) as pc from moregistr where (at(alltrim(st1+','),alltrim(sostg))>0) and (at(alltrim(st2+','),alltrim(sostg))>0) and sex=sex1 and vg=vg1 into cursor mycur
pc1=mycur.pc
select count(*) as pc from moregistr where (at(alltrim(st2+','),alltrim(sostg))>0) and sex=sex1 and vg=vg1 into cursor mycur
pz1=mycur.pc
select count(*) as pc from moregistr where (at(alltrim(st1+','),alltrim(sostg))>0) and sex=sex1 and vg=vg1 into cursor mycur
pz2=mycur.pc

if pz1<>0
z1=pc1/pz1
else
z1=0
endif
if pz2<>0
z2=pc1/pz2
else
z2=0
endif
replace uslper.p1 with z1
replace uslper.lp1 with z2
endif

версия foxpro 6 это на счет функции set tablevalidate

ок