Искать все столбцы, все таблицы для определенного значения

Question

Я знаю, что это дублированный вопрос, но я не мог найти способ возобновить обсуждение. Я пытаюсь создать сохраненный процесс, который будет искать все столбцы во всех таблицах для значения. Это то, что я создал до сих пор:

CLEAR SCREEN 
SET VERIFY OFF 
ACCEPT val CHAR PROMPT 'What value do you want to search for: ' 
CLEAR SCREEN; 
DECLARE 
match_count integer; 
v_search_string varchar2(4000) := <<val>>; 
BEGIN 
FOR t IN (SELECT owner, 
table_name, 
column_name 
FROM all_tab_columns 
WHERE data_type in ('CHAR', 'VARCHAR2', 'NCHAR', 'NVARCHAR2', 
'CLOB', 'NCLOB')) 
LOOP 
    BEGIN 
    EXECUTE IMMEDIATE  
     'SELECT COUNT(*) FROM '||t.owner || '.' || t.table_name|| 
     ' WHERE '||t.column_name||' = :1' 
     INTO match_count 
     USING v_search_string; 
    IF match_count > 0 THEN 
     dbms_output.put_line(t.owner || '.' || t.table_name ||' '||t.column_name||' '||match_count); 
    END IF; 

    EXCEPTION 
     WHEN others THEN 
     dbms_output.put_line('Error encountered trying to read ' || 
      t.column_name || ' from ' || 
      t.owner || '.' || t.table_name); 
    END; 
END LOOP; 
END; 
/

но я получаю ошибки. Любая помощь будет высоко оценен!!

Answer 1

Смотрите комментарии:

CLEAR SCREEN 
SET VERIFY OFF 
ACCEPT val CHAR PROMPT 'What value do you want to search for: ' 
CLEAR SCREEN; 

DECLARE 
    match_count        INTEGER; 
    v_search_string       VARCHAR2(4000) := '&val'; /* this was <<val>> */ 
BEGIN 
    FOR t IN (SELECT owner, 
        table_name, 
        column_name 
       FROM all_tab_columns 
       WHERE data_type IN ('CHAR', 
            'VARCHAR2', 
            'NCHAR', 
            'NVARCHAR2', 
            'CLOB', 
            'NCLOB')) 
    LOOP 
     BEGIN 
      EXECUTE IMMEDIATE 'SELECT COUNT(*) FROM ' || t.owner || '.' || t.table_name || ' WHERE ' || t.column_name || ' = :1' INTO match_count USING v_search_string; 

      IF match_count > 0 
      THEN 
       DBMS_OUTPUT.put_line(t.owner || '.' || t.table_name || '  ' || t.column_name || ' ' || match_count); 
      END IF; 
     EXCEPTION 
      WHEN OTHERS 
      THEN 
       DBMS_OUTPUT.put_line('Error encountered trying to read ' || t.column_name || ' from ' || t.owner || '.' || t.table_name); 
     END; 
    END LOOP; 
END; 
/