Discussion :

[Invité]

Bonjour,

Je travaille en Fortran 77 (je n'ai pas le choix, et ne peux pas me mettre en f90).
Je cherche à lire deux fichiers de données (.dat) et à les écrire dans un troisième fichier, l'un à la suite de l'autre.

Code :

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

1
2
3
4
5
 
lire fichier1
écrire fichier1 dans fichier3
lire fichier2
écrire fichier2 dans fichier3 à la suite de fichier1

Malheureusement, WRITE écrase le fichier de sortie (fichier3) lors de l'écriture de fichier2 dans fichier3.

Une idée pour éviter ça ?

Merci !

[Marlan]

A mon sens, il suffit de :

- Ouvrir fichier 1
- Lire fichier 1
- Fermer fichier 1
- Ouvrir fichier 3
- Ecrire la lecture de 1 dans 3
- Ouvrir fichier 2 sans fermer ni réinitialiser 3
- Lire 2
- Fermer 2
- Ecrire 2 dans 3
- Fermer 3

Je pense que quelque pars tu dois fermer le fichier 3. Or, si tu le fermes, tu réinitialise la position de ton pointeur dans le fichier (ici à la première 'case'). Du coup, il te suffit de maintenir l'unité d'ouverture de 3 ouverte pour que ça marche.

En espérant avoir répondu à ta question,

Marlan

[FR119492]

Salut!
C'est beaucoup plus simple:

1. Ouvrir fichier1
2. Ouvrir fichier2
3. Ouvrir fichier3
4. Copier fichier1 sur fichier3
5. Copier fichier2 sur fichier3

Si tu réutilise un des fichiers dans le même programme, il faut le fermer puis le réouvrir.
Jean-Marc Blanc

[Invité]

Un petit REWIND de trop se baladait dans mon code.
Merci à tous deux !