Procedure Habilitation LireHabilitationAppel(M : Nul Ou Caractere, A : Nul Ou Caractere, ExecutionAutorisee : Booleen Sortie);
Les paramètres M et A identifient le module et l'appel pour lequel il faut lire l'habilitation. Le paramètre ExecutionAutorisee reçoit l'état de l'habilitation.
Si l'habilitation n'existe pas ou si l'appel n'est pas une procédure ou une fonction d'un module mais une méthode d'un type, l'exception LireHabilitationImpossible est envoyée.
/****************************************************************/
Procedure Habilitation P()
/* Objet : Procedure supportant les habilitations. */
/****************************************************************/
Debut
...
Fin Debut
Principal
/*******/
Variable
/******/
R : Nul Ou Role;
ExecutionAutorisee : Booleen;
Debut
...
R.LireHabilitationAppel("essai", "P", ExecutionAutorisee);
/* On lit l'habilitation. */
...
Fin Principal
| - | - | - | - | - | - | - | - | - |