Trigger, problème de table mutante
Bonjour,
Ca fait un moment que je cherche une solution, que je cherche sur le forum mais mon problème persiste.
J'ai une table de lot (LOT) et une table de frais des lots (FRAISLOT). Pour un lot donné de la table LOT, on peut avoir un ou plusieurs frais dans la table FRAISLOT. Mais on a également la valeur du lot dans la table LOT qui correspond donc à la somme des frais de ce lot.
Ceci est un existant que je ne peux modifier.
Pour maintenir à jour la valeur du lot je voulais passer par un trigger qui, dès qu'il y a une modification sur les frais, update la valeur du lot dans la table LOT.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
CREATE OR REPLACE TRIGGER TRIG_LOTVAL
AFTER INSERT OR UPDATE OR DELETE ON FRAISLOT
FOR EACH ROW
DECLARE
n NUMBER;
TABLE_MUTANTE EXCEPTION;
PRAGMA EXCEPTION_INIT(TABLE_MUTANTE, -4091);
BEGIN
SELECT SUM(PXLVAL) INTO n FROM FRAISLOT WHERE FK_LOT=:NEW.FK_LOT;
UPDATE LOT SET LOTVAL=n WHERE PK_LOT=:NEW.FK_LOT;
EXCEPTION
WHEN TABLE_MUTANTE THEN
DBMS_OUTPUT.PUT_LINE('Erreur ORA-04091 - TABLE Mutante sans conséquence');
END; |
Hors il est interdit de faire un select sur une table mutante. J'ai alors pensé passer par une table temporaire où j'insérerais la clé du lot. Puis faire un autre trigger sur cette nouvelle table pour faire le select des frais du lot et faire l'update du lot.
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
|
TRIGGER TRIG_LOTVAL
AFTER INSERT OR UPDATE OR DELETE ON FRAISLOT FOR EACH ROW
DECLARE
TABLE_MUTANTE EXCEPTION;
PRAGMA EXCEPTION_INIT(TABLE_MUTANTE, -4091);
BEGIN
INSERT INTO TEMP (FK_LOT) VALUES (:NEW.FK_LOT);
EXCEPTION
WHEN TABLE_MUTANTE THEN
DBMS_OUTPUT.PUT_LINE('Erreur ORA-04091 - TABLE Mutante sans conséquence');
END;
TRIGGER TRIG_LOTVALTEMP
AFTER INSERT OR UPDATE OR DELETE ON TEMP FOR EACH ROW
DECLARE
n NUMBER;
TABLE_MUTANTE EXCEPTION;
PRAGMA EXCEPTION_INIT(TABLE_MUTANTE, -4091);
BEGIN
SELECT SUM(PXLVAL) INTO n FROM FRAISLOT WHERE FK_LOT=:NEW.FK_LOT;
UPDATE LOT SET LOTVAL=n WHERE PK_LOT=:NEW.FK_LOT;
EXCEPTION
WHEN TABLE_MUTANTE THEN
DBMS_OUTPUT.PUT_LINE('Erreur ORA-04091 - TABLE Mutante sans conséquence');
END; |
Mais non, ça ne fonctionne toujours pas. J'ai l'impression que la table FRAISLOT est encore en mutation.
Avec les deux méthodes, lorsque je fais un select sur une autre table pour faire un test, tout fonctionne...
Si quelqu'un a une idée, elle sera la bien venue.
Merci
