Discussion :

[jmclej]

Bonjour,
Je cherche à faire un "select into" dans une table qui fonctionne bien sauf quand la condition where ne retourne rien. Au lieu de ne juste rien inséré, une exception est levée... Y a-t-il moyen de modifier ce comportement s'il vous plaît ?
Merci

EDIT : Pour compléter un peu mon besoin, je précise que je suis dans une procédure stockée où je dois effectuer une trentaine d'insertions d'affilé, indépendants les uns des autres. Si mon premier select into retourne vide, ce n'est pas une erreur, ça veut juste dire que je ne dois rien insérer dans cette table. Je veux donc passer à l'insertion via select into suivant, etc. Si je gère une exception no_data_found à la fin de ma procédure, comment est-ce que je peux lui dire de juste revenir exécuter le code suivant ? A moins d'utiliser des goto...

[Scriuiw]

Le sujet concerne plutôt du PL/SQL que du SQL
Sinon pour vous aider au mieux il faudrait que nous ayons le code sous les yeux.

Comment sont enchaîner les insert ?
Via un curseur ?

Il est possible d'éviter de lever une exception en utilisant un MAX par exemple, dans ce cas si aucune donnée n'est trouvée alors le résultat sera NULL.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
select noemp
from employe
where noemp=-1;

aucune ligne sélectionnée


select MAX(noemp)
from employe
where noemp=-1;

MAX(noemp)
--------------

Mais cela reste du "bricolage" il est bien plus conseillé de gérer ces cas avec... les exceptions.

[jmclej]

Effectivement, si un admin peut bouger ce thread en PL/SQL si c'est plus approprié, pas de problème bien sûr.
Voici le squelette de ma procédure pour plus de clarté :

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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
CREATE OR REPLACE PROCEDURE DOUPDATES
(
  VAL1 IN VARCHAR2
, res out number
, errorText out varchar2) as
err exception;
begin
 
--start transaction;
res := 0;
errorText := '';
 
if VAL1 is null then
	res := -1;
	errorText := 'val1 is mandatory';
	raise err;
end if;
 
--firstInsert
insert into table1 (...)
select ...
from table1
where ...;
 
--secondInsert
insert into table2 (...)
select ...
from table2
where ...;
 
--thirdInsert
insert into table3 (...)
select ...
from table3
where ...;
 
...
 
dbms_output.put_line('WENT FINE');
 
commit;
 
Exception
   when err then
      dbms_output.put_line('WENT WRONG');
      rollback;
   when others then
      dbms_output.put_line('WENT WRONG');
      res := SQLCODE;
      errorText := SUBSTR(SQLERRM, 1, 100);
	  rollback;
 
null;
END DOUPDATES;

Si firstInsert n'insert rien, ce n'est pas une erreur, je dois juste passer à secondInsert puis à thirdInsert etc...
Sinon j'imagine bien qu'il y a la possibilité de faire un count(*) de ma requête avant chaque insert pour valider si je fais le insert into, mais je trouve ça très lourd...
Où alors il y a la possibilité suivante avec des GOTO aussi j'imagine qui serait intermédiaire :

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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
CREATE OR REPLACE PROCEDURE DOUPDATES
(
  VAL1 IN VARCHAR2
, res out number
, errorText out varchar2) as
lbGOTO varchar2(30) := 0;
err exception;
begin
 
--start transaction;
res := 0;
errorText := '';
 
if VAL1 is null then
	res := -1;
	errorText := 'val1 is mandatory';
	raise err;
end if;
 
lbGOTO := 'second';
<<firstInsert>>
insert into table1 (...)
select ...
from table1
where ...;
 
lbGOTO := 'third';
<<secondInsert>>
insert into table2 (...)
select ...
from table2
where ...;
 
lbGOTO := 'fourth';
<<thirdInsert>>
insert into table3 (...)
select ...
from table3
where ...;
 
lbGOTO := 'fifth';
<<fourthInsert>>
...
 
dbms_output.put_line('WENT FINE');
 
commit;
 
Exception
   when no_data_found then
	  if lbGOTO = 'second' then
		GOTO secondInsert
	  else if lbGOTO = 'third' then
		GOTO thirdInsert
	  else if lbGOTO = 'fourth' then
		GOTO fifthInsert
	  end if;
   when err then
      dbms_output.put_line('WENT WRONG');
      rollback;
   when others then
      dbms_output.put_line('WENT WRONG');
      res := SQLCODE;
      errorText := SUBSTR(SQLERRM, 1, 100);
	  rollback;
 
null;
END DOUPDATES;

EDIT : J'ai vu que je pourrais aussi imbriquer des block begin/end apparemment avec un traitement exception dans chaque mais vu le nombre d'insertions que je dois gérer, ce serait illisible. Possibilité de désactiver la levée de l'exception no_data_found peut-être ?

[skuatamad]

Vous confondez insert into ... select... qui ne génère pas d'exception quand aucune ligne n'est insérée et select into qui génère NO_DATA_FOUND si pas de données renvoyées.

Votre 1er bloc de code exemple fonctionne donc à priori comme vous le souhaitez.

Par ailleurs, il est préférable de renvoyer une exception plutôt qu'un code erreur.
Donc raise_application_error pour les exceptions personalisées et ne pas catcher when others, un code erreur pouvant facilement être ignoré.

Mais parfois la gestion en code erreur est considérée comme le standard de développement dans certaines entreprises.

[jmclej]

Merci skuatamad,
Effectivement, je me suis embrouillé et j'ai donc pu avoir le bon fonctionnement tel que je l'espérais.