Procedure Habilitation AjouterHabilitationProprieteObjet(O : Nul Ou Objet, P : Nul Ou Caractere, CreationAutorisee : Booleen, DestructionAutorisee : Booleen, LectureAutorisee : Booleen, ModificationAutorisee : Booleen);
Les paramètres O et P identifient l'objet et la propriété par son nom. Les paramètres CreationAutorisee, DestructionAutorisee, LectureAutorisee, ModificationAutorisee spécifient si l'habilitation est d'autoriser ou non respectivement la création d'une propriété dynamique, la destruction d'une propriété dynamique, la lecture d'une propriété et la modification d'une propriété.
L'habilitation au niveau d'un objet est spécifique à cet objet. Pour les objets quelconques de ce type, il est possible de leur gérer des habilitations génériques au moyen des procédures AjouterHabilitationProprieteType, LireHabilitationProprieteType, ModifierHabilitationProprieteType et SupprimerHabilitationProprieteType.
Si l'habilitation existe déjà ou si la propriété n'existe pas, l'exception CreationHabilitationImpossible est envoyée.
Type T Defaut Habilitation
/************************/
C : Entier;
...
Fin Type
Principal
/*******/
Variable
/******/
R : Nul Ou Role;
O : Nul Ou T;
Debut
...
R.AjouterHabilitationProprieteObjet(O, "C", Vrai, Faux, Vrai, Faux);
/* On ajoute l'habilitation. */
...
Fin Principal
| - | - | - | - | - | - | - | - | - |