Cómo determinar si un cursor tiene registros?

[eduar2083]

Buenas, tengo el cursor previamente abierto pero no debo recorrerlo, es decir, antes de hacerle cualquier fetch. De momento lo unico que se me ha ocurrido es utilizar un count para la misma select antes del cursor pero obviamente va pesimo porque se realiza la misma consulta 2 veces excepto q la primera es solo para contar.
Favor su apoyo, gracias

[jc3000]

un cursor solo se abre si tiene algo que devolver

[eduar2083]

Iniciado por jc3000

un cursor solo se abre si tiene algo que devolver

Agradezco tu repuesta, pero si ejecutas el siguiente bloque anónimo (con un user DBA) observarás en la salida que el cursor se abre a pesar que no tiene registros, por tanto, comprobar si está abierto o no, no me funciona.

Código SQL:

DECLARE
   vCursor sys_refcursor;
BEGIN
   OPEN vCursor FOR
   SELECT * FROM sys.all_objects a
   WHERE a.owner = 'OWNER_NO_EXISTENTE';
   
   IF vCursor%isopen THEN
      dbms_output.put_line('El cursor está abierto, se procede a cerrarlo.');
      close vCursor;
   ELSE
      dbms_output.put_line('El cursor NO está abierto.');
   END IF;
exception
   WHEN others THEN
      dbms_output.put_line(sqlerrm);
END;
 

Saludos.

[jc3000]

utiliza esto ( adaptándolo a tus necesidades ).

Código SQL:

DECLARE
cursor cursor1 IS 
SELECT * FROM sys.all_objects a
WHERE a.owner = 'OWNER_NO_EXISTENTE';
BEGIN
 
FOR reg IN cursor1 loop
 
dbms_output.put_line('El cursor está abierto.');
 
END loop;
 
END;
 

Por cierto, para leer ALL_OBJECTS no necesitas ser dba ni poner el sys por delante.