Crear un Cursor en PB 6.0

Necesito crear un cursor y pasar luego esos valores a una tabla.
Yo se hacerlo en Visual foxpro, pero no se hacerlo en PB, soy nuevo con PB.
En Visual foxpro seria:
select * from tabla into cursor X
Quisiera hacer eso mismo en PB, ¿qué implicaciones tiene y como se hace?
Gracias te antemano,
RT

1 Respuesta

Respuesta
1
Disculpa por la demora.
Este es el código que necesitas:
declare cursor_1 cursor for
select campo_1,campo_2
from tabla
where condicion;
open cursor_1;
fetch cursor_1 into :campo_1,:campo_2;
close cursor_1;
rollback;
Cualquier otra duda solo pregunta.
O en caso contrario
Finaliza la pregunta
Hay algo que no tengo claro.
Como me muevo entre records en el cursor. ¿O todos los records se hacen accesibles con el flecht al mismo tiempo?
Rafael
Para poder moverte de un records a otro, tienes que seguir estos pasos:
Open cursor_1;
//para recuperar el primer registro
Fetch cursor_1 INTO
:campo_1,
:camop_2;
Do while SQLCA.SQLCode = 0
//recuperamos el siguiente registro
Fetch cursor_1 INTO
:campo_1,
:camop_2;
Loop
Close cursor_1
Espero te sirva de mucho, cualquier otra duda solo pregunta

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas