PERFORM con párrafos en COBOL

Los párrafos son las subrutinas de COBOL: bloques con nombre que PERFORM visita y de los que vuelve.

IDENTIFICATION DIVISION.
PROGRAM-ID. PERFORM-PARAGRAPHS.
PROCEDURE DIVISION.
MAIN-PARA.
*> Paragraphs are named blocks; PERFORM runs one and comes back.
    PERFORM BREW-TEA
    PERFORM SERVE-TEA
    STOP RUN.
BREW-TEA.
    DISPLAY "Warm the pot, then three minutes steeping".
SERVE-TEA.
    DISPLAY "Milk first is a settled question here".

Cómo funciona

1. MAIN-PARA corre primero y llama a los otros dos por nombre.
2. PERFORM BREW-TEA salta al párrafo, lo ejecuta y regresa.
3. Cada párrafo es apenas un nombre terminado en punto, con sentencias detrás.

Palabras clave y builtins usados aquí

• DISPLAY
• DIVISION
• IDENTIFICATION
• PERFORM
• PROCEDURE
• STOP

El intento, en números

Líneas

12

Caracteres a escribir

320

Tokens

30

Ritmo de tres estrellas

45 tpm

Al ritmo de tres estrellas de 45 tokens por minuto, este intento toma unos 40 segundos.

Escribe este fragmento

Paso 3 de 3 en Bucles; paso 18 de 27 en Fundamentos del lenguaje.

← Anterior Siguiente →