Boucle WHILE "not properly ended"

Version imprimable

Hello,

J'essaie de faire une boucle WHILE sauf que j'ai le classique message d'erreur "not properly ended" et je ne trouve pas la solution. J'ai essayé tout ce qui me passait par la tête mais rien n'y fait. Le code est le suivant :
Code:

1 2 3 4 5 6 7 8 9 10 11 SELECT PRS_NOM, PRS_VILLE FROM T_PERSONNE_PRS BEGIN DECLARE i INTEGER; SET i = PRS_NOMBRE; WHILE i <> 1 DO INSERT INTO T_PERSONNE_PRS VALUES (PRS_NOM, PRS_VILLE, PRS_NOMBRE); SET i = i - 1; END WHILE RETURN i; END;
En gros j'ai une colonne avec un INTEGER, par exemple 3. Je veux assigner i = 3, ajouter la ligne correspondante, puis assigner i = 2. Refaire la boucle jusqu'à ce que i = 1, ce qui revient à ajouter i-1 fois la ligne.

Merci d'avance.

PS : le RETURN fait partie d'un de mes essais mais je ne vois pas trop l'utilité ici.

09/11/2010, 11h53
Waldar

Ça ressemble beaucoup à une requête SQLPro.
Si oui, c'est très certainement une syntaxe T-SQL (MS SQL-Server), pas PL/SQL (Oracle Database).

Machage de travail :roll:
Ens upposant que prs_nombre soit une variable :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
DECLARE
CURSOR cur_per is
SELECT PRS_NOM, PRS_VILLE
FROM T_PERSONNE_PRS;
C2 cur_per%rowtype;
i NUMBER;
BEGIN
OPEN cur_per;
FETCH cur_per INTO C1;
CLOSE cur_cper;
i:=prs_nombre;
WHILE i>1 LOOP
     INSERT INTO T_PERSONNE_PRS VALUES (C1.PRS_NOM, C1.PRS_VILLE, PRS_NOMBRE);
     i:=i-1;
END LOOP;
RETURN i;
END;

Et mieux en sql pur 8-)

Code:

1
2
3
4
5
6
BEGIN 
INSERT INTO T_PERSONNE_PRS
SELECT PRS_NOM, PRS_VILLE,nb
FROM T_PERSONNE_PRS,(select level nb from dual connect by level<prs_nombre) z;
END;