En este módulo, aprenderemos sobre la sintaxis básica de COBOL, que es fundamental para escribir programas en este lenguaje. COBOL (Common Business-Oriented Language) es conocido por su legibilidad y estructura clara, lo que lo hace ideal para aplicaciones empresariales.

  1. Estructura de un Programa COBOL

Un programa COBOL se divide en cuatro divisiones principales:

  1. Identification Division
  2. Environment Division
  3. Data Division
  4. Procedure Division

1.1 Identification Division

La Identification Division es la primera sección de un programa COBOL y contiene información sobre el programa, como su nombre y autor.

IDENTIFICATION DIVISION.
PROGRAM-ID. HelloWorld.
AUTHOR. John Doe.

1.2 Environment Division

La Environment Division especifica el entorno en el que se ejecutará el programa. Incluye detalles sobre el sistema operativo y los archivos utilizados.

ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-370.
OBJECT-COMPUTER. IBM-370.

1.3 Data Division

La Data Division define las variables y estructuras de datos que se utilizarán en el programa. Se divide en varias secciones, como la Working-Storage Section y la File Section.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME PIC A(20).
01 WS-AGE  PIC 99.

1.4 Procedure Division

La Procedure Division contiene el código ejecutable del programa. Aquí es donde se escriben las instrucciones y la lógica del programa.

PROCEDURE DIVISION.
DISPLAY 'Hello, World!'.
STOP RUN.

  1. Reglas de Sintaxis

2.1 Palabras Clave y Sentencias

COBOL utiliza palabras clave (keywords) que son reservadas y tienen un significado especial. Las sentencias en COBOL suelen terminar con un punto (.).

2.2 Identificadores

Los identificadores son nombres dados a variables, secciones y otros elementos del programa. Deben seguir estas reglas:

  • Pueden contener letras, dígitos y guiones (-).
  • No pueden comenzar ni terminar con un guion.
  • No pueden contener espacios.

2.3 Literales

Los literales son valores constantes que se utilizan en el programa. Pueden ser de tipo numérico o alfanumérico.

MOVE 100 TO WS-AGE.
MOVE 'John Doe' TO WS-NAME.

2.4 Comentarios

Los comentarios en COBOL se escriben utilizando un asterisco (*) en la columna 7.

* Este es un comentario en COBOL

  1. Ejemplo Completo

A continuación, se muestra un ejemplo completo de un programa COBOL que solicita el nombre del usuario y lo muestra en pantalla.

IDENTIFICATION DIVISION.
PROGRAM-ID. UserGreeting.
AUTHOR. John Doe.

ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-370.
OBJECT-COMPUTER. IBM-370.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME PIC A(20).

PROCEDURE DIVISION.
    DISPLAY 'Ingrese su nombre: '.
    ACCEPT WS-NAME.
    DISPLAY 'Hola, ' WS-NAME ' !'.
    STOP RUN.

  1. Ejercicio Práctico

Ejercicio 1

Escribe un programa COBOL que solicite la edad del usuario y muestre un mensaje indicando si es mayor de edad (18 años o más) o menor de edad.

Solución

IDENTIFICATION DIVISION.
PROGRAM-ID. AgeCheck.
AUTHOR. John Doe.

ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-370.
OBJECT-COMPUTER. IBM-370.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-AGE PIC 99.

PROCEDURE DIVISION.
    DISPLAY 'Ingrese su edad: '.
    ACCEPT WS-AGE.
    IF WS-AGE >= 18 THEN
        DISPLAY 'Usted es mayor de edad.'
    ELSE
        DISPLAY 'Usted es menor de edad.'
    END-IF.
    STOP RUN.

Retroalimentación

  • Error Común: Olvidar el punto al final de las sentencias. Asegúrate de que cada sentencia termine con un punto (.).
  • Consejo: Utiliza nombres descriptivos para las variables y secciones para mejorar la legibilidad del código.

Conclusión

En esta sección, hemos cubierto la sintaxis básica de COBOL, incluyendo la estructura de un programa, reglas de sintaxis, y un ejemplo práctico. Ahora estás preparado para profundizar en los tipos de datos y variables en COBOL en el siguiente módulo.

© Copyright 2024. Todos los derechos reservados