Discussion :

[philippe30]

Bonjour,

Je souhaite écrire dans une fichier texte à des positions bien précises.

Il s'agit de mettre en place un exportation pour un logiciel de compta et il faut que j'écrive :
le n° de mouvement de la position 1 à 10
le code journal de la position 11 à 16

etc....

Avez-vous une idée simple pour écrire ces données dans la position voulue

Merci

Philippe

[wd_newbie]

Qu'entends-tu par "position" ?

Ligne ? ou position dans un CSV ?


Olivier

[frenchsting]

Il parle de fichier plat. Chaque zone a une longueur fixe...

Regarde du coté de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
complète(ChaineSource,nLongueur) et de 
numeriqueverchaine(UnNombreEntier,"08d") ou 
numeriqueverchaine(UnNombreReel,"10.2f")

[hpascal]

Bonjour
Il y a plein de façon de faire, chacun a sa méthode

L'important est d'assembler une chaîne qui correspondra à une ligne de ton fichier.
Pour les chaînes tu utilises des Complete() (eventuellement Gauche() pour tronquer la chaîne au cas où) et pour les numériques des NumeriqueVersChaîne()

On peut aussi compléter la ligne complète avec des espaces et y insérer ensuite les données, exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
sLigne est une chaîne = Complète(sLigne, 100, Caract(32))
 
sLigne[[1 A 10]] = "0001241"		// ou sLigne[[1 sur 10]] = "0001241"
sLigne[[11 A 13]] = "CLI"		// ou sLigne[[11 sur 3]] = "CLI"
// etc ...
 
Info(sLigne)

[frenchsting]

Voici la méthode que j'utilisais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
ch est chaine =  ""
numFichierTexte = fcree("Fichier.txt")
hlitpremier(MonFichier,Cle)
Tantque pas hendehors(MonFichier)
ch+=complete(MonFichier.Nom,30)
ch+=complete(MonFichier.Prenom,20)
ch+=complete(MonFichier.Adresse,50)
...
ch+=numeriqueverschaine(MonFichier.QteLivree,"7.2f")
fecritLigne(numFichierTexte,ch)
hlitSuivant(MonFichier,Cle)
fin

Une fois que tu es bien calé, utilise plutot un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ch+=crlf

au lieu du fecritligne Puis fais un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

fsauvetexte("Fichier.txt",ch)

C'est plus rapide...

Note, mets bien des complète et numeriqueverschaine partout. Cela t'évitera d'avoir une déconvenue, le jour ou tu modifies ton analyse (exemple adresse passe de 50 à 55).

[hpascal]

Pour les chaînes tu utilises des Complete() (éventuellement Gauche() pour tronquer la chaîne au cas où) et pour les numériques des NumeriqueVersChaîne()

J'ai dis une bêtise, Complete() se charge aussi de tronquer la chaîne

[philippe30]

Je vais voir pour me débrouiller avec vos infos

Merci pour vos réponses

Philippe