Discussion :

[lafuse]

Bonjour,

je souhaiterais lancer une requete dynamique sur toutes les tables d'un schéma.

Avec un premier curseur je ramene le nom de toutes les tables du schéma,
puis je construis ma requete avec une variable que j'éxécute via :

LC$Requete:= 'SELECT distinct(dt_deb_tran),count(*) from '|| NOMTABLE || 'group by dt_deb_tran' ;

EXECUTE IMMEDIATE LC$Requete INTO date_retourne ;

Le probléme est que cette requete me ramène plusieurs lignes, je ne peux donc pas utiliser cet ordre.

J'ai bien essayé de passer par un second curseur, imbriqué dans le premier, mais on a pas la possibilité de créer un curseur avec le nom de la table en variable dans la clause from ( comme dans le premier exemple donné plus haut ).

J'ai bien fouillé tout le forum avant de poser cette question, mais la je suis vraiment bloqué.


Merci pour votre aide.

[thg]

Tu peux d'inspirer de ceci ... J'ai testé en 10g mais pas en 9i ...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
 
CREATE OR REPLACE PROCEDURE TEST_CUR IS
 
Type myCur IS REF CURSOR;
cur myCur;
 
rec EMP%ROWTYPE;
stmt VARCHAR2(32767);
matable varchar2(30);
 
 
 
BEGIN
 
matable := 'EMP';
 
stmt := 'select * from ' || matable;
 
OPEN cur FOR stmt;
 
LOOP
  FETCH cur INTO rec;
  EXIT WHEN cur%NOTFOUND;
 
  DBMS_OUTPUT.PUT_LINE('Ename = ' || rec.ename);
END LOOP;
 
CLOSE cur;
 
END ;
 
/
 
show error;
[quote][/quote]

[lafuse]

OK, merci, cela répond presque totalement a mon besoin. Mon seul problème
est que l'on ne peut pas paramétrer le %ROWTYPE.

En fait au lieu de rec EMP%ROWTYPE; j'aurais bien souhaité avoir une ligne du style rec NOMTABLE%ROWTYPE;

Mais merci beaucoup pour ta réponse , il me semble être sur la bonne voie.

[orafrance]

non, c'est impossible.

[plaineR]

Au lieu de créer une variable de type "matable%rowtype;" rien ne t'empêche de créer un record de cette manière :

Code :

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

1
2
3
4
5
type result_rec is record (dt_deb_tran date,
                           nb number);
type cur_rec is ref cursor return result_rec;
cur cur_rec;
rec result_rec;

[lafuse]

ok merci, j'ai pu résoudre mon problème.

A bientot