COBOL DESDE CERO #3

Aprendiendo COBOL: Estructuras de Control

Introducción a las Estructuras de Control en COBOL

En esta lección, nos adentraremos en las estructuras de control en COBOL, que nos permiten tomar decisiones y controlar el flujo de ejecución de nuestro programa. Utilizaremos la cláusula IF para introducirnos en este concepto.

IDENTIFICATION DIVISION.
PROGRAM-ID. EstructurasControl.

DATA DIVISION.
WORKING-STORAGE SECTION.
    01 Edad PIC 9(2) VALUE 21.

PROCEDURE DIVISION.
    IF Edad < 18
        DISPLAY 'Eres menor de edad.'
    ELSE
        DISPLAY 'Eres mayor de edad.'
    END-IF.

    STOP RUN.
        

En este programa, hemos utilizado la cláusula IF para evaluar la variable Edad y mostrar un mensaje en función de si es menor o mayor de edad. Este es un ejemplo básico de cómo puedes controlar el flujo de tu programa.

Puntos Destacados:

• La cláusula IF se utiliza para realizar pruebas condicionales.
• La cláusula ELSE se ejecuta si la condición en IF es falsa.
• La estructura END-IF marca el final de la condición.

En las próximas lecciones, exploraremos otras estructuras de control, como PERFORM y ACCEPT, para mejorar la funcionalidad de nuestros programas COBOL. ¡Sigue aprendiendo y disfrutando del viaje!