Discussion :

[bguihal]

voila j'ai un ensemble de requête sql (plusieurs millier) dans une table, et j'aimerai retrouver les tables rattachés. je donne un exemple :

"select tutu from matable"
--> matable
"select tutu from matable,matable2 where monchamp=1"
-->matable
-->matable2

oracle doit le faire en interne donc ça doit être jouable normalement.

merci d'avance.

[fatsora]

Bonjour,

Quelle est ta version Oracle ?

tu a v$sql,v$$sql_text,v$sqlarea pour commencer ....

[GoLDoZ]

Avec un algorithme qui va bien, vous pouvez récupérer toutes les chaînes comprises entre les FROM et les WHERE de chaque requête (en tenant compte des virgules, des alias et des schémas).

[laurentschneider]

oracle doit le faire en interne donc ça doit être jouable normalement.

bien raisonné !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
create table lsc_matable(tutu number);
create table lsc_matable2(monchamp number);
create table lsc_t(txt varchar2(4000));
insert into lsc_t(txt) values ('select tutu from lsc_matable');
insert into lsc_t(txt) values ('select tutu from lsc_matable,lsc_matable2 where monchamp=1');
commit;

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
begin 
  for f in (select * from lsc_t) loop
    dbms_output.put_line('txt : '||f.txt);
    delete plan_table;
    execute immediate 'explain plan for '||f.txt;
    for g in (select * from plan_table where object_name is not null) loop
      dbms_output.put_line('  --> '||g.object_owner||'.'||g.object_name);
    end loop;
  end loop;
end;
/

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
txt : select tutu from lsc_matable
  --> TGPOWNER.LSC_MATABLE
txt : select tutu from lsc_matable,lsc_matable2 where monchamp=1
  --> TGPOWNER.LSC_MATABLE
  --> TGPOWNER.LSC_MATABLE2

[GoLDoZ]

Excellente solution, bien meilleure que la mienne.

[laurentschneider]

si tu veux un aperçu global des dépendances, tu peux aussi tenter :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
delete plan_table;
begin 
  for f in (select * from lsc_t) loop
    execute immediate 'explain plan for '||f.txt;
  end loop;
end;
/
select distinct object_owner, object_name from plan_table ;