Procedure Habilitation AjouterHabilitationMethodeType(M : Nul Ou Caractere, T : Nul Ou Caractere, M2 : Nul Ou Caractere, ExecutionAutorisee : Booleen);
Les paramètres M, T et M2 identifient le module, le type et la méthode. Le paramètre ExecutionAutorisee spécifie si l'habilitation est d'autoriser ou non l'exécution de la méthode.
L'habilitation au niveau d'un type est celle par défaut pour tous les objets du type. Pour un objet particulier de ce type, il est possible de lui gérer des habilitations spécifiques au moyen des procédures AjouterHabilitationMethodeObjet, LireHabilitationMethodeObjet, ModifierHabilitationMethodeObjet et SupprimerHabilitationMethodeObjet.
Si l'habilitation existe déjà ou si l'appel n'est pas une méthode procédurale fonctionnelle d'un type mais un appel d'un module, l'exception CreationHabilitationImpossible est envoyée.
Type T Defaut Habilitation
/************************/
Procedure Habilitation P();
...
Fin Type
/****************************************************************/
Procedure Habilitation T.P()
/* Objet : Methode supportant les habilitations. */
/****************************************************************/
Debut
...
Fin Procedure
Principal
/*******/
Variable
/******/
R : Nul Ou Role;
Debut
...
R.AjouterHabilitationMethodeType("essai", "T", "P", Vrai);
/* On ajoute l'habilitation. */
...
Fin Principal
| - | - | - | - | - | - | - | - | - |