Function - déclaration variable locales

Bonjour, j'ai un petit soucis de déclaration de mes variables locales. Quelqu'un peut-il m'expliquer comment ça marche?
Merci d'avance

Voici une fonction :

Code:

---

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

CREATE OR REPLACE FUNCTION get_data ( VAR_ID OUT INTEGER, VAR_NAME OUT VARCHAR2 ) RETURN AF_obj_table_Arbo AS v_tab AF_obj_table_Arbo := AF_obj_table_Arbo(); BEGIN FOR cur_cdl IN (SELECT ID, NAME FROM SOC WHERE SOC_DT_SUP IS NULL AND SOC_REGROUP = 15) LOOP VAR_ID := cur_cdl.ID; VAR_NAME := cur_cdl.NAME; END LOOP; RETURN v_tab; END;

---

Les variables VAR_ID et VAR_NAME sont déclarées comme varialbles OUT
Quand je compile, ça marche

Mais en fait j'aimerai que ces deux varialbles soient locales à la fonction et non en paramètre

J'ai fait ça :

Code:

---

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

CREATE OR REPLACE FUNCTION get_data () RETURN AF_obj_table_Arbo AS v_tab AF_obj_table_Arbo := AF_obj_table_Arbo(); DECLARE VAR_ID INTEGER; VAR_NAME VARCHAR2 (100);   BEGIN FOR cur_cdl IN (SELECT ID, NAME FROM SOC WHERE SOC_DT_SUP IS NULL AND SOC_REGROUP = 15) LOOP VAR_ID := cur_cdl.ID; VAR_NAME := cur_cdl.NAME; END LOOP; RETURN v_tab; END;

---

j'ai une erreur de compilation

T'as un declare en trop (sinon pas de soucis avec les variables).

Citation:

---

Envoyé par mnitu

T'as un declare en trop (sinon pas de soucis avec les variables).

---

J'ai essayé, j'ai toujours un soucis à la compilation (un warning dont je n'arrive pas à avoir le message)

Ma fonction 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 50 51 52 53 54 55 56 57 58

CREATE OR REPLACE FUNCTION AF_get_Arbo ( p_owner IN VARCHAR2 DEFAULT '%', VAR_RSQ_KEY_CDL OUT INTEGER, VAR_RSQ_NOM_CDL OUT VARCHAR2, VAR_RSQ_KEY_DR OUT INTEGER, VAR_RSQ_NOM_DR OUT VARCHAR2, VAR_RSQ_PAYS_LIB OUT VARCHAR2, VAR_RCTNOM OUT VARCHAR2, VAR_RCTPRN OUT VARCHAR2, VAR_RCTTEL OUT VARCHAR2, VAR_RCTMAI OUT VARCHAR2 ) RETURN AF_obj_table_Arbo AS   v_tab AF_obj_table_Arbo := AF_obj_table_Arbo();   BEGIN FOR cur_cdl IN (SELECT RSQ_KEY, RSQ_NOM FROM RSQ WHERE RSQ_CLI_ID = 13 AND RSQ_DATE_SUP IS NULL AND RSQ_RGP1 IN (6,8,9,10,11) ) LOOP VAR_RSQ_KEY_CDL := cur_cdl.RSQ_KEY; VAR_RSQ_NOM_CDL := cur_cdl.RSQ_NOM;   FOR cur_dr IN (SELECT RSQ_KEY, RSQ_NOM FROM RSQ WHERE RSQ_CLI_ID = 13 AND RSQ_DATE_SUP IS NULL AND RSQ_MERE = VAR_RSQ_KEY_CDL )   LOOP VAR_RSQ_KEY_DR := cur_dr.RSQ_KEY; VAR_RSQ_NOM_DR := cur_dr.RSQ_NOM; VAR_RCTNOM := 'a'; VAR_RCTPRN := 'b'; VAR_RCTTEL := 'c'; VAR_RCTMAI := 'd'; VAR_RSQ_PAYS_LIB := 'e';   v_tab.extend; v_tab(v_tab.last) := AF_obj_row_Arbo(VAR_RSQ_NOM_CDL, VAR_RSQ_KEY_CDL, VAR_RSQ_NOM_DR, VAR_RSQ_KEY_DR, VAR_RSQ_PAYS_LIB, VAR_RCTNOM, VAR_RCTPRN, VAR_RCTTEL, VAR_RCTMAI); END LOOP; END LOOP; RETURN v_tab; END;

---

Quoi que je fasse pour supprimer les paramétres, j'ai toujours une erreur à la compile (warning).
Les différents objets appelés existe, je n'ai de soucis qu'avec ces paramêtres :(

Moi je ne comprends plus 8O; c'est un autre problème ou c'est le même?
mnitu ta demandé de supprimer le declare, tu l'as fait? ça a marché ou pas?

Code:

---

1 2 3 4 5 6 7 8 9

CREATE OR REPLACE FUNCTION get_data () RETURN AF_obj_table_Arbo AS v_tab AF_obj_table_Arbo := AF_obj_table_Arbo(); VAR_ID INTEGER; VAR_NAME VARCHAR2 (100);   BEGIN -- ton code END;

---

Si c'est un autre problème, tu en crées un autre et tu mets le tag resolu sur celui ci.

C'est bien le même problème. J'ai bien supprimé le Declare, et j'ai toujours la même erreur de compilation.
Mais j'ai trouvé un autre moyen de faire en me passant de variables locales, je creuserai leproblème plus tard.

Merci en tout cas.