Power Builder - Ayuda PB70 con Cursor

Hola Señores, estoy trabajando con Fetch, y tengo el siguiente bucle,

DECLARE copiar PROCEDURE FOR sp_copiar(:ls_buscar);

EXECUTE copiar;

DO

FETCH copiar INTO :campo;
i=i+1
LOOP UNTIL SQLCA.sqlcode <> 0

CLOSE copiar;

por ejemplo si debe encontrar 2 registros, estos me los encuentra bien pero en la ultima pasada (i=3) del bucle cuando estamos en el FECTH me da un PB70 si posibilidad de poder realizar la traza.

Si alguien sabe porque puede ser Agradeceria su Ayuda.

Hola, lo puedes realizar de la siguiente forma:
DECLARE copiar PROCEDURE FOR sp_copiar(:ls_buscar);
EXECUTE copiar;
FETCH copiar INTO :campo;
DO WHILE SQLCA.sqlcode = 0
i=i+1
FETCH copiar INTO :campo;
LOOP
CLOSE copiar;

con esto solo entra las veces de la cantidad de registros

Keylor