Discussion :

[sheridan08]

bonsoir a tous
voila j'ai un souci avec ma fonction , le probleme c'est qu'elle marche sur une autre machine mais pas sur la mienne
d'abord voici le code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
create or replace PROCEDURE Augmenter (numprojet varchar, pourcent integer) IS
anc_bdg integer;
new_bdg integer;
incoherence EXCEPTION;
BEGIN
select budjet into anc_bdg from projet where codeprj=numprojet;
new_bdg := anc_bdg+(anc_bdg*pourcent)/100;
IF (new_bdg <= 6000000) THEN RAISE incoherence;
ELSE
UPDATE PROJET SET budjet = new_bdg WHERE codeprj = numprojet;
END IF;
EXCEPTION WHEN incoherence THEN
dbms_output.put_line('Le nouveau budget a depassé 6000000');
END;/

Code :

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

Execute Augmenter('P1',10) ;

le shema de ma table est comme suit:

Code :

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

create table Projet (CodePrj char (4) primary key, Date_debut date, Date_Fin date, Responsable char(40),TypePrj char(9), budjet number(9));

et mes erreur sont:

Code :

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

1
2
3
4
ERROR at line 1:
ORA-01403: no data found
ORA-06512: at "User.AUGMENTER", line 6
ORA-06512: at line 1

je pense qu'il n'execute pas le (select into d'apres le type d'erreur), mais j'ai verifié les tuples sont bien inserés
si quelqu'un a une idée !je suis preneuse
merci d'avance

[tedo01]

Bonjour,
Manifestement le SELECT ne renvoie rien.
Que contient la table Projet pour le projet P1 ?
Est-ce que le SELECT exécuté manuellement avec ces paramètres retourne quelque chose ?

[ORA-007]

Bonjour,

Code :

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

SELECT budjet INTO anc_bdg FROM projet WHERE codeprj=numprojet;

renvoie une exception de type NO_DATA_FOUND.

Encapsule comme ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
 
BEGIN 
       SELECT budjet INTO anc_bdg FROM projet WHERE codeprj=numprojet;
EXCEPTION 
       WHEN NO_DATA_FOUND THEN 
          -- que fait on dans ce cas là
       WHEN TOO_MANY_ROWS THEN
           -- et dans celui ci 
END;

[ojo77]

Pour un select into, l'instruction select doit remonter une et une seule ligne.

Si moins de une, alors l'exception NO_DATA_FOUND est levée.
Si plus d'une, alors l'exception TOO_MANY_ROWS est levée.

On peut contourner en utilisant, par exemple, un curseur :

Code :

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

1
2
3
4
5
6
7
begin
 for c in (SELECT budjet  FROM projet WHERE codeprj=numprojet)
 loop
  anc_bdg:=c.budget;
  -- suite des traitements
 end loop;
end;