Il Linguaggio Fortran 90/95

8.2 Le specifiche di I/O 423
• La clausola REC=rn , in cui rn rappresenta una variabile (o una espressione) di tipo intero,
specifica il numero rappresentativo del record che deve essere scritto in un file connesso
ad accesso diretto. L’utilizzo di questo specificatore è, pertanto, limitato a operazioni di
scrittura su file connessi con la clausola ACCESS=’DIRECT’.
• La clausola NML=lista specifica la lista con nome che deve essere prodotta in uscita.
Come per l’istruzione READ, anche in questo caso lo specificatore è incompatibile con la
clausola FMT=fmt . Si noti che la parola chiave NML= può essere omessa nel qual caso lo
specificatore, ridotto alla sola espressione lista , deve essere il secondo della lista.
• La clausolaADVANCE=adv specifica se la scrittura di un record debba essere o meno seguita
dall’avanzamento al record successivo. I possibili valori per la variabile stringa adv sono
’YES’ (che è anche il valore di default) e ’NO’. Si noti che questa clausola ha significato
soltanto in presenza di file formattati connessi per operazioni ad accesso sequenziale.
8.2.6 Istruzioni di posizionamento di un file
Durante le operazioni di I/O su un file esterno connesso per accesso sequenziale è talvolta
necessario avere un maggiore controllo sulla posizione del record da leggere o da scrivere. In
particolare può essere necessario alterare la posizione corrente del puntatore al file, ad esempio
spostandosi all’interno del record corrente, o fra due record, all’inizio del primo record (punto
iniziale) oppure dopo l’ultimo record (punto terminale). Allo scopo il linguaggio possiede tre
istruzioni di posizionamento che saranno oggetto di questo paragrafo.
L’istruzione BACKSPACE
Può accadere talvolta che l’ultimo record introdotto debba essere sostituito da un nuovo record
(ossia ”riscritto”), oppure che l’ultimo record letto debba essere riletto. A tale scopo il Fortran
mette a disposizione l’istruzione BACKSPACE che si caratterizza per la seguente sintassi:
BACKSPACE([UNIT=]u[,IOSTAT=ios])
in cui, come di consueto, u è una espressione intera il cui valore rappresenta una unità logica
mentre ios è una variabile intera rappresentativa della riuscita o meno dell’operazione (i valori
possibili per ios sono gli stessi visti per l’istruzione READ). Come sempre, l’ordine degli specificatori
può essere alterato tranne nel caso in cui la parola chiave UNIT= sia assente, nel qual
caso l’unità logica deve essere specificata per prima.
L’azione di questa istruzione è quella di posizionare il file prima del record corrente se
esso è attualmente posizionato all’interno di un record, oppure prima del record precedente se
il file è posizionato fra due record consecutivi. Un qualsiasi tentativo di applicare l’istruzione
BACKSPACE quando il file è già posizionato all’inizio del file non produce alcun cambiamento alla
posizione del file. Se il file è posizionato dopo il record di endfile l’istruzione BACKSPACE produce
un ”arretramento” del file a monte di questo record. Non è possibile applicare l’istruzione
BACKSPACE ad un file non esistente o non connesso né è possibile applicare questa operazione
ad un record scritto con formato libero oppure prodotto con meccanismo namelist.