Discussion :

[atruong]

Est-il possible de lever une exception en la spécifiant une seule fois pour 2 blocs séparés au sein d'une procédure ?

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
 
BEGIN
 
-- BLOC1
BEGIN
..
EXCEPTION
END;
 
-- BLOC2
BEGIN
..
EXCEPTION
END;
 
EXCEPTION
WHEN EXCEPTION_GENERALE THEN
...
 
END;

[plaineR]

Oui, si elle n'est pas catchée au niveau des 2 sous block
exemple:

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
 
begin
  begin
    select col1 into v_col1 from ma_table1;
  exception
    when no_data_found then
      dbms_output.put_line ('aucune ligne trouvee pour table1');
  end;
  begin
    select col1 into v_col2 from ma_table2;
  exception
    when no_data_found then
      dbms_output.put_line ('aucune ligne trouvee pour table2');
  end;
  select col1 into v_col3 from ma_table3;
exception
   when no_data_found then
      dbms_output.put_line ('aucune ligne trouvee pour table3');
    when too_many_rows then
      dbms_output.put_line ('plus d'une ligne dans table1, table2 ou table3');
end;

L'exception no_data_found ne captera pas les exceptions des 2 sous-blocks, par contre too_many_rows si, car elle n'est pas captée avant.

[atruong]

Super !
Bonjour plaineR et merci pour ta réponse