El Resurgimiento de COBOL: Historia, Comandos Básicos, Ejecución en Windows y Su Uso en la Actualidad

 

 En un mundo donde las tecnologías cambian constantemente, existe un lenguaje de programación que ha demostrado ser resistente al paso del tiempo: COBOL. En este artículo, exploraremos la historia de COBOL, aprenderemos algunos comandos básicos, descubriremos cómo ejecutar COBOL en Windows y discutiremos su relevancia en la actualidad.

Historia de COBOL: COBOL, que significa "Common Business-Oriented Language" (Lenguaje Común Orientado a Negocios), fue desarrollado en la década de 1950 por un comité de expertos en informática. Su objetivo era crear un lenguaje de programación que fuera fácil de leer y escribir para aplicaciones comerciales. A lo largo de las décadas, COBOL se convirtió en el estándar de facto para la programación empresarial.

Comandos Básicos de COBOL: A continuación, veremos algunos comandos básicos de COBOL:

1. IDENTIFICATION DIVISION: Esta sección contiene información sobre el programa, como su nombre y autor.
2. ENVIRONMENT DIVISION: Aquí se especifica la configuración del entorno en el que se ejecutará el programa.
3. DATA DIVISION: En esta sección, se definen las variables y estructuras de datos utilizadas en el programa.
4. PROCEDURE DIVISION: Aquí se encuentra el código del programa, con instrucciones para realizar tareas específicas.

Ejecución de COBOL en Windows: Para ejecutar programas COBOL en Windows, puedes utilizar compiladores como Micro Focus COBOL o GNU COBOL. Estos compiladores te permiten escribir y compilar código COBOL en Windows y ejecutarlo como cualquier otro programa.

 

Ejemplo Práctico en COBOL: Imaginemos que estás trabajando en un programa COBOL para calcular el salario de los empleados de una empresa. Aquí tienes un fragmento de código que muestra cómo leer datos, realizar cálculos y repetir el proceso para varios empleados:

IDENTIFICATION DIVISION.

PROGRAM-ID. CalculoSalario.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 EmpleadoId PIC 9(5).
01 HorasTrabajadas PIC 9(3).
01 TarifaHora PIC 9(5)V99.
01 Salario PIC 9(7)V99.
01 Continuar PIC X.

PROCEDURE DIVISION.

Inicio.
    DISPLAY "Ingrese el ID del empleado (0 para salir): ".
    ACCEPT EmpleadoId.
    
    IF EmpleadoId = 0 THEN
        STOP RUN.
    END-IF.
    
    DISPLAY "Ingrese las horas trabajadas por el empleado: ".
    ACCEPT HorasTrabajadas.
    
    DISPLAY "Ingrese la tarifa por hora: ".
    ACCEPT TarifaHora.
    
    COMPUTE Salario = HorasTrabajadas * TarifaHora.
    
    DISPLAY "El salario del empleado ", EmpleadoId, " es: ", Salario.
    
    DISPLAY "¿Desea continuar (S/N)?: ".
    ACCEPT Continuar.
    
    IF Continuar = 'S' OR Continuar = 's' THEN
        GO TO Inicio.
    ELSE
        STOP RUN.
    END-IF.

Explicación del Código:

• En este ejemplo, comenzamos por solicitar el ID del empleado, las horas trabajadas y la tarifa por hora.
• Luego, calculamos el salario multiplicando las horas trabajadas por la tarifa por hora.
• Después, mostramos el salario calculado.
• Preguntamos al usuario si desea continuar o salir.
• Si el usuario desea continuar, volvemos al inicio; de lo contrario, detenemos el programa.

 

Uso de COBOL en la Actualidad: Aunque COBOL es un lenguaje antiguo, sigue siendo ampliamente utilizado en aplicaciones empresariales críticas, especialmente en sectores como la banca, la atención médica y el gobierno. Muchos sistemas heredados están escritos en COBOL, y se necesitan programadores COBOL para mantener y modernizar estos sistemas.

Además, COBOL ha experimentado un resurgimiento reciente debido a la pandemia de COVID-19, ya que muchos sistemas gubernamentales de manejo de beneficios y desempleo están escritos en COBOL y han requerido actualizaciones y mantenimiento.