chemin_data_android est une chaîne

////// Stockage des fichiers de l'application dans le dossier public "Documents"////////

//On stocke les données en stockage externe pour pouvoir y accéder depuis l’extérieur (en FTP notamment)
SI SysEtatStockageExterne(1) = sseDisponible ALORS
chemin_data_android = SysRepStockageExterne(1,ssePublicDocument)
SINON
Erreur("Stockage externe (1) non disponible !")
FinProgramme()
FIN

SI fRepExiste(chemin_data_android+fSep()+"Appli") = Faux ALORS
SI PAS fRepCrée(chemin_data_android+fSep()+"Appli") ALORS Erreur(ErreurInfo(errMessage))
FIN

chemin_data_android = chemin_data_android+fSep()+"Appli"


HChangeRep("*",chemin_data_android)

LOCAL
sListeDesErreurs est une chaîne
liste_fichiers est une chaîne = "camion"+RC+"chauffeur"+RC

HVérifieStructure("*", hIdentique)
// Pour tous les fichiers
POUR TOUTE chaîne sNomUnFichier de liste_fichiers SEPAREE PAR RC
QUAND EXCEPTIONEXCEPTION DANS
// Ouverture ou création du fichier de données
HCréationSiInexistant(sNomUnFichier)
FAIRE
// Problème
// Il y a une différence de structure ?
SI HErreur(hErrEnCours) = 70016 ALORS
// Erreur 70016: LE FICHIER NE CORRESPOND PAS A SA DESCRIPTION
// On met à jour la structure du fichier
SI PAS HModifieStructure(sNomUnFichier) ALORS
// Echec de la mise à jour de la structure du fichier
sListeDesErreurs += [RC] + ...
"- Erreur de modification de structure pour le fichier <" + ...
sNomUnFichier + "> : " + HErreurInfo()
FIN
SINON
sListeDesErreurs = HErreur(hErrEnCours)
// Autres erreurs qu'une différence de structure
sListeDesErreurs = HErreur(hErrEnCours)
sListeDesErreurs += [RC] + "- Erreur d'accès au fichier <" + ...
sNomUnFichier + "> : " + HErreurInfo()
FIN
FIN
FIN

// Il y a eu des erreurs ?
SI sListeDesErreurs <> "" ALORS
Erreur("Erreur à l'ouverture des fichiers de données !"+RC+sListeDesErreurs)
FinProgramme()
FIN