Ci sono molti modi per affrontare con record di lunghezza incerti nel file ed elaborazione dei dati. COBOL è uno dei modi più eloquenti e distintivo per ottenere questo risultato. Si può leggere un file con molti record, ciascuno di dimensione indeterminata, utilizzando uno dei comandi nativi di COBOL. Supponendo di avere un file in cui la dimensione di ogni record all'interno può variare da un personaggio a 400 caratteri, l'applicazione COBOL in grado di gestire per voi. Utilizzare questa tecnica per ottenere la lunghezza del record, restituire un conteggio di caratteri e spostare i record variabile ad un altro file, se lo si desidera.

istruzione

1 Inizia valutando la lunghezza massima di record nel file. Nell'esempio qui, può essere fino a 400 byte e partire da un byte, qualificare il file come essendo di lunghezza variabile.

2 Vai alla sezione "File" del programma e impostare la struttura dei file per i record il programma è la lettura dal file in arrivo. La vostra struttura "descrittore di file" dovrebbe essere simile a questo: "FD In-File" "Record contiene da 1 a 400 caratteri a seconda WS-caratteri-Counter".

3 Digitare il seguente Sotto il FD: "01 In-Rec." "05 Input-Field-01 Pic X (98)" "05 Input-Field-02 Pic S9 (9) V99 Comp-3." Questo è semplicemente il. record di input nell'esempio citato. I campi devono essere almeno uno e non più di 400 byte in questo esempio.

4 Digitare la variabile di lavoro-Storage per i contatori di caratteri file come: "05 WS-caratteri-Counter Pic 9 (5)." Questa variabile sarà tenere la lunghezza del record di ingresso dopo ogni istruzione "Leggi" e dovrebbe essere un campo numerico senza segno . A seguito della "A seconda" dichiarazione, il campo restituirà il valore numerico della lunghezza del record. Dopo ogni "lettura", COBOL compila automaticamente questo numero.

5 Vai alla Divisione Procedura e digitare la "Lettura" dichiarazione dopo l'apertura di file appropriato dichiarazioni "Open". È possibile utilizzare la variabile "WS-carattere-Counter" per recuperare la lunghezza di registrazione.

6 Compilare il programma e assicurarsi che l'elenco è privo di errori di sintassi.

7 Eseguire il programma come test ed esaminare l'output.