Estructura de un programa

COBOL (Common Business-Oriented Language) es uno de los lenguajes de programación más longevos de la historia, diseñado expresamente para aplicaciones empresariales y financieras. A diferencia de los lenguajes modernos, tiene una estructura formal y rígida dividida en secciones llamadas Divisiones.

El formato fijo y las áreas de escritura

En los archivos fuente de COBOL tradicionales, cada línea se divide en áreas específicas según las columnas:

• Columnas 1-6 (Área de Secuencia): Históricamente utilizada para los números de las tarjetas perforadas. Hoy en día se suele dejar vacía.
• Columna 7 (Área de Indicadores): Usada para indicar comentarios insertando un asterisco *.
• Columnas 8-11 (Área A): Aquí comienzan los encabezados de las divisiones, secciones y párrafos.
• Columnas 12-72 (Área B): Aquí se escriben las instrucciones reales del programa (como DISPLAY, MOVE, etc.).
• Columnas 73-80 (Área de Identificación): Históricamente ignorada por el compilador, utilizada para fines internos.

En nuestros ejercicios, utilizaremos un formato simplificado pero coherente, distanciando las instrucciones del Área B con los espacios correspondientes (normalmente 7 u 11 espacios dependiendo del área).

Las cuatro divisiones principales

Cada programa COBOL completo se estructura en cuatro divisiones obligatorias, que deben aparecer en este orden preciso:

1. IDENTIFICATION DIVISION. Contiene los metadatos del programa, como el nombre del programa definido con la palabra clave PROGRAM-ID.

2. ENVIRONMENT DIVISION. Especifica el entorno en el que se ejecuta el programa y asocia los archivos físicos con las variables internas.

3. DATA DIVISION. Aquí se declaran todas las variables y estructuras de datos que utilizará el programa.

4. PROCEDURE DIVISION. Contiene las instrucciones ejecutables (la lógica de negocio). Cada programa debe terminar con STOP RUN. para detener la ejecución.

Pruébalo tú mismo