problème d'utilisation des curseurs implicites dans forms

Bonjour,

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

declare CURSOR C_droit IS Select login, codemodu From droit where login = :PW.login ; LC$login droit.login%Type ; LC$codemodu droit.codemodu%Type ;   roleattr VARCHAR2(30 BYTE);   TYPE TYP_REF_CUR IS REF CURSOR ; C_modu TYP_REF_CUR ;     BEGIN Open C_droit ; Loop Fetch C_droit Into LC$login, LC$codemodu; if - ----- ------- else   Open C_modu For 'select nom_role from module' ; While C_modu %FOUND Loop Fetch C_modu Into roleattr ; Forms_ddl('grant'|| roleattr || 'to' || :PW.login||';'); End loop ; Close C_modu ;   end if;   Exit When C_droit%NOTFOUND ; End loop ; Close C_droit ;   END;

---

J'ai à la ligne suivante :

Code:

---

1 2	Open C_modu For 'select nom_role from module' ;

---

l'erreur: "Erreur 591,... cette fonction n'est pas prise en charge dans les programmes côté client"

Aidez moi à lever cette erreur

Merci d'avance

Comme le dit le message, vous ne pouvez pas utiliser cette syntaxe coté client, donc coté Forms. Vous devez definir votre second curseur comme le premier.

Merci pour la réaction.

Le problème qui se pose, c'est que je dois charger ce curseur avec une requête donc la condition dépend des données récupérer dans le FETCH du premier curseur.
Il est impossible de le déclarer et le charger dans la partie déclarative comme le premier

Je ne sais s'il y a un autre moyen pour gérer celà.
(une façon de faire)

Merci

bonjour,
il est tout a fait possible de faire des choses comme

Code:

---

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

declare cursor c1 is select * from table1; cursor c2 (z_code varchar2) is select * from table2 where clef=z_code; begin for e1 in c1 loop for e2 in c2(e1.code) loop ---traitement end loop; end loop; end;

---

a condition que la requete du deuxieme curseur soit la même et que juste les valeur de test change , cela doit correspondre a votre probleme.

Merci bcp, c'est bon