WDForge.org - Forums

Pb création fichier avec HDécritRubrique et Hcréation....

Sujet: Pb création fichier avec HDécritRubrique et Hcréation....
par scarface38 sur 5/3/2009 21:50:32

Bonsoir

je veux creer des fichiers Stats par Mois
ces fichiers créés dynamiquement permettent d'avoir le nom des familles qui sont dans le fichier famille.
plutot que d'avoir plein de fichiers qui se balladent dans le répertoire de l'appli, je veux les créer dans un répertoire Stats
mais ca ne marche pas

voici le code

//
//Cree_fichier_stat ()
//
PROCEDURE Cree_fichier_stat()
TableDesc est une Description de Fichier
ItemDesc est une Description de Rubrique
STATS est une Source de Données
I est un entier

// Description du fichier "STATS"
TableDesc..Nom = "Stats"
TableDesc..Type = hFichierNormal
TableDesc..CryptageFic = hCryptageStandard
TableDesc..Répertoire=fRepEnCours()+"\Statistiques"


POUR TOUT Famille SUR Famille
	// Description de la rubrique "NOM fAMILLE"
	ItemDesc..Nom = Famille.Famille
	ItemDesc..Type = hRubTexte
	ItemDesc..Taille = 40
	ItemDesc..TypeClé = hCléUnique
	HDécritRubrique(TableDesc, ItemDesc)
FIN
// Description de la rubrique "date"
ItemDesc..Nom = "Date"
ItemDesc..Type = hRubDate8
ItemDesc..Taille = 10
ItemDesc..TypeClé = hCléDoublon
HDécritRubrique(TableDesc, ItemDesc)

// Description de la rubrique "categorie"
ItemDesc..Nom = "Catégorie"
ItemDesc..Type = hRubEntier2
ItemDesc..Taille = 1
ItemDesc..TypeClé = hCléDoublon
HDécritRubrique(TableDesc, ItemDesc)

// Valide la description du fichier
HDécritFichier(TableDesc)
...

// Création du fichier Client (reconnu car déclaré comme source de données)
HCréationSiInexistant(STATS)
//HCréatioN(STATS)
// Création d'un enregistrement
//CLIENT.NOM = "Dupont"
//CLIENT.PRENOM = "André"
//HAjoute(CLIENT)

quand j'enleve cette ligne :
TableDesc..Répertoire=fRepEnCours()+"\Statistiques"
ca fonctionne. le fichier est bien crée mais dans le repertoire de l'appli.
et comme il y a un fichier par mois, ca va faire désordre.....

Une idée ?

merci pour votre aide