Discussion :

[Captain_choko]

Bonjour,

Je souhaite utiliser un curseur comme dans mon exemple ci-dessous :

Code :

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

1
2
3
4
5
6
7
8
9
10
            
begin
        dbms_output.put_line('blablablablabla');
                
        for rec in (select col1, col2 from table1)
        loop
              if rec.col1 blablablabla
               else blablablabla;
        end loop;
end;

Sauf que ma table table1 n'est pas forcément présente dans mon schéma. Du coup, est-il possible de catcher cette erreur si elle se présente ?
(peut-être qu'il est possible de me contenter d'une requête SQL, mais là je voudrais bien me cantonner à l'utilisation d'un curseur si possib').

J'ai essayé de tester en amont la présence de ma table et de sortir si elle n'est pas présente mais j'ai quand même un gros message d'erreur sur cette table qui n'existe pas. Pb de compilation plus que d'exécution ?

Merci pour vos lumières...

[McM]

Regarde du côté des exceptions
http://sheikyerbouti.developpez.com/...age=Chap1#L1.3

Mais si le code est compilé (fonction en base,etc..) et que la table n'existe pas, c'est sur que ça ne marchera jamais.

[rabah_o]

Essayez un curseur dynamique:

Code sql :

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
declare
 
  type type_ref_cursor is ref cursor;
  cur type_ref_cursor;
  lc$col1 "type de col1";
  lc$col2 "type de col2";
  lc$existe integer;
 
declare
 
  type type_ref_cursor is ref cursor;
  cur       type_ref_cursor;
  lc$col1   "type de col1";
  lc$col2   "type de col2";
  lc$existe integer;
 
begin
 
  select count(*)
    into lc$existe
    from user_tables
   where table_name = 'TABLE1';
  if (lc$existe = 1) then
    open cur for 'select * from table1';
    loop
      fetch cur
        into lc$col1, lc$col2;
      dbms_output.put_line(lc$col1 || '   ' || lc$col2);
      exit when cur%notfound;
    end loop;
  end if;
 
end;

[Captain_choko]

Merci pour vos réponses.

Juste après mon post, j'ai un peu (beaucoup) cherché effectivement du côté des curseurs dynamiques. J'ai commencé par lorgner du côté de DBMS_SQL (trop long à mettre en place pour ce que j'avais à faire), puis du côté de EXECUTE IMMEDIATE. Au final, cela ressemble à cela :

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
 
declare
TYPE TYP_COL_SP IS TABLE OF SUPPORTS_PREP.su_code_barre%type ;
TabColSP TYP_COL_SP ;                             
Requete     VARCHAR2(200) ;
toto           NUMBER;
 
begin
toto=42;
 
Requete:= 'select blabla from blabla where blabla='||toto;
EXECUTE IMMEDIATE Requete BULK COLLECT INTO TabColSP ;
 
For i IN TabColSP.first..TabColSP .last Loop                       
    blablabla
End loop ;
end;

Après, niveau perf' ou autre, je ne sais pas ce qui est le mieux.
Encore merci d'avoir pris quelques instants pour me répondre.