SQL> Create Or Replace Procedure proc Is
  2  v_rec_cnt  Number := 0;
  3  g_cur_count   sys_refcursor;
  4  v_query1  Varchar2(10000):=
  5         'Select Count(*)
  6         From ( SELECT To_CHAR(SYSDATE,'DD/MM/YYYY')
  7         FROM   DUAL';
  8  Begin
  9       Open g_cur_count For v_query1||')';
 10  End;
 11  /

Warning: Procedure created with compilation errors.

SQL> SHOW ERR
Errors for PROCEDURE PROC:

LINE/COL ERROR
-------- -----------------------------------------------------------------
6/39     PLS-00103: Encountered the symbol "DD" when expecting one of the
         following:
         * & = - + ; < / > at in is mod remainder not rem
         <an exponent (**)> <> or != or ~= >= <= <> and or like LIKE2_
         LIKE4_ LIKEC_ between || multiset member SUBMULTISET_
         The symbol "*" was substituted for "DD" to continue.

6/49     PLS-00103: Encountered the symbol ")
         FROM   DUAL" when expecting one of the following:
         . ( * @ % & = - + ; < / > at in is mod remainder not rem
         <an exponent (**)> <> or != or ~= >= <= <> and or like LIKE2_

LINE/COL ERROR
-------- -----------------------------------------------------------------
         LIKE4_ LIKEC_ between || member SUBMULTISET_
         The symbol "*" was substituted for ")
         FROM   DUAL" to continue.

From ( SELECT To_CHAR(SYSDATE,''DD/MM/YYYY'')

v_query1  Varchar2(10000):=
  5         q'!Select Count(*)
  6         From ( SELECT To_CHAR(SYSDATE,'DD/MM/YYYY')
  7         FROM   DUAL!';

v_query1  Varchar2(10000):=
   'select Count(*)'||' '||
   'from ( SELECT To_CHAR(SYSDATE,''DD/MM/YYYY'')'||' '||
   'FROM   DUAL!';

SQL> select sql_fulltext from v$sql where sql_fulltext like '%fga$%';
SQL_FULLTEXT
---------------------------------------------------------------------------------------
Declare
  nb pls_integer := 0;
Begin
  dbms_output.put_line (' ');
  For rec in (
    select owner, view_name, text
    from dba_views
    where text_length < 32*1024
    order by 1, 2
  ) loop
    If upper(rec.text) like '%'||upper('fga$')||'%' then
      dbms_output.put_line (rec.owner||'.'||rec.view_name);
      nb := nb + 1;
    End if;
  End loop;
  If nb > 1 then
    dbms_output.put_line (' ');
    dbms_output.put_line (nb||' views found');
  Elsif nb > 0 then
    dbms_output.put_line (' ');
    dbms_output.put_line (nb||' view found');
  Else
    dbms_output.put_line ('No view found');
  End if;
  dbms_output.put_line (' ');
  nb := 0;
  For rec in (
    select owner, view_name, text_length
    from dba_views
    where text_length >= 32*1024
    order by 1,2
  ) loop
    If nb = 0 then dbms_output.put_line ('Skipped view(s):'); End if;
    dbms_output.put_line
      ('  '||rec.owner||'.'||rec.view_name||': '||rec.text_length);
    nb := nb + 1;
  End loop;
  If nb > 0 then
    dbms_output.put_line (' ');
  End if;
End;
select sql_fulltext from v$sql where sql_fulltext like '%fga$%'

2 rows selected.