Come utilizzare l'esecuzione fino all'istruzione in cobol

Una struttura di sequenza è caratterizzata dall'esecuzione di una o più funzioni in un ordine specifico. Ad esempio, se si dispone di più paragrafi che devono essere eseguiti in un ordine specifico, è possibile utilizzare l'istruzione Esegui per eseguire ogni sezione di logica che è rappresentata da paragrafi diversi. Quindi, la struttura di selezione offre una scelta tra due o più funzioni, a seconda di una determinata condizione. Per implementare una struttura di selezione in COBOL, è possibile utilizzare costrutti come l'istruzione IF-ELSE o l'istruzione Valuta. Infine, la struttura di iterazione esegue ripetutamente una funzione o un blocco di codice purché una determinata condizione sia soddisfatta. Ad esempio, l'esecuzione di COBOL fino a quando l'istruzione può essere utilizzata per eseguire ripetutamente un pezzo di logica fino a quando non viene soddisfatta una condizione specifica.

Definizione:

La dichiarazione di performance in COBOL viene utilizzata per spostare il controllo su un paragrafo, una sezione o una procedura specifici, esplicitamente o implicitamente. Esistono due modi in cui la dichiarazione di esibizione in cobol può essere divisa. La prima categoria dell'istruzione Perform in Cobol è la dichiarazione di performance "inline", mentre la seconda categoria è l'istruzione per esibizione "schema".

La principale distinzione tra una dichiarazione di esecuzione in linea e schema è che un'istruzione per esecuzione in linea esegue il codice o i comandi tra "eseguire" e "e perform" immediatamente, mentre un'istruzione di esecuzione esegui una sezione separata di codice da eseguire. Un esempio di una dichiarazione di esecuzione in linea è "Eseguire fino all'istruzione" in cui le istruzioni all'interno del blocco di esecuzione vengono eseguite fino a quando l'istruzione all'interno del blocco "fino" è vera. Al contrario, l'istruzione di performance di schema viene utilizzata principalmente per eseguire una serie di dichiarazioni o logiche incluse in un paragrafo o una sezione separati. Un esempio di una dichiarazione di performance è un'istruzione standard "eseguire" in cui la parola chiave "eseguire" è seguita dal nome di un paragrafo o di una sezione.

Performance Dichiarazione Varianti:

Diverse varianti della dichiarazione di performance di Cobol sono le seguenti:

• Esegui ... Nome del paragrafo
• Esegui ... Times Frase
• Esegui ... fino alla frase
• Esegui ... frase variabile

In questo articolo, discutiamo solo dell'esibizione ... fino a quando la frase in dettaglio.

Esempio di programmazione 1:

Divisione di identificazione.
Programma-id. Fino a performare.
Divisione ambientale.
Sezione input-output.
File-Control.
Seleziona dipendente-Doc
Assegnare a '/home/papan/desktop/emp.dat '
L'organizzazione è sequenziale di linea.
Divisione dati.
Sezione file.
Sezione di lavoro di lavoro
01 WS-Doc-SW Pic X (01) Valore 'N'.
88 Not-eof Value 'n'.
Divisione procedura.
Eseguire una lettura fino a not-eof
Esegui fino a non essere-eof
Reading Doct-Doc
End-Porform.
Smettere di correre.
A000 leggi.

Produzione:

papan@papan -virtualbox: ~/desktop/fino a $ cobc -xjf 1.CBL
Ciao mondo

Spiegazione:
Un esempio di una dichiarazione di esecuzione è un'istruzione "Esegui una lettura fino a" in cui il codice all'interno del paragrafo A000-lettura viene eseguito ripetutamente fino a quando non viene raggiunta una flag che indica la fine del file (EOF).

La logica nel paragrafo continua a leggere i dati dal file fino a quando non sono rimasti più record nel file. Ciò significa che il flag quando viene impostata la fine del file (EOF). La seconda affermazione in questo particolare programma COBOL di in linea viene eseguita quando si specifica la logica per eseguire e terminare. Quello che abbiamo fatto in questo caso è che abbiamo specificato il file "leggi logica" tra l'esecuzione e la fine. Quindi, la logica nel paragrafo continua ad essere eseguita fino alla fine del flag di file.

Esempio di programmazione 2:

Divisione di identificazione.
Programma-id. Esegui3.
AUTORE. Papan.
Divisione ambientale.
Divisione dati.
Sezione di lavoro di lavoro.
77 WS-I Pic 9 (1) Valore 1.
Divisione procedura.
Eseguire 1000-para fino a WS-I> 5
Smettere di correre.
1000-para.
Calcola WS-I = WS-I + 1
Visualizza 'qui cobol mostra eseguire fino a' ws-i.

Produzione:

papan@papan -virtualbox: ~/desktop/fino a $ cobc -xjf 2.CBL
Qui cobol che mostra eseguire fino a 2
Qui cobol che mostra eseguire fino a 3
Qui cobol che mostra eseguire fino a 4
Qui cobol che mostra eseguire fino a 5
Qui Cobol che si esibisce fino a 6

Spiegazione:
Qui, usiamo il comando chiamato "fino". Dichiariamo la variabile e passiamo alcuni valori ogni volta che vogliamo usare qualsiasi condizione. Quindi, usiamo il comando fino a.

Qui, usiamo fino a WS-I> 5. Sulla base di questa condizione, chiamiamo il paragrafo "Qui Cobol mostra fino a". Ecco come viene eseguito questo programma.

Esempio di programmazione 3:

Divisione di identificazione.
Programma-id. Fino a performare.
Divisione ambientale.
Divisione dati.
Sezione di lavoro di lavoro.
01 WS-A Pic 9 (3) Value Zero.
01 WS-B Pic 9 (3) Value Zero.
01 K Pic 9 Valore zero.
Divisione procedura.
Sposta da 1 a k.
Eseguire accetta-para fino a k> 2.
Smettere di correre.
Accetta-para.
Accetta WS-A.
Accetta WS-B.
Eseguire display-para.
Display-para.
Visualizza WS-A.
Visualizza WS-B.
Calcola k = k + 1
Smettere di correre.

Produzione:

papan@papan -virtualbox: ~/desktop/fino a $ cobc -xjf 3.CBL
10
12
010
012

Spiegazione:
Nella condizione fino alla condizione, il paragrafo viene eseguito quando la condizione è falsa e viene fuori dal paragrafo quando la condizione diventa vera.

Qui, usiamo tre variabili che sono WS-A, WS-B e K. Nella divisione delle procedure, passiamo 1 alla variabile K. Quindi, chiamiamo accettazione. Qui, dobbiamo aggiungere una condizione che è fino a k> 2. Significa che se il valore di k è maggiore di 2, questo paragrafo viene chiamato. L'output mostra come WS-A, WS-B. Quindi, questo valore di K aumenta di 1 e il valore di k = 2. Significa che questa condizione è verificata per il valore di k = 2. Se la condizione è falsa, verrà di nuovo accettata.

Conclusione

Qui, siamo in grado di comprendere tutto l'aspetto e la sintassi dell'esecuzione fino al comando in cobol per comprendere questo comando. Abbiamo eseguito alcuni esempi di programmazione. Con l'aiuto di questi esempi di programmazione, siamo in grado di monitorare questo comando e capire come funziona nel campo reale.