La lettura di un file flat più volte nel linguaggio di programmazione di terza generazione Common Oriented Business Language (COBOL) è un processo semplice. Si richiede una certa abilità di programmazione, invece, nonché una certa conoscenza del COBOL. Sviluppato intorno al 1960 dal Dr. Grazia Murray Hooper, COBOL è ancora ampiamente utilizzato, soprattutto da parte della comunità di business. E 'stato progettato, in parte, per elaborare grandi quantità di dati con calcoli aziendali minimo o semplici.

istruzione

1 Accedere l'ambiente del computer dove si codice, compilare ed eseguire il programma COBOL. Portare l'editor, dove potrete digitare e modificare il programma. Realizzazione di questo compito varia in base al tipo ambientale. Controllare il manuale dell'utente corrente per l'ambiente COBOL.

2 Tipo questo modello di programma, per i quali le informazioni verranno compilate durante le fasi successive:

IDENTIFICAZIONE DIVISIONE.
Programma-ID. ID programma qui.
Autore. Il tuo nome qui.
Installazione. Il mio computer aziendale.
Data scritta. MM / DD / YYYY.
Osservazioni.
Descrizione del programma qui.

SEZIONE AMBIENTE.
SEZIONE input-output.
FILE-CONTROL.
Selezionare l'ingresso-File
Assegna a "C: \ TMP \ SAMPIN.TXT"
ORGANIZZAZIONE è la linea sequenziale.

Stampa file Selezionare
Assegna a "C: \ TMP \ SAMPOUT.TXT"
ORGANIZZAZIONE è la linea sequenziale.

DIVISIONE DEI DATI.
File di sezione.
FD Input-File record contiene 10 caratteri.
01 INPUT-REC.

05 LAST-NAME PIC X(10).

FD Print-File record contiene 10 caratteri.
01 OUTPUT-REC PIC X (10).
LAVORO sezione Storage.
01 Read-CNT pic 9 (9) il valore è uguale a zero.
01 lettura LMT pic 9 (9) il valore è uguale a zero.

PROCEDURA DI DIVISIONE.
APERTO INGRESSO Ingresso file

OUTPUT Print-file.

Set Leggi-CNT a 0.
Set Read-Lmt a 5.
Read-file.

READ Input-file AT END Go to End-of PGM.

Aggiungere 1 a lettura cnt.
SPOSTARE INPUT-RECORD DI USCITA-RECORD.
Scrivere l'output-RECORD.
Aggiungere 1 per leggere-Lmt.
Se Read-LMT = 5 Go to End-of-PGM
Altro
Vai alla lettura di file.
End-of-PGM.
Se Read-CNT = 0 Display "-file di input è vuoto".

CLOSE Input-file, Print-file.
STOP RUN.

3 Raccogliere informazioni da diverse fonti per la Divisione Identificazione del modello di programma digitato. Eliminare il testo nei campi Divisione di identificazione, e sostituirlo con le informazioni raccolte. Cambiare il nome del programma; il nome del programma corretto dovrebbe essere nelle specifiche del programma. Aggiungi il tuo nome come autore. Per la data scritta, utilizzare la data corrente utilizzando due caratteri per mese e giorno e quattro caratteri per anno. Per il campo di installazione, inserire l'ambiente in cui si esegue il programma, che dovrebbe essere nel manuale d'uso. Digitare una descrizione del programma nella sezione "Osservazioni". Controllare il manuale corrente COBOL e il manuale d'uso, e la chiave in tutte le altre informazioni necessarie per identificare il programma per l'ambiente operativo specifico. Per questo passaggio e passaggi successivi,

4 Digitare le informazioni nei campi sezione Ambiente del modello di programma. prima sezione della sezione Ambiente è la sezione di configurazione. Ai fini di questo esempio, però, presuppongono che la sorgente computer e oggetto-computer sono uguali. Per questo motivo, la sezione di configurazione viene eliminato.

Sostituire i dati per la sezione di ingresso-uscita, che è la seconda sezione della sezione ambiente. Utilizzando "Seleziona" dichiarazioni, digitare le informazioni di identificazione per i file di input e di output utilizzati. Trovare le informazioni e le specifiche nel manuale dell'utente. I dati per il "assegnare" clausola dipendono dall'ambiente specifico.

5 Guardate le specifiche, e determinare quante volte verrà letto il file flat. Se le specifiche indicano un determinato numero di volte che il file deve essere letto, quindi modificare la variabile lettura Lmt nella divisione dei dati da "zero" al numero indicato nelle specifiche. Anche cambiare la lettura LMT = 5 contatore da "5" per il valore indicato nelle specifiche della Divisione procedura.

Se il file deve essere letto fino a quando "end-of-file", quindi eliminare la variabile lettura LMT dalla Divisione dati. Eliminare le due righe di codice nella Divisione Procedura "Se Read-LMT = 5 Go to End-of-PGM Else".

Consigli e avvertenze

• Diverse versioni di COBOL e piattaforme diverse possono richiedere un aggiustamento.
• Fare attenzione quando si eseguono programmi COBOL scritti per una piattaforma, come un mainframe, su un'altra piattaforma, ad esempio un personal computer. Problemi di compatibilità sono possibili.