Parte ii - IIS Marconi Latina - Area didattica

Manuale COBOL 875
82.4.3.3 Istruzione «SELECT» per i file sequenziali
Lo schema sintattico semplificato per l’istruzione ‘SELECT’, da usare nel paragrafo
‘FILE-CONTROL’, per dichiarare un file sequenziale è quello che si può vedere nella figura
successiva:
«
Il file sequenziale può essere letto o scritto soltanto in modo sequenziale, a partire dall’inizio.
Se l’unità di memorizzazione che lo contiene è sequenziale per sua natura, come avviene
per un nastro o un lettore di schede perforate, si può avere solo una fase di lettura o una
fase di scrittura, senza la possibilità di mescolare le due operazioni, mentre se si dispone di
un’unità di memorizzazione ad accesso diretto, come nel caso di un disco, si può leggere e poi
sovrascrivere lo stesso record.
Nello schema sintattico, la metavariabile file-name deve essere sostituita con il nome che
si vuole attribuire al file nell’ambito del programma (non si tratta del nome che questo ha
eventualmente per il sistema operativo). La metavariabile hardware-name va sostituita con
un nome che serve a identificare l’unità di memorizzazione che contiene il file; questo nome
dipende dal compilatore ma generalmente si mette ‘DISK’ per indicare un file su disco. Altri
nomi per la metavariabile hardware-name potrebbero essere: ‘TAPE’, ‘PRINTER’, ‘PUNCH’,
‘READER’ (gli ultimi due sarebbero un perforatore e un lettore di schede).
Il linguaggio COBOL è fatto per poter essere adattato a sistemi operativi molto diversi. In
un sistema Unix, l’accesso alle unità di memorizzazione avviene attraverso dei file di dispositivo,
pertanto, a seconda del compilatore, potrebbe anche essere superfluo dichiarare il
tipo di unità di memorizzazione in questo modo, anche se in passato il linguaggio obbligava
a farlo. Proprio per questo motivo, ci sono compilatori che, al posto di indicare il tipo di
unità fisica attraverso un nome prestabilito, richiedono di mettere subito il percorso del file a
cui si vuole fare riferimento, nonostante il linguaggio preveda per questo una dichiarazione
separata nella divisione ‘DATA DIVISION’. In questo senso, nello schema sintattico appare
la possibilità di indicare una stringa alfanumerica con il percorso del file (literal-file-name).
Nella dichiarazione ‘RESERVE integer’, la metavariabile integer rappresenta un numero intero
di record da usare come memoria tampone. Se non si usa questa dichiarazione che, come si
vede dallo schema sintattico, è facoltativa, viene usata la dimensione predefinita.
La dichiarazione ‘ORGANIZATION IS SEQUENTIAL’ è facoltativa e sottintesa; tuttavia va osservato
il significato che assume quando si aggiunge la parola ‘LINE’. In generale, il linguaggio
COBOL considera i file come composti da record di dimensione uniforme. Quando però si