problème dans une procédure

Version imprimable

Bonjour à tous,

Voilà j'ai fais une procédure qui est la suivante

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
45
46
47
48
49
 
 
IS
 
XCB number(6,2);
XCHEQUE number(6,2);
XAUTRE number(6,2);
XTOTAL number(6,2);
 
BEGIN
 
XCB:=0;
XCHEQUE:=0;
XAUTRE:=0;
XTOTAL:=0;
 
delete from RECETTE;
 
for x in (select * from PUBLICATION)
loop
 
	select sum(TARIFOFUP) into XCHEQUE
	from ABONNEMENT, SOUSCRIPTION
	where ABONNEMENT.REFAB = SOUSCRIPTION.REFAB
	and TITRE = x.TITRE
	and TYPEPAI = 1;
 
	select sum(TARIFOFUP) into XCB
  from ABONNEMENT, SOUSCRIPTION
  where ABONNEMENT.REFAB = SOUSCRIPTION.REFAB
  and TITRE = x.TITRE
  and TYPEPAI = 2;
 
	select sum(TARIFOFUP) into XAUTRE
        from ABONNEMENT, SOUSCRIPTION
        where ABONNEMENT.REFAB = SOUSCRIPTION.REFAB
        and TITRE = x.TITRE
        and TYPEPAI = 3;
 
	XTOTAL := XCHEQUE + XCB + XAUTRE;
 
	insert into RECETTE (TITRE, CB, CHEQUE, AUTRE, TOTAL)
	values (x.TITRE, XCB, XCHEQUE, XAUTRE, XTOTAL);
 
end loop;
 
commit;
 
END;

En fait elle m'insere bien les valeurs désirées, hormis la valeur XTOTAL ... si quelqu'un voit une erreur merci de me la renseigner !

+

Greg

quelques remarques :

1°)

Code:

FOR x IN (SELECT * FROM PUBLICATION)

pourquoi ne pas sélectionner que le titre ?

2°)
3 sommes peuvent être écrite :
Code:

1 2 3 4 5 6 7 SELECT sum(DECODE(TYPEPAI,1,TARIFOFUP,0)), sum(DECODE(TYPEPAI,2,TARIFOFUP,0)), sum(DECODE(TYPEPAI,3,TARIFOFUP,0)) INTO XCHEQUE,XCB,XAUTRE FROM ABONNEMENT, SOUSCRIPTION WHERE ABONNEMENT.REFAB = SOUSCRIPTION.REFAB AND TITRE = x.TITRE
Ou mieux :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 FOR i IN ( SELECT sum(TARIFOFUP) somme, TYPEPAI FROM ABONNEMENT, SOUSCRIPTION WHERE ABONNEMENT.REFAB = SOUSCRIPTION.REFAB AND TITRE = x.TITRE GROUP BY TYPEPAI ) LOOP CASE i.typepai WHEN 1 THEN XCHEQUE = i.somme; WHEN 2 THEN XCB = i.somme; WHEN 3 THEN XAUTRE = i.somme; END CASE; END LOOP;
3°)
c'est inutile de stocker le total si c'est le résultat d'un calcul des colonnes déjà présente dans la table (cf normes merise ;))

4°)
INSERT AS SELECT serait beaucoup mieux :D

En une seulle commande :
Code:

1 2 3 4 5 6 7 8 INSERT INTO RECETTE (TITRE, CB, CHEQUE, AUTRE) SELECT SOUSCRIPTION.TITRE, sum(DECODE(TYPEPAI,1,TARIFOFUP,0)), sum(DECODE(TYPEPAI,2,TARIFOFUP,0)), sum(DECODE(TYPEPAI,3,TARIFOFUP,0)) FROM ABONNEMENT, SOUSCRIPTION,PUBLICATION WHERE ABONNEMENT.REFAB = SOUSCRIPTION.REFAB AND SOUSCRIPTION.TITRE = PUBLICATION .TITRE;
5°)

Code:

DELETE FROM RECETTE;

Doit être remplacé par :

Code:

TRUNCATE TABLE RECETTE REUSE STORAGE;

:arrow: pas d'utilisation des rollbacks :arrow: exécution immédiate ;)

Je sais... j'ai pas répondu à la question :mouarf:

08/11/2006, 11h00
remi4444

Citation:

Envoyé par Fred_D

....
Doit être remplacé par :

Code:

TRUNCATE TABLE RECETTE REUSE STORAGE;

:arrow: pas d'utilisation des rollbacks :arrow: exécution immédiate ;)
...

En parlant d'execution immediate:

Code:

EXECUTE IMMEDIATE 'TRUNCATE TABLE RECETTE REUSE STORAGE';

;)

Sinon, à vue de nez je pense que le problème vient du fait que certaines de tes variables peuvent etre nulles car un SUM sur 0 ligne donne null. Et de plus pour oracle une opération avec null donne un résultat null.

Ex:
10 + 20 + null = null

Il faut donc utiliser nvl soit dans la somme, soit dans requête:
Ex:

Code:

XTOTAL := nvl(XCHEQUE,0) + nvl(XCB,0) + nvl(XAUTRE,0);

Mais je te conseille de prendre en compte les remarques de Fred car il plus efficace de faire des requêtes ensembliste que des boucles en PL/SQL.