Fonction Habilitation Optimiser(NulAbsorbant, PasDEffetDeBord) ExporterSecurite(NomDuFichier : Nul Ou Caractere, NomDuRole : Nul Ou Caractere=Nul,
EnvoyerErreur : Nul Ou Procedure (MessageEnvoye : Caractere, NumeroColonne : Entier, NumeroLigne : Entier, NomFichierSource : Nul Ou Caractere)=Nul) Retourner Nul Ou Booleen;
Si le nom du rôle NomDuRole est Nul alors tous les utilisateurs et les rôles sont exportés. Sinon, seul le rôle correspondant à ce nom est exporté.
Le fichier NomDuFichier est formaté en Up ! 5GL pour Up ! Security Manager.
Si une erreur survient, le message est envoyé à EnvoyerErreur. Les paramètres de cet appel sont les suivants :
Le résultat a pour valeur Vrai en cas de succès.
Variable
/*******/
B : Booleen;
/****************************************************************/
Procedure EnvoyerMessage(MessageEnvoye : Caractere, ? : Entier, ? : Entier, ? : Nul Ou Caractere)
/* Objet : Envoie un message. */
/****************************************************************/
Debut
Ecran.Ecrire(MessageEnvoye);
Fin Procedure
Principal
/*******/
Debut
...
B=ExporterSecurite("/tmp/ma-securite.upl", Nul, EnvoyerMessage);
...
Fin Principal
- | - | - | - | - | - | - | - | - |