Accedere l'ambiente del computer dove si codice, compilare ed eseguire il programma COBOL . Richiamare l'editor dove potrete digitare e modificare il programma . Realizzazione del predetto compito varia in base al tipo di ambiente. Controllare il manuale dell'utente corrente per l'ambiente COBOL
2
Tipo questo modello di programma , per i quali le informazioni saranno tracciate durante passaggi successivi : .
IDENTIFICAZIONE DIVISION.Program - ID . Programma ID here.Author . Il tuo nome Here.Installation . La mia azienda computer.Date scritta. . MM /DD /YYYY.REMARKS.Program descrizione qui
AMBIENTE SECTION.INPUT - USCITA SECTION.FILE - CONTROL.SELECT Input- FileASSIGN in "C: \\ TMP \\ SAMPIN.TXT " organizzazione è di linea progressivo .
selezionare Stampa - fileASSIGN in "C: \\ TMP \\ SAMPOUT.TXT " organizzazione è di linea progressivo
DATI DIVISION.FILE SECTION.FD record di input - file contiene 10 caratteri .01 . INPUT - REC.05 ULTIMO NOME PIC X ( 10) . FD RECORD Stampa - file contiene 10 caratteri .01 OUTPUT- REC PIC X ( 10) STOCCAGGIO .WORKING SECTION.01 lettura cnt pic 9 (9 ) valore è uguale a zero . 01 lettura mtl pic 9 (9 ) valore è uguale a zero .
PROCEDURA DIVISION.OPEN iNGRESSO - fileOUTPUT Stampa - file.Set Read- cnt per 0.Set lettura mtl a 5.read - file.READ Input -file aLLA FINE Vai a fine di PGM . Aggiungere 1 a Read - cnt . SPOSTARE INPUT- RECORD DI USCITA - RECORD . WRITE OUTPUT- RECORD.Add 1 a lettura lmt.If lettura LMT = 5 Vai alla fine del ciclo di PGMElseGo di lettura file.End - di - PGM.If Read- cnt = 0 Display " input - file è vuoto " . CLOSE Input -file , stampa - file.STOP RUN .
3
raccogliere informazioni da diverse fonti per la Divisione Identificazione del modello di programma che avete 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 il mese e il giorno e quattro cifre per l'anno . Per il campo di installazione , inserire l'ambiente in cui si esegue il programma, che dovrebbe essere nel manuale utente . Digitare una descrizione del programma sotto la 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
Immettere le informazioni nel campo della sezione Ambiente del programma del modello . Prima sezione della sezione Ambiente è la sezione di configurazione. Ai fini di questo esempio , tuttavia , 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 Input -Output , che è la seconda sezione della sezione Ambiente . Utilizzando dichiarazioni "Seleziona" , 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 alla " clausola dipende dal contesto specifico .
5
guardare 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 di lettura mtl nella Divisione dati da " zero" al numero indicato nelle specifiche . Cambia anche la lettura LMT = 5 bancone 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 il Read - mtl variabile dalla Divisione dati . Eliminare le due righe di codice della Divisione Procedura " Se Read- LMT = 5 Vai alla Fine- PGM Else ".
Programmazione © www.354353.com