oracle查询一个字符串所在表

我先建了一个表
create table data_table 
(tablename varchar2(40),
clo varchar2(40),
data varchar2(40),
exe_date date);


declare c varchar2(30);
  begin
  -- Call the procedure
  c :='AAFUNCT110900000066';
  p_data (c);
end;
 
--select count(*) from data_table
 
创建或修改存储过程
create or replace procedure p_data
(
 in_data in varchar2 --输入的参数，就是上边我输入的abc
)
is
--设置变量，你看名字应该基本都能看懂
  v_tablename   varchar2(40);
  v_cloumn_name varchar2(40);
  --v_date_type   varchar2(40);
  v_count     int;
  v_sql       varchar2(2000);
  v_data_type varchar2(40);
  --按照如下条件取出游标，其中USERS是表空间，那个地方你可以改
  cur_data SYS_REFCURSOR;
 
begin--判断是数字
  if Lower(in_data) = Upper(in_data) then
  v_sql :=' select A.TABLE_NAME, A.COLUMN_NAME, A.data_type from USER_TAB_COLUMNS A, TABS B WHERE A.TABLE_NAME = B.TABLE_NAME'
     ||' AND B.tablespace_name like ''NNC_%'' and (A.data_type = ''NUMBER'') ORDER BY A.TABLE_NAME, A.COLUMN_NAME;'; --USERS
  open cur_data for v_sql;--打开游标
  loop
    fetch cur_data
      into v_tablename, v_cloumn_name, v_data_type;
    exit when cur_data%notfound;
    --取出游标里的各个变量，拼成动态sql语句，
  
      if v_data_type = 'NUMBER' then
       v_sql := 'select count(*) from ' || v_tablename || ' where ' || v_cloumn_name || ' = ' ||in_data;
      end if;
    execute immediate v_sql
      into v_count;
    --如果查询出来的条数大于，则将查询中的表名，字段名和输入的内容插入到我建的那个表中
    if v_count > 0 then
      v_sql := 'insert into data_table values (''' || v_tablename ||
              ''',''' || v_cloumn_name || ''',''' || in_data ||
              ''',sysdate)';
      execute immediate v_sql;
      commit;
    end if;
  end loop;
  close cur_data;
  else--不是数字
   v_sql :=' select A.TABLE_NAME, A.COLUMN_NAME, A.data_type from USER_TAB_COLUMNS A, TABS B WHERE A.TABLE_NAME = B.TABLE_NAME'
     ||' AND B.tablespace_name like ''NNC_%'' and (A.data_type = ''VARCHAR2'') ORDER BY A.TABLE_NAME, A.COLUMN_NAME'; --USERS
  open cur_data for v_sql;--打开游标
  loop
    fetch cur_data
      into v_tablename, v_cloumn_name, v_data_type;
    exit when cur_data%notfound;
    --取出游标里的各个变量，拼成动态sql语句，
      if v_data_type = 'VARCHAR2' then
       v_sql := 'select count(*) from ' || v_tablename || ' where instr(' || v_cloumn_name || ',''' || in_data || ''')>0';
      else
       v_sql := 'select count(*) from data_table where 1=2';
      end if;
    execute immediate v_sql into v_count;
    --如果查询出来的条数大于，则将查询中的表名，字段名和输入的内容插入到我建的那个表中
    if v_count > 0 then
      v_sql := 'insert into data_table values (''' || v_tablename || ''',''' || v_cloumn_name || ''',''' || in_data || ''',sysdate)';
      execute immediate v_sql;
      commit;
    end if;
  end loop;
  close cur_data;
  end if;
--end;
end p_data;