select 'openA' from dual;

SELECT sql_id,
       sql_text,
       parse_calls,
       executions
FROM v$sql
WHERE INSTR(UPPER(sql_text),'OPENA')  > 0
  AND INSTR(UPPER(sql_text),'SQL_TEXT') = 0
  AND command_type = 3;

select sql_text
from v$open_cursor
where 1=1 
  --and sql_id = 'ajut3t2v0m7sc'
  and sql_text like '%openA%';

declare
  v_t varchar2(10);
  cursor a is
  select 'a' from dual; 
  cursor b is
  select 'b' from dual; 
beg
 open a; 
 fetch a into v_t;
 --not closing it
 open b; 
 fetch b into v_t;
 ...and so  on....
end;