Boucle WHILE sous oracle

Version imprimable

Bonjour,

je fait une maquette avec oracle 10g et mon objectif est de créer des comptes utilisateurs automatiquement, à partir de la table "conducteur" de ma BDD, en utilisant une boucle WHILE

Le nom du compte correspondra au "nom_conducteur", et le mot de passe au "prenom_conducteur".
En utilisant les divers tuto j'en suis arrivé au résultat suivant :
Code:

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 DECLARE /*je declare les variables dont j'ai besoin*/ var1 varchar(50), var2 varchar (50), login varchar (12), pwd varchar (12); DECLARE /*je declare mon curseur qui contient le résultat de la requette suivante*/ curseur CURSOR for SELECT nom_conducteur, penom_conducteur FROM conducteur ORDER BY nom_conducteur; BEGIN OPEN curseur; FETCH curseur INTO @login, @pwd;/*je remplis les variables qui vont contenir nom_conducteur dans login et prenom_conducteur dans pwd*/ WHILE @@FETCH_STATUS=0 /*la varible 1 va contenir la synthaxe de création de compte*/ @var1:='create user' ||login||; @var1:=@var1||'identified by' ||pwd; execute immediate @var1; /*la variable 2 va contenir la synthaxe d'attribution des droits aux comptes*/ @var2:='grant connect to' ||login; execute immediate @var2; CLOSE curseur; DEALLOCATE curseur; END;
Néanmoins deux problème se posent :
-le premier : comme je débute en SQL, je ne sais pas comme utiliser ce code dans ma BDD
-le second : je ne suis pas sûre de la syntaxe de mon code et je ne peux la vérifier parce que je ne sais pas comme on l'utilise dans une BDD

Voila si qlqun peut me dépanner ça serait sympa

Tu y étais presque ;)
Ton code doit ressembler à quelque chose du genre :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
DECLARE /*je declare les variables dont j'ai besoin*/
	var1 varchar(50);
	var2 varchar (50);
	login varchar (12);
	pwd varchar (12);
 
CURSOR curseur IS
	SELECT nom_conducteur, prenom_conducteur
	FROM conducteur
	ORDER BY nom_conducteur;
 
BEGIN
	OPEN curseur;
	loop
		FETCH curseur INTO login, pwd;
		EXIT WHEN curseur%NOTFOUND;
		dbms_output.put_line('create user ' || login || ' identified by ' || pwd || ';');
		dbms_output.put_line('grant connect to ' || login || ';');
	end loop;	
	CLOSE curseur;
END;

Je te laisse le modifier en remplaçant les lignes commençant par : dbms_output ....

Bon courage

Rachid

Une autre façon de l'écrire, avec le WHILE.

Code:

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
DECLARE                            /*je declare les variables dont j'ai besoin*/
   var1    VARCHAR (50);
   var2    VARCHAR (50);
   login   VARCHAR (12);
   pwd     VARCHAR (12);
 
   CURSOR curseur
   IS
      SELECT   nom_conducteur, prenom_conducteur
          FROM conducteur
      ORDER BY nom_conducteur;
BEGIN
   OPEN curseur;
 
   FETCH curseur
    INTO login, pwd;
 
   WHILE curseur%FOUND
   LOOP
      /*la varible 1 va contenir la synthaxe de création de compte*/
      var1 := 'create user' || login || 'identified by' || pwd;
 
      EXECUTE IMMEDIATE var1;
 
      /*la variable 2 va contenir la synthaxe d'attribution des droits aux comptes*/
      var2 := 'grant connect to' || login;
 
      EXECUTE IMMEDIATE var2;
   END LOOP;
 
   CLOSE curseur;
END;

NB: les variables s'utilisent avec leur nom déclaré, pas de '@' devant.

ou tout simplement :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
BEGIN
    FOR conducteur IN (SELECT   nom_conducteur nom, prenom_conducteur prenom
          FROM conducteur
      ORDER BY nom_conducteur)
    LOOP
      EXECUTE IMMEDIATE 'create user ' || conducteur.nom || ' identified by ' || conducteur.prenom;
 
       EXECUTE IMMEDIATE 'grant connect to ' || conducteur.nom;
 
 
   END LOOP;
 
END;

Attention à penser aux espaces dans les chaines de caractères ;)

Citation:

Envoyé par GoLDoZ

Une autre façon de l'écrire, avec le WHILE.

Code:

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
DECLARE                            /*je declare les variables dont j'ai besoin*/
   var1    VARCHAR (50);
   var2    VARCHAR (50);
   login   VARCHAR (12);
   pwd     VARCHAR (12);
 
   CURSOR curseur
   IS
      SELECT   nom_conducteur, prenom_conducteur
          FROM conducteur
      ORDER BY nom_conducteur;
BEGIN
   OPEN curseur;
 
   FETCH curseur
    INTO login, pwd;
 
   WHILE curseur%FOUND
   LOOP
      /*la varible 1 va contenir la synthaxe de création de compte*/
      var1 := 'create user' || login || 'identified by' || pwd;
 
      EXECUTE IMMEDIATE var1;
 
      /*la variable 2 va contenir la synthaxe d'attribution des droits aux comptes*/
      var2 := 'grant connect to' || login;
 
      EXECUTE IMMEDIATE var2;
   END LOOP;
 
   CLOSE curseur;
END;

NB: les variables s'utilisent avec leur nom déclaré, pas de '@' devant.

Je pense que ça fait une boucle infinie.
Il ne manquerait pas un FETCH à l'intérieur de la boucle, juste avant le END LOOP ?

26/05/2009, 12h33
GreenCard

Un grand merci à tous pour vos explications.
J'ai encore quelques comptes qui ne se crées pas mais je pense pouvoir régler la chose tout seul en utilisant ce que vous m'avez dis.

Citation:

Envoyé par xdescamp

Je pense que ça fait une boucle infinie.
Il ne manquerait pas un FETCH à l'intérieur de la boucle, juste avant le END LOOP ?

J'ai aussi l'impression que ça fait une boucle infinie.
Quand je le lance il me créer le premier utilisateur, puis une erreur se produit : cet utilisateur est en conflit avec un autre utilisateur ou rôle.
Je pense donc que le programme créer à chaque fois le premier utilisateur.

Si tu sait ce qu'il faut rajouter à l'intérieur de la boucle pour éviter que ça fasse une boucle infinie je suis preneur ;)
26/05/2009, 12h34
GoLDoZ
Citation:

Envoyé par xdescamp

Je pense que ça fait une boucle infinie.
Il ne manquerait pas un FETCH à l'intérieur de la boucle, juste avant le END LOOP ?

Si! Toutes mes confuses...:oops:
Code:

1 2 3 4 5 6 WHILE curseur%FOUND LOOP ....... EXECUTE IMMEDIATE var2; FETCH curseur INTO login, pwd; END LOOP;
Je n'utilise que rarement cette façon d'écrire, justement parce que je trouve le code trop lourd.

Citation:

Envoyé par GreenCard

Si tu sait ce qu'il faut rajouter à l'intérieur de la boucle pour éviter que ça fasse une boucle infinie je suis preneur ;)

"FETCH curseur INTO login, pwd;" avant le "END LOOP".
26/05/2009, 13h31
orafrance

FOR c'est la vie :mouarf:
27/05/2009, 11h39
GreenCard

Citation:

Envoyé par GoLDoZ

"FETCH curseur INTO login, pwd;" avant le "END LOOP".

Merci