PROCEDURE jugadores_all IS
--declarando cursor
CURSOR cursor_jugadores IS
SELECT codjugador, nombre
FROM jugadores j
WHERE codequipo=1;
--variables para los campos
v_codju VARCHAR2(4000);
v_nombre VARCHAR2(4000);
BEGIN
-- abrir cursor
OPEN cursor_jugadores;
--procesar cursor, fetch para recorrer el cursor
LOOP
FETCH cursor_jugadores
INTO v_codju, v_nombre;
--cuando salga, escribe las lineas
EXIT WHEN cursor_jugadores%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(v_codju || ' ' || v_nombre);
END LOOP;
CLOSE cursor_jugadores;
END jugadores_all;
/** Mostrar **/
BEGIN
JUGADORES_ALL();
END;
No hay comentarios:
Publicar un comentario