COBOL, acrónimo de "Common Business-Oriented Language", es un lenguaje de programación diseñado para el desarrollo de aplicaciones comerciales. Aunque fue creado en 1959, COBOL sigue siendo utilizado en sistemas bancarios, de seguros, gubernamentales y otros entornos empresariales críticos. Esta guía proporciona una introducción práctica a la compilación y ejecución de programas COBOL.
Antes de comenzar, es necesario contar con un compilador COBOL y un entorno de desarrollo adecuado. Existen varias opciones disponibles, incluyendo compiladores gratuitos como GnuCOBOL y entornos de desarrollo comerciales. Para el propósito de este artículo, nos centraremos en GnuCOBOL.
Un programa COBOL se divide en cuatro divisiones principales:
IDENTIFICATION DIVISION.
PROGRAM-ID. your-program-name.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
PROCEDURE DIVISION.
// Your code goes here...
STOP RUN.
IDENTIFICATION DIVISION
: Proporciona la identificación del programa.PROGRAM-ID
: Es el nombre del programa.ENVIRONMENT DIVISION
: Describe el hardware y el software.DATA DIVISION
: Donde se definen todas las variables.WORKING-STORAGE SECTION
: Para variables que persisten durante la ejecución del programa.PROCEDURE DIVISION
: Contiene el código ejecutable del programa.Aquí hay un ejemplo simple de un programa COBOL que imprime "Hello, World!" en la pantalla:
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO-WORLD.
PROCEDURE DIVISION.
DISPLAY 'Hello, World!'.
STOP RUN.
Para compilar el programa, guarde el código en un archivo con extensión .cob
o .cbl
, por ejemplo, hello-world.cob
. Luego, utilice el compilador GnuCOBOL para compilar el código fuente:
cobc -x -o hello-world hello-world.cob
cobc
: Es el comando del compilador GnuCOBOL.-x
: Indica que se generará un archivo ejecutable.-o hello-world
: Especifica el nombre del archivo ejecutable de salida.Una vez compilado, ejecute el programa simplemente llamando al ejecutable:
./hello-world
Vamos a crear una calculadora simple que sume dos números:
IDENTIFICATION DIVISION.
PROGRAM-ID. SIMPLE-CALC.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 NUM-A PIC 9(4).
01 NUM-B PIC 9(4).
01 RESULT PIC 9(5).
PROCEDURE DIVISION.
DISPLAY "Enter first number: ".
ACCEPT NUM-A.
DISPLAY "Enter second number: ".
ACCEPT NUM-B.
ADD NUM-A TO NUM-B GIVING RESULT.
DISPLAY "The sum is: ", RESULT.
STOP RUN.
PIC 9(4)
: Define un campo numérico de hasta 4 dígitos.ADD
: Es la operación de suma en COBOL.Guarde el código en un archivo llamado simple-calc.cob
.
Compile el programa:
cobc -x -o simple-calc simple-calc.cob
Ejecute el programa:
./simple-calc
La depuración de programas COBOL puede ser desafiante debido a su naturaleza y al entorno en el que se ejecuta. Aquí hay algunas pautas generales para la depuración:
DISPLAY
para imprimir valores de variables y rastrear la ejecución.Aunque COBOL es un lenguaje antiguo, su relevancia en aplicaciones empresariales lo convierte en una habilidad valiosa. La capacidad de escribir, compilar y ejecutar programas COBOL es esencial para mantener y actualizar sistemas heredados. Con esta guía práctica, tiene los conocimientos básicos para comenzar a trabajar con COBOL en el entorno moderno.
Recuerde, la práctica es esencial para dominar cualquier lenguaje de programación, incluido COBOL. ¡Feliz codificación!