SET SERVEROUTPUT ON;
DECLARE
ALGO VARCHAR2 (120);
BEGIN
DBMS_OUTPUT.PUT_LINE('Probaremos un cursor implicito');
--cursor implicito
SELECT NOMBRE INTO ALGO FROM USUARIO1 WHERE ID_USUARIO1=1;
DBMS_OUTPUT.PUT_LINE('EN LA MEMORIA GLOBAL ESTA '||ALGO);
END;
/
---EL MISMO CON CURSOR EXPLICITO PARA OBTENER FILAS EN MEMORIA
DECLARE
CURSOR CUR_USUARIO1 IS SELECT * FROM USUARIO1;
BEGIN
FOR REC_USUARIO IN CUR_USUARIO1 LOOP
DBMS_OUTPUT.PUT_LINE('EN ESTE MOMENTO ESTA EN MEMORIA: '||REC_USUARIO.NOMBRE);
END LOOP;
END;
/