Procedure Habilitation LireHabilitationProprieteType(M : Nul Ou Caractere, T : Nul Ou Caractere, N : Nul Ou Caractere, CreationAutorisee : Booleen Sortie, DestructionAutorisee : Booleen Sortie, LectureAutorisee : Booleen, ModificationAutorisee : Booleen Sortie);
Le paramètre T identifie le type. Le paramètre N identifie 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 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 AjouterHabilitationProprieteObjet, LireHabilitationProprieteObjet, ModifierHabilitationProprieteObjet et SupprimerHabilitationProprieteObjet.
Si l'habilitation n'existe pas ou si la propriété n'existe pas, l'exception LireHabilitationImpossible est envoyée.
Type T Defaut Habilitation
/************************/
Procedure Habilitation P();
C : Entier;
...
Fin Type
Principal
/*******/
Variable
/******/
R : Nul Ou Role;
BCreation : Booleen;
BDestruction : Booleen;
BLecture : Booleen;
BModification : Booleen;
Debut
...
R.LireHabilitationProprieteType("essai", "T", "C", BCreation, BDestruction, BLecture, BModification);
/* On lit l'etat de l'habilitation. */
...
Fin Principal
| - | - | - | - | - | - | - | - | - |