Oracle - Bloque anonimo con cursor

DECLARE

  /* V_nom abogados_ea.NOMBRE_A%TYPE;

    V_DESC ESPECIALIDAD_A_EA.DESCRIPCION%TYPE;

     V_DESC_E ESTUDIOS_A_EA.DESCRIPCION%TYPE;

      V_EDAD abogados_ea.EDAD%TYPE;

       V_E_CIVIL abogados_ea.ESTADO_CIVIL%TYPE;

        V_STATUS  CASOS_EA.STATUS%TYPE;*/

     cursor cur is

SELECT NOMBRE_A, ESPECIALIDAD_A_EA.DESCRIPCION, ESTUDIOS_A_EA.DESCRIPCION,EDAD, ESTADO_CIVIL, CASOS_EA.STATUS --INTO V_nom,V_DESC,V_DESC_E,V_EDAD,V_E_CIVIL,V_STATUS

FROM ABOGADOS_EA, ESPECIALIDAD_A_EA, ESTUDIOS_A_EA, CASOS_EA, CITAS_EA, BUFFET_EA

WHERE ABOGADOS_EA.ID_ESPECIALIDAD = ESPECIALIDAD_A_EA.ID_ESPECIALIDAD

AND ABOGADOS_EA.ID_ESTUDIOS_A = ESTUDIOS_A_EA.ID_ESTUDIOS_A

AND ABOGADOS_EA.ID_ABOGADOS = CITAS_EA.ID_ABOGADOS

AND CITAS_EA.ID_BUFFET = BUFFET_EA.ID_BUFFET

AND BUFFET_EA.ID_CASO = CASOS_EA.ID_CASO

AND ESPECIALIDAD_A_EA.DESCRIPCION = 'Derecho penal'

AND ESTUDIOS_A_EA.DESCRIPCION = 'Licenciatura'

AND ESTADO_CIVIL = 'SOLTERO'

AND (EDAD > 24 AND EDAD <32)

AND CASOS_EA.STATUS = 'CERRADO'

AND CIUDAD = 'GUADALAJARA'

;

 v_reg cur%rowtype;

begin

  open cur;

  loop

    fetch cur into v_reg;

    exit when cur%notfound;

    dbms_output.put_line ('Probando'|| v_reg.NOMBRE_A);

  end loop;

  close cur;

END;