Ellery, prueba con esto

SELECT 0
USE MITABLA1 SHARED
*
DO WHILE !EOF()
PROC....
PROC....
PROC....
SELECT MITABLA1
SKIP
RETURN


Espero te pueda servir