[PL/SQL]Procédure qui se compile avec des erreurs

Version imprimable

Bonjour à tous,
j'essais de créer une procédure stockée mais je n'arrive pas à la compiler.
La voici
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 create or replace procedure augmenterPrix (numType type.ntype%type, numfourn fournisseur.nfourn%type, prctg float) IS declare numpiece piece.npiece%type; cursor curseur_augmenter is select npiece from piece where fournisseur.nfourn = piece.nfourn and ntype = numtype and nfourn = numfourn; begin open curseur_augmenter; fetch curseur_augmenter into numpiece; while curseur_augmenter%found loop update piece set prixpiece = prixpiece * prctg where npiece= numpiece; fetch curseur_augmenter into numpiece; end loop; close curseur_augmenter; end;
Je li et reli mon code mais pas moyen de trouver la cause. J'ai un message d'erreur sur le IS et sur le end;.
(petites précisions je taf sur sqldevelopper et ma base est sous oracle 10g express).

Salut

Teste ça :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
...
BEGIN
OPEN curseur_augmenter;
LOOP
  FETCH curseur_augmenter INTO numpiece;
  EXIT WHEN curseur_augmenter%NOTFOUND;
 
  UPDATE piece SET prixpiece = prixpiece * prctg
  WHERE npiece= numpiece;
 
END LOOP;
...

Sylvain

12/03/2009, 16h49
yoann7

Merci de ta réponse mais ça n'a rien changé, toujours les mêmes erreurs aux mêmes endroits.
12/03/2009, 16h53
iSylvain

Et ça dit quoi comme erreur ?
et a quel endroit ?
12/03/2009, 16h57
Invité

Citation:

Envoyé par yoann7

Merci de ta réponse mais ça n'a rien changé, toujours les mêmes erreurs aux mêmes endroits.

C'est n'est pas vraiment constructif quand on ne les fournit pas...
12/03/2009, 17h01
Invité

Code:

Erreur(4,1): PLS-00103: Encountered the symbol "DECLARE" when expecting one of the following: begin function package pragma procedure subtype type use <identificateur> <identificateur entre guillemets> form current cursor external language The symbol "begin" was substituted for "DECLARE" to continue.

Et si tu retirais ton DECLARE déjà ???

Note : le forum n'est pas fait pour de la correction de syntaxe.

Bonjour,

apres tout ca il semblerait que tu fasses intervenir 3 tables.

mais dans ton code

Code:

1
2
3
4
5
6
7
8
9
10
11
 
procedure augmenterPrix 
				(numType type.ntype%type, numfourn fournisseur.nfourn%type, prctg float) IS
declare
numpiece piece.npiece%type;
cursor curseur_augmenter IS
	SELECT npiece
	FROM piece 
	WHERE fournisseur.nfourn = piece.nfourn
	AND ntype = numtype
	AND nfourn = numfourn;

la syntaxe n'est pas bonne

regarde dans la doc comment on fait pour les jointures ....

http://sqlpro.developpez.com/cours/sqlaz/jointures/

Code:

1
2
3
4
5
6
7
 
 
SELECT C.CLI_ID, C.CLI_NOM, T.TEL_NUMERO, E.EML_ADRESSE, A.ADR_VILLE
FROM T_CLIENT C, T_TELEPHONE T, T_ADRESSE A, T_EMAIL E
WHERE C.CLI_ID = T.CLI_ID
  AND C.CLI_ID = A.CLI_ID
  AND C.CLI_ID = E.CLI_ID

Merci pour les réponses, j'ai enlever la jointure: elle ne servait a rien en fait car je travail que dans une table.
J'ai enlevé le declare, et maintenant j'ai 2 erreurs dans la requête.

Error(6,2): PL/SQL: SQL Statement ignored
error(8,2): PL/SQL:ORA-00933: la commande SQL ne se termine pas correctement

Mon code:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 create or replace procedure augmenterPrix (numType type.ntype%type, numfourn fournisseur.nfourn%type, prctg float) IS numpiece piece.npiece%type; cursor curseur_augmenter is select npiece from piece and ntype = numtype and nfourn = numfourn; begin open curseur_augmenter; fetch curseur_augmenter into numpiece; while curseur_augmenter%found loop update piece set prixpiece = prixpiece * prctg where npiece= numpiece; fetch curseur_augmenter into numpiece; end loop; close curseur_augmenter; end;

12/03/2009, 20h15
Invité
Code:

1 2 3 4 select npiece from piece and ntype = numtype and nfourn = numfourn;
As-tu fais l'effort de lire et de comprendre ce que tu fais ?
Pour écrire une requête sql, je te conseille le lien suivant pour commencer : http://tahe.developpez.com/divers/sql/
On va mettre ça sur le coup du surmenage...
12/03/2009, 20h24
yoann7

effectivement, le surmenage je viens de voir...
c'est bon la procédure est compilée.

Maintenant que tu as compris les curseurs, tu peux aussi utiliser la version simple :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
create or replace
procedure augmenterPrix
  (
    numType type.ntype%type,
    numfourn fournisseur.nfourn%type,
    prctg float )
IS 
  update piece 
    set prixpiece = prixpiece * prctg 
    where npiece = numpiece 
         and ntype = numtype ;
  commit;
end;
/

12/03/2009, 20h59
iSylvain

D'ailleurs dans la version précédente, il ne faut pas oublier le commit.
=>Cf. la version simple

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
CREATE OR REPLACE
procedure augmenterPrix
  (
    numType type.ntype%type,
    numfourn fournisseur.nfourn%type,
    prctg float )
IS 
  UPDATE piece 
    SET prixpiece = prixpiece * prctg 
    WHERE ntype = numtype 
	 and nfourn = numfourn;
  commit;
end;
/