Il Linguaggio Fortran 90/95

8.3 Gestione dei file ad accesso sequenziale 425
ziale oppure diretto) non è una proprietà intrinseca del file, ma viene determinato all’atto della
connessione. Infatti un file può potenzialmente essere operato in modo sequenziale e/o diretto
in dipendenza di un insieme di circostanze. In particolare, una apposita interrogazione al file
può essere usata per sapere se un determinato metodo di accesso è consentito per uno specifico
file; una volta connesso, il file è comunque sottoposto ad un unico metodo di acceso ma nulla
vieta che in una precedente o successiva connessione il metodo sia diverso, purché consentito.
Un file connesso con accesso sequenziale si caratterizza per il fatto che i record sono processati
nello stesso ordine in cui essi appaiono nel file. Inoltre, in ogni istante è definita una
posizione del file, per cui in ogni istante il file o è nella sua posizione iniziale oppure nell’intervallo
fra due record. L’accesso sequenziale è caratterizzato, inoltre, dal fatto che l’operazione
di lettura o di scrittura avviene sempre sul record successivo rispetto al punto in cui il file
staziona (sul primo record se il file staziona nella posizione iniziale) e che dopo ogni operazione
di lettura o scrittura il file avanza di un record.
Occorre mettere in evidenza una importante caratteristica dei file connessi per accesso sequenziale:
quando un record viene scritto su di un file sequenziale, esso è l’ultimo record del
file, così ogni eventuale altro record successivo presente sul file viene distrutto. Non è, pertanto,
possibile usare le istruzioni BACKSPACE o REWIND per posizionarsi su un certo record per
riscriverlo lasciando i successivi record inalterati. Dunque, la scrittura del nuovo record è possibile
solo perdendo tutti i record successivi, per cui le istruzioni di posizionamento vengono
utilizzate, di solito, soltanto per leggere i record di un file.
Sebbene non sia ammessa la riscrittura selettiva di un record, è tuttavia possibile l’aggiunta
di nuovi record in coda all’ultimo record utile del file (operazione di append).
La sintassi per le operazioni di connessione e di lettura/scrittura di un file ad accesso
sequenziale di tipo advancing è le seguente:
OPEN([UNIT=]u,FILE=fln[,FORM=fm],[ACCESS=’SEQUENTIAL’][,RECL=rl] &
[,IOSTAT=ios][,STATUS=st][,ACTION=act][,DELIM=del][,PAD=pad] &
[,POSITION=pos])
READ([UNIT=]u[,[FMT=]fmt][,IOSTAT=ios][,ADVANCE=’YES’])
WRITE([UNIT=]u[,[FMT=]fmt][,IOSTAT=ios][,ADVANCE=’YES’])
Naturalmente, se il file è connesso come ’UNFORMATTED’, la clausola FMT= non dovrà essere
presente nelle istruzioni READ o WRITE. Si noti, tuttavia, che dal momento che i file sequenziali
vengono tipicamente utilizzati per il trasferimento di dati verso altri sistemi di elaborazione
oppure per la lettura o la scrittura da parte di un operatore umano, essi sono quasi sempre
formattati.
Le prossime istruzioni sono validi esempi di istruzioni di I/O formattate operanti su file
sequenziali:
OPEN(UNIT=15,FILE=’file1.txt’,FORM=’FORMATTED’,STATUS=’OLD’, &
ACTION=’READ’,POSITION=’REWIND’)
OPEN(UNIT=16,FILE=’file2.txt’,FORM=’FORMATTED’,STATUS=’NEW’, &