Fonction Habilitation Reparer(EnvoyerMessage : Nul Ou Procedure (Libelle : Caractere)=Nul) Retourner Booleen;
En cas d'anomalie, la fonction EnvoyerMessage est appelée avec en paramètre le message la décrivant. L'anomalie est ensuite automatiquement corrigée.
La méthode Reparer retourne Vrai si le système de fichiers de l'archive était intègre i.e n'a nécessité aucune réparation.
Principal
/*******/
Variable
/******/
A : Nul Ou ArchiveUpsArc;
Debut
...
Si A.Reparer(Nul) Alors
/* L'archive est intègre avant l'appel. */
...
Fin Si
...
Fin Principal
La réparation n'est pas possible si le bloc maître de l'archive est trop endommagé.
- | - | - | - | - | - | - | - | - |