複用Oracle資料字典解析出SQL語句中用到的所有表

原理：每個sql語句都它的執行計劃，並且執行計劃會放在plan_table中，plan_table中有object_name一列，該列表示sql語句中的物件名字，執行計劃對錶很感興趣，所以如果object_type=’TABLE’,那麼object_name就是我們要擷取的table_name

執行步驟：

1、建立tmp_table 表，存放job名job_id,sql語句select_sql,和表名object_name

create table tmp_table(job_idvarchar2(50),select_sql clob,object_name varchar2(50));

模擬資料：

                                 A job中是一條比較短的sql語句        

    B job中是一條比較長的sql語句   

INSERTINTO TMP_TABLE VLAUES(‘A’,q’[A中的內容]’);

INSERTINTO TMP_TABLE VLAUES(‘B’,q’[B中的內容]’);

Commit;

2、建立p儲存過程,根據執行計劃

--以下是用4000以下的A job和4000 以上的B一起執行

create or replace procedure sqljiexiqi as

v_str  varchar2(4000);

v_sql  varchar2(4000);

v_sql1 varchar2(4000);

v_sql2 varchar2(4000);

v_sql3 varchar2(4000);

v_sql4 varchar2(4000);

v_sql5 varchar2(4000);

v_sql6 varchar2(4000);

v_sql7 varchar2(4000);

v_sql8 varchar2(4000);

v_sql9 varchar2(4000);

begin

dbms_output.enable(8000);

execute immediate 'truncate table tmp_table';

  forc in (select job_id, select_sql

              from bds.etl_job_info

            where length(trim(select_sql)) < 4000

               and job_id = 'A') loop

   v_sql := 'explain plan SET STATEMENT_ID=''' || c.job_id || ''' for ' ||

            c.select_sql;

   execute immediate v_sql;

   for re in (select distinct object_name

                 from plan_table

                where statement_id = c.job_id

                  and object_type = 'TABLE') loop

     insert into tmp_table

       (job_id, select_sql, object_name)

     values

       (c.job_id, c.select_sql, re.object_name);

   end loop;

   commit;

  endloop;

  forc in (select job_id, select_sql

              from bds.etl_job_info

            where length(trim(select_sql)) > =4000

               and job_id ='SJ_AS_CM_MORT_DTL_D') loop

   v_str  := 'explain plan SETSTATEMENT_ID=''' || c.job_id || ''' for ';

   v_sql  := substr(c.select_sql, 1,4000);

   v_sql1 := substr(c.select_sql, 1 * 4000 + 1, 4000);

   v_sql2 := substr(c.select_sql, 2 * 4000 + 1, 4000);

   v_sql3 := substr(c.select_sql, 3 * 4000 + 1, 4000);

   v_sql4 := substr(c.select_sql, 4 * 4000 + 1, 4000);

   v_sql5 := substr(c.select_sql, 5 * 4000 + 1, 4000);

    v_sql6:= substr(c.select_sql, 6 * 4000 + 1, 4000);

   v_sql7 := substr(c.select_sql, 7 * 4000 + 1, 4000);

   v_sql8 := substr(c.select_sql, 8 * 4000 + 1, 4000);

   v_sql9 := substr(c.select_sql, 9 * 4000 + 1, 4000);

   execute immediate v_str || v_sql || v_sql1 || v_sql2 || v_sql3 ||

                      v_sql4 || v_sql5 ||v_sql6 || v_sql7 || v_sql8 ||

                      v_sql9;

   for re in (select distinct object_name

                 from plan_table

                where statement_id = c.job_id

                  and object_type = 'TABLE')loop

     insert into tmp_table

       (job_id, select_sql, object_name)

     values

       (c.job_id, c.select_sql, re.object_name);

   end loop;

   commit;

  endloop;

end;

3、執行儲存過程

   exec sqljiexiqi;

   

4、查詢tmp_table表，得到sql中有哪些表

select * from tmp_table;