Bonjour,
J'ai ce code suivant pour un déclencheur dans FORMS 10g
(je l'ai simplifié pour le rendre plus compréhensible)
En effet, je veux lire les droits accordés à un utilisateur dans la table DROIT et lui attribuer un role pour accéder à un menu bien donné. Les roles associés à chaque menu se trouvent dans la table MODULE.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 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); BEGIN Open C_droit ; Loop Fetch C_droit Into LC$login, LC$codemodu; if LC$codemodu is not null then select nom_role into roleattr from module where codemodu= LC$codemodu; grant roleattr to :PW.login; end if; Exit When C_droit%NOTFOUND ; End loop ; Close C_droit ; END;
Quand je l'exécute, il me renvoie une erreur au niveau de l'instruction LCD GRANT.
Je désire savoir comment on utilise une telle instruction dans FORMS.
Excuse moi pour les bêtises, j'apprends encore.
Merci d'avance
Partager