Bloc PL/SQL intégrant les requêtes SQL

Version imprimable

27/08/2008, 14h09
isi241

Bloc PL/SQL intégrant les requêtes SQL

on a deux tables ETUDIANT(numet, Nom, #NumBloc ) et
BLOC(NumBloc, effectifBloc)

Citation:

1-Définir un bloc PL/SQL intégrant les requêtes SQL nécessaires et permettant d'insérer dans la relation BLOC les tuples constitués du numéro de bloc et son effectif calculé.
2-Terminer le programme en validant la transaction par la commande COMMIT.

NB: on doit faire en deux cas .le premier sans l'utilisation de curseur et le second en utilisant le curseur [/QUOTE]

Si j'ai bien compris ton ennoncé, ça peut se faire comme ça :

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
33
34
35
36
37
38
39
40
41
42
43
44
/* Sans curseur */
 
BEGIN
 
INSERT INTO BLOC
(SELECT NumBloc, count(*)
FROM ETUDIANT
GROUP BY NumBloc);
 
COMMIT;
 
END;
/
 
 
/* Avec curseur */
 
DECLARE
 
	   CURSOR moncurseur IS
	   SELECT DISTINCT NumBloc
	   FROM ETUDIANT;
 
	   enr_moncurseur	moncurseur%rowtype; 
 
	   compte			NUMBER;
 
BEGIN
 
	 FOR enr_moncurseur 
	 IN moncurseur 
	 LOOP
   	   	 EXIT WHEN moncurseur%NOTFOUND;
 
		 	SELECT count(*) INTO compte FROM ETUDIANT WHERE NumBloc = enr_moncurseur.NumBloc;
 
	   		INSERT INTO BLOC VALUES (enr_moncurseur.NumBloc, compte);
 
	 END LOOP;
 
COMMIT;
 
END;
/

27/08/2008, 15h25
McM

Pas besoin de

Code:

EXIT WHEN moncurseur%NOTFOUND;

dans une boucle FOR LOOP

Citation:

Envoyé par Snipah

Si j'ai bien compris ton ennoncé, ça peut se faire comme ça :

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
33
34
35
36
37
38
39
40
41
42
43
44
/* Sans curseur */
 
BEGIN
 
INSERT INTO BLOC
(SELECT NumBloc, count(*)
FROM ETUDIANT
GROUP BY NumBloc);
 
COMMIT;
 
END;
/
 
 
/* Avec curseur */
 
DECLARE
 
	   CURSOR moncurseur IS
	   SELECT DISTINCT NumBloc
	   FROM ETUDIANT;
 
	   enr_moncurseur	moncurseur%rowtype; 
 
	   compte			NUMBER;
 
BEGIN
 
	 FOR enr_moncurseur 
	 IN moncurseur 
	 LOOP
   	   	 EXIT WHEN moncurseur%NOTFOUND;
 
		 	SELECT count(*) INTO compte FROM ETUDIANT WHERE NumBloc = enr_moncurseur.NumBloc;
 
	   		INSERT INTO BLOC VALUES (enr_moncurseur.NumBloc, compte);
 
	 END LOOP;
 
COMMIT;
 
END;
/

pourquoi tu n'as pas utilisé le fetch dans le cas avec le curseur?

27/08/2008, 15h48
plaineR

Parce que avec la syntaxe for, il n'y a pas besoin :
http://sheikyerbouti.developpez.com/...=Chap1#L1.2.13

un autre problème!!!!

Citation:

Envoyé par Snipah

Si j'ai bien compris ton ennoncé, ça peut se faire comme ça :

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
33
34
35
36
37
38
39
40
41
42
43
44
/* Sans curseur */
 
BEGIN
 
INSERT INTO BLOC
(SELECT NumBloc, count(*)
FROM ETUDIANT
GROUP BY NumBloc);
 
COMMIT;
 
END;
/
 
 
/* Avec curseur */
 
DECLARE
 
	   CURSOR moncurseur IS
	   SELECT DISTINCT NumBloc
	   FROM ETUDIANT;
 
	   enr_moncurseur	moncurseur%rowtype; 
 
	   compte			NUMBER;
 
BEGIN
 
	 FOR enr_moncurseur 
	 IN moncurseur 
	 LOOP
   	   	 EXIT WHEN moncurseur%NOTFOUND;
 
		 	SELECT count(*) INTO compte FROM ETUDIANT WHERE NumBloc = enr_moncurseur.NumBloc;
 
	   		INSERT INTO BLOC VALUES (enr_moncurseur.NumBloc, compte);
 
	 END LOOP;
 
COMMIT;
 
END;
/

Remarque:
tenir compte de la possibilité de n'avoir aucu tuple dans la relation ETUDIANT . dans ce cas , un groupe de valeurs nulles(NULL) doit être inséré dans la relation BLOC.

27/08/2008, 15h55
plaineR

Tu ne vas pas nous demander de faire tout ton exercice ?

Cherche un peu. Proposes-nous les solutions que tu as testées, indiques-nous pourquoi elles ne fonctionnent pas (avec le code erreur s'il y en a). Ce sera beaucoup plus profitable pour toi.
27/08/2008, 15h58
isi241

j'essais

j'essais
27/08/2008, 16h38
Snipah

Citation:

Envoyé par McM

Pas besoin de

Code:

EXIT WHEN moncurseur%NOTFOUND;

dans une boucle FOR LOOP

C'est juste :oops:
27/08/2008, 16h50
isi241

Citation:

Envoyé par plaineR

Tu ne vas pas nous demander de faire tout ton exercice ?

Cherche un peu. Proposes-nous les solutions que tu as testées, indiques-nous pourquoi elles ne fonctionnent pas (avec le code erreur s'il y en a). Ce sera beaucoup plus profitable pour toi.

voici ce que je proposes:
/* Sans curseur */

BEGIN
IF ETUDIANT% FOUND THEN
INSERT INTO BLOC
(SELECT NumBloc, count(*)
FROM ETUDIANT
GROUP BY NumBloc);
ELSE
INSERT INTO BLOC VALUES (0, 0);
END IF;

COMMIT;

END;
/

/* Avec curseur */

DECLARE

CURSOR moncurseur IS
SELECT DISTINCT NumBloc
FROM ETUDIANT;

enr_moncurseur moncurseur%rowtype;

compte NUMBER;

BEGIN

FOR enr_moncurseur
IN moncurseur
LOOP
EXIT WHEN moncurseur%NOTFOUND;

SELECT count(*) INTO compte FROM ETUDIANT WHERE NumBloc = enr_moncurseur.NumBloc;
IF ETUDIANT% FOUND THEN
INSERT INTO BLOC VALUES (enr_moncurseur.NumBloc, compte);
ELSE
INSERT INTO BLOC VALUES (0, 0);
END IF;
END LOOP;

COMMIT;

END;
/
27/08/2008, 17h51
plaineR
Merci d'utiliser les balises CODE (# dans la barre d'outils), pour améliorer la lisibilité de ton code ;)

Bon, c'est pas bon du tout ce que tu as fait.

1è cas : sans curseur :
le "IF ETUDIANT%FOUND" ne veut rien dire. Il faudrait que "EDTUDIANT corresponde à un curseur. Ce qu'il faut que tu fasses, c'est que tu testse si ta requête insert a trouvé au moins un enregistrement.
Pour cela tu peux utiliser :

Code:

if sql%notfound then ...

Par ailleurs je te conseille de toujours nommer tes colonnes quand tu fais un insert :

Code:

INSERT INTO BLOC(NumBloc, effectifBloc) ....

2è cas : avec curseur :
Déjà tu aurais du tenir compte de la remarque de McM et lire le tuto que je t'avais donné : le exit ne sert à rien.
Après tu as 2 solutions :
- si tu utilises un for, tu as besoin d'une variable pour indiquer si tu as au moins un enregistrement :
Code:

1 2 3 4 5 6 7 v_exist := false; for mavar in moncurseur loop v_exist := true; ... end loop; if not v_exist then insert into ...
- si tu utilises la syntaxe open ... fetch, il faut que tu testes avant de fermer ton curseur :

Code:

if moncurseur%found then ...
27/08/2008, 18h40
isi241

Merci beaucoup pour ton aide
Citation:
Envoyé par plaineR

Merci d'utiliser les balises CODE (# dans la barre d'outils), pour améliorer la lisibilité de ton code ;)

Bon, c'est pas bon du tout ce que tu as fait.

1è cas : sans curseur :
le "IF ETUDIANT%FOUND" ne veut rien dire. Il faudrait que "EDTUDIANT corresponde à un curseur. Ce qu'il faut que tu fasses, c'est que tu testse si ta requête insert a trouvé au moins un enregistrement.
Pour cela tu peux utiliser :

Code:

if sql%notfound then ...

Par ailleurs je te conseille de toujours nommer tes colonnes quand tu fais un insert :

Code:

INSERT INTO BLOC(NumBloc, effectifBloc) ....

2è cas : avec curseur :
Déjà tu aurais du tenir compte de la remarque de McM et lire le tuto que je t'avais donné : le exit ne sert à rien.
Après tu as 2 solutions :
- si tu utilises un for, tu as besoin d'une variable pour indiquer si tu as au moins un enregistrement :

Code:

1 2 3 4 5 6 7 v_exist := false; for mavar in moncurseur loop v_exist := true; ... end loop; if not v_exist then insert into ...

- si tu utilises la syntaxe open ... fetch, il faut que tu testes avant de fermer ton curseur :

Code:

if moncurseur%found then ...
MERCI