[9][10]trigger fonction varray ?

Bonsoir,

voilà j'ai pas mal de table qui doive faire l'objet d'un trigger qui execute tjrs le même raisonnement c'est à dire calculer 3 valeurs pour mettre dans 3 champs.

le calcul de ces trois valeurs est complexe, et nécessite de temps en temps des ajustements assez fin.

aussi j'aurai souhaité faire un trigger colonne qui appelle une fonction "myfunction(myvalue)" qui renverrait mes 3 valeurs

mais là problème comment faire pour que ma fonction renvoit 3 valeurs,

VARRAY serait il une bonne solution ?

merci de vos conseil

Luna

C'est quoi pour toi un trigger colonne ?
Sinon, utilise une procédure avec 3 paramètres OUT

Code:

---

CREATE PROCEDURE MyProc( myvalue IN NUMBER, ret1 OUT NUMBER, ret2 OUT VARCHAR2, ret3 OUT DATE) IS ...

---

Ben un trigger colonne pour moi c'est un trigger qui déclenche sur la mise à jour d'une colonne

merci

Luna

Sinon tu peux aussi faire un "record" dans un package

Code:

---

1 2 3 4 5 6 7 8 9

Create or replace pkgtest as TYPE t_rec_test IS RECORD ( valeur1 NUMBER, valeur2 VARCHAR2(32), valeur3 DATE ); Function MyFunc( myvalue IN NUMBER) RETURN t_rec_test; end pkgtest;

---

un fonction qui renvoie ton record

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

CREATE OR REPLACE PACKAGE BODY pkgtest IS FUNCTION myfunc (myvalue IN NUMBER) RETURN t_rec_test IS v_rec_test t_rec_test; BEGIN .... RETURN v_rec_test; END myfunc; END pkgtest;

---

et DAns ton trigger

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

CREATE OR REPLACE TRIGGER matable_air AFTER INSERT ON matable FOR EACH ROW DECLARE v_rec_test pkgtest.t_rec_test; BEGIN .... v_rec_test := pkgtest.myproc (:NEW.champ); :NEW.a := v_rec_test.valeur1; :NEW.b := v_rec_test.valeur2; .... END;

---

C'est un peu sortir la grosse artillerie pour rien.

Sauf si la fonction est super compliquée, et que les données d'entrées sont souvent identiques, alors oui, tu peux tester des valeurs de session, et ne faire la fonction que si les données d'entrée ont changé.

Citation:

---

Envoyé par McM

C'est un peu sortir la grosse artillerie pour rien.

---

Oui (quoique 8-)), mais en général, j'essaye d'eviter les paramètres en OUT !
De plus tu peux eventuellement rajouter des valeurs sans avoir à changer la déclaration de ta fonction et tous les appels à cette dernière.
Aprés, ca dépend de ta facon de programmer ! ;)
Nota : Pour le changement de valeur de certaines colonnes, on peut utiliser

Code:

---

1 2 3 4 5 6

CREATE OR REPLACE TRIGGER matable_air AFTER UPDATE OF champ1,champ2 ON matable FOR EACH ROW DECLARE

---

Ou la clause WHEn dans la déclaration de ton trigger

Euh... suis un peu perdu ca va trop vite pour moi, et comme je suis pas trés à l'aise avec les packages et procédures...

je me suis repenché sur fonction et varray et à partir de ces 2 liens :

http://www.oracle.com/technology/sam...ray/index.html

et

http://www.developpez.net/forums/sho...ghlight=varray

j'ai mis ca au point :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

CREATE OR REPLACE TYPE varray_test is VARRAY(3) OF number;   CREATE OR REPLACE FUNCTION "GET_VARRAY_TEST" ( V number ) return varray_test as tab varray_test :=varray_test(); begin tab.extend; tab(1):= v * 3; tab.extend; tab(2):= v /3; tab.extend; tab(3):= v * v; return tab; end;

---

puis pour tester :

Code:

---

1 2 3 4 5

select get_varray_test(5) from dual;   GET_VARRAY_TEST(5) -------------------------------------- VARRAY_TEST(15, 1.66666667, 25)

---

et encore tester ds sql+ pour plus tard mettre mon trigger en place sur ce principe :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

set serveroutput on; DECLARE TAB varray_test := varray_test(); BEGIN execute immediate 'select get_varray_test(5) from dual' into tab; FOR I IN 1..3 LOOP DBMS_OUTPUT.PUT_LINE(TAB(I)); END LOOP; END;   15 1.66666666666666666666666666666666666667 25   PL/SQL procedure successfully completed.

---

ce qui donne un trigger :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

CREATE OR REPLACE TRIGGER "MYSCHEMA"."MYTRIGGER" BEFORE UPDATE OF "MYFIELD" ON "MYSCHEMA"."MYTABLE" FOR EACH ROW DECLARE myvar varray_test := varray_test(); BEGIN   execute immediate 'select get_varray_test(:1) from dual' into myvar using :NEW.MYFIELD;   :NEW.MYFIELD1 := myvar(1); :NEW.MYFIELD2 := myvar(2); :NEW.MYFIELD3 := myvar(3);   END;

---

en dernier ne pas oublier les privilèges execute type et execute fonction si le type utilisateur et la fonction ne sont pas ds le même schéma que le trigger je me suis fait avoir...

si vous aves des critiques constructives je suis preneur

Merci à vous ca me fait vraiment avancer !

Luna

Inutile de faire un 'execute immediate'

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

CREATE OR REPLACE TRIGGER "MYSCHEMA"."MYTRIGGER" BEFORE UPDATE OF "MYFIELD" ON "MYSCHEMA"."MYTABLE" FOR EACH ROW DECLARE myvar varray_test := varray_test(); BEGIN myvar:=get_varray_test(:NEW.MYFIELD); :NEW.MYFIELD1 := myvar(1); :NEW.MYFIELD2 := myvar(2); :NEW.MYFIELD3 := myvar(3); END;

---

Merci, je savais pas

c'est effectivement plus propre

Luna