24.01.2014 Views

Parte ii - IIS Marconi Latina - Area didattica

Parte ii - IIS Marconi Latina - Area didattica

Parte ii - IIS Marconi Latina - Area didattica

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Manuale COBOL 877<br />

|003300 DISPLAY "FILE STATUS: " DATA-NAME, " RECORD: ", RECORD-NAME.<br />

Il file indicato come ‘FILE-NAME’ è associato in pratica al file ‘input.seq’. Si può supporre<br />

che questo file abbia il contenuto seguente, senza alcun codice di interruzione di riga:<br />

|aaaaaaaaaaaaaaaaaaaabbbbbbbbbbbbbbbbbbbbccccccccccccccccccccdddddddddddddddddddd<br />

Eseguendo il programma dell’esempio si potrebbe ottenere il testo seguente attraverso lo<br />

schermo:<br />

|FILE STATUS: 00<br />

|FILE STATUS: 00 RECORD: aaaaaaaaaaaaaaaaaaaa<br />

|FILE STATUS: 00 RECORD: bbbbbbbbbbbbbbbbbbbb<br />

|FILE STATUS: 00 RECORD: cccccccccccccccccccc<br />

|FILE STATUS: 00 RECORD: dddddddddddddddddddd<br />

|FILE STATUS: 10 RECORD: dddddddddddddddddddd<br />

82.4.3.4 Istruzione «SELECT» per i file relativi<br />

Lo schema sintattico semplificato per l’istruzione ‘SELECT’, da usare nel paragrafo<br />

‘FILE-CONTROL’, per dichiarare un file organizzato in modo «relativo» è quello che si può<br />

vedere nella figura successiva:<br />

«<br />

Il file organizzato in modo relativo può essere utilizzato secondo un accesso sequenziale, oppure<br />

facendo riferimento ai record per numero, considerando che il primo ha proprio il numero<br />

uno. Quando si individuano i record per numero, si distinguono due modalità di accesso:<br />

diretto (‘RANDOM’) e dinamico (‘DYNAMIC’). L’accesso diretto richiede che per ogni operazione<br />

l’indicazione del numero del record a cui si vuole fare riferimento, mentre con l’accesso<br />

dinamico è anche possibile eseguire delle operazioni di lettura sequenziali (‘READ NEXT’).

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!