Ir al contenido principal

Cobol en un vistazo

Imagen
De Dr. Lang


Cobol es un lenguaje de propósito específico y orientado a negocios. Al igual que muchos otros lenguajes posee sus propias características y aspectos únicos.

COBOL (Common Business-Oriented Language) es un lenguaje de programación de alto nivel diseñado específicamente para aplicaciones de negocio.

Fue desarrollado en los años 1950 y 1960, siendo uno de los primeros lenguajes de programación utilizados ampliamente.

COBOL fue creado con el propósito de permitir a las empresas escribir programas que pudieran funcionar en diferentes máquinas, y se diseñó para ser legible y comprensible por personas no expertas en programación, como contadores y gerentes.

 

Características Principales de COBOL:

  1. Orientación a Negocios:

    • COBOL está optimizado para aplicaciones de negocio, incluyendo sistemas de contabilidad, procesamiento de transacciones bancarias, gestión de inventarios, y más.

  2. Legibilidad:

    • COBOL fue diseñado para ser fácil de leer, con una sintaxis que se asemeja al inglés natural. Esto facilita la comprensión y el mantenimiento del código, especialmente por parte de personas no técnicas.

  3. Portabilidad:

    • Uno de los objetivos de COBOL era ser independiente de la máquina, lo que significa que los programas COBOL pueden ejecutarse en diferentes tipos de sistemas informáticos con mínimas modificaciones.

  4. Manejo de Datos:

    • COBOL es muy fuerte en el manejo de grandes volúmenes de datos y procesamiento de archivos. Es especialmente efectivo para el procesamiento de registros de gran tamaño y para realizar operaciones complejas de entrada/salida de datos.

  5. Longevidad:

    • A pesar de ser un lenguaje antiguo, COBOL sigue siendo utilizado extensamente en industrias críticas, como la banca, seguros, y agencias gubernamentales, debido a su robustez y fiabilidad.

Para Qué Sirve COBOL:

  1. Sistemas Bancarios:

    • COBOL se utiliza para gestionar transacciones financieras, procesamiento de cheques, y sistemas de contabilidad bancaria. Es fundamental en la infraestructura de muchas instituciones financieras.

  2. Seguros:

    • Muchas compañías de seguros utilizan COBOL para gestionar pólizas, reclamaciones, y cálculos de primas.

  3. Gobierno:

    • Varias agencias gubernamentales utilizan COBOL para manejar datos de beneficios sociales, registros fiscales, y otros servicios públicos críticos.

  4. Empresas de Retail:

    • COBOL es utilizado en sistemas de gestión de inventarios, procesamiento de pedidos, y sistemas de facturación.

  5. Telecomunicaciones:

    • En la industria de telecomunicaciones, COBOL se utiliza para la facturación de servicios y la gestión de clientes.

 

Imprimir en pantalla.
*> MOSTRAR EN PANTALLA
DISPLAY "HOLA, MUNDO".

Solicitar entrada de datos. 
*> SOLICITAR DATOS
DISPLAY "INTRODUCE TU NOMBRE:".
ACCEPT WS-NOMBRE.

*>NOTA: EN COBOL DEBES DEFINIR UNA VARIABLE ANTES DE USARLA

Ejemplo. Usar EVALUATE ... EVALUATE-END. Es parecido a switch de Java.

IDENTIFICATION DIVISION.
PROGRAM-ID. EVALUAR.
AUTHOR ALQUIMISTA.
INSTALLATION. ALQUIMISTA.
DATE-WRITTEN. 17/04/19.
DATE-COMPILED.
SECURITY. NO ES CONFIDENCIAL.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-A PIC 9 VALUE 0.


PROCEDURE DIVISION.
   MOVE 3 TO WS-A.
   DISPLAY "INTRODUCE NUMERO:".
   ACCEPT WS-A.
   EVALUATE TRUE
   WHEN WS-A = 3
     DISPLAY WS-A" es igual a 3"
   WHEN WS-A > 2
     DISPLAY WS-A" es mayor que 2"
   WHEN WS-A < 0
     DISPLAY WS-A"es menor a 0"
    WHEN OTHER
     DISPLAY "Entrada no valida"
   END-EVALUATE.
STOP RUN.

En este ejemplo el usuario introduce un numero entero y de acuerdo a las opciones se efectúa una instrucción. En caso que el número introducido no este en el rango de opciones se mostrará un mensaje advirtiendo que le entra no es válida.

Ejemplo. Uso de COMPUTE para efectuar operaciones aritméticas.


*> SUMA
COMPUTE WS-SUMA = WS-NUM-A + WS-NUM-B.

*> ELEVAR UN NUMERO A UNA POTENCIA
COMPUTE WS-POTENCIA = WS-NUMERO ** 2.

Ejemplo. Calcular grados Fahrenheit y Celsius.
IDENTIFICATION DIVISION.
PROGRAM-ID. PROG0014.
AUTHOR ALQUIMISTA.
INSTALLATION. ALQUIMISTA.
DATE-WRITTEN. 18/04/19.
DATE-COMPILED.
SECURITY. NO ES CONFIDENCIAL.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-VALOR PIC 9(3) VALUE 20.
01 WS-RESULTADO PICTURE 9(3)V99 VALUE 0.0.
01 WS-OPC PIC X(9) VALUE "F".
PROCEDURE DIVISION.
 BEGIN.
 DISPLAY 'Menu: '.
 DISPLAY 'C. CELSIUS  F. FAHRENHEIT'.
 DISPLAY 'TU OPCION ES 'WS-OPC.
 
 
 IF WS-OPC = 'C' OR 'c' THEN
    COMPUTE WS-RESULTADO = (WS-VALOR - 32) * 0.55.
 
 IF WS-OPC = 'F' OR 'f' THEN
    COMPUTE WS-RESULTADO = (WS-VALOR * 1.8) + 32.
 
 DISPLAY 'RESULTADO = 'WS-RESULTADO.
    
 STOP RUN.

Ejemplo. Un programa que calcule los grados celsius.

celsius.cbl

IDENTIFICATION DIVISION.
PROGRAM-ID. PARRAFOS.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-FAHR PIC 9(4).
   01 WS-CELS PIC 9(6).

PROCEDURE DIVISION.
   INICIO.
     PERFORM PRESENTACION.
     PERFORM ASIGNACION.
     PERFORM CALCULAR.
     PERFORM RESULTADO.
     
    ASIGNACION.
    MOVE 456 TO WS-FAHR.
   
   CALCULAR.
     COMPUTE WS-CELS = (WS-FAHR - 32) / 1.8.
   
   PRESENTACION.
     DISPLAY "[  CALCULAR GRADOS CELSIUS  ]".
   
   RESULTADO.
   DISPLAY "GRADOS FAHRENHEIT: " WS-FAHR
   DISPLAY "RESULTADO DE LA OPERACION: " WS-CELS
   STOP RUN.

Es todo por hoy, amigos.
Etiquetas:

Comentarios

Publicar un comentario

Entradas populares de este blog

Programación Windows Batch (CMD) parte 3

De Dr. Lang
Crear ciclos para efectuar operaciones tediosas nos ahorrará tiempo para realizar otras tareas. En está ocasión veremos ciclos con FOR . ¿Cuál es la síntaxis de bucle FOR en Windows Batch? Si está dentro de un archivo *.bat : FOR %%variable IN (seq) DO operaciones Si lo ejecutamos en una terminal: FOR %variable IN (seq) DO operaciones Ejemplo 1 . Recorrer una secuencia de números del 0 al 5: recorrer.bat @ echo off FOR %%i in ( 0 1 2 3 4 5 ) DO echo Hola no. %%i pause Nos imprimirá en pantalla: Hola no. 0 Hola no. 1 Hola no. 2 Hola no. 3 Hola no. 4 Hola no. 5 ¿Puedo usar contadores? Si, se pueden usar. Ejemplo 2 . Uso de contadores: contador.bat @ echo off set numeros = 1 2 3 4 5 6 7 8 9 10 set cont = 0 for %%a in ( %numeros% ) do ( echo Hola no. %%a :: Contador set /a cont+ = 1 ) echo Total: %cont% Este código nos imprimirá, además de los mensajes Hola no. 0 ..., el total de valores conta
3 comentarios
Leer más

Programación Windows Batch (CMD) parte 4

De Dr. Lang
Siguiendo con la serie de post sobre programación ( 1 , 2 , y 3 ) batch ahora veremos algunas cosas como operaciones aritméticas, operadores lógicos  y uso de ficheros. Cuando somos administradores de servidores o desarrolladores muchas veces tenemos que realizar tareas que nos quitan, relativamente, tiempo valioso que podríamos ocupar para otras cosas (como ver nuestro Facebook, jeje, broma).  Aprender a escribir scripts que nos faciliten algunas tareas siempre es útil. Por ejemplo, conocer todas las características técnicas de nuestro equipo de cómputo nos servirá cuando se realiza peritajes informáticos y soporte al equipo. Realizar respaldos automáticos a nuestras carpetas , archivos y directorios será más sencillo gracias a un script. Pero antes debemos aprender lo básico de la programación en batch. Ejemplo 1. Operaciones aritméticas básicas. aritmetica.bat @ echo off ::Nombre del archivo, imprimirá: aritmetica.bat echo %0 :: Set nos servirá para asignar va
Publicar un comentario
Leer más

COBOL para principiantes #1

De Dr. Lang
COBOL es un lenguaje de programación que sigue dando de que hablar. Los programadores Java, C#, Python, etc. saben que aún existen aplicaciones hechas en COBOL y es difícil que éstas migren a un lenguaje más actual. Es por esa y otras razones que muchos han pensado en aprender este lenguaje 'obsoleto'. ¡COBOL is the king, no ha muerto! ¡A desempolvar los libros de nuestros abuelos, tíos o maestros! ¿Qué debemos hacer para aprender COBOL y no morir en el intento? Para empezar necesitas: Tener bases de programación (obvio). Conseguir un compilador dependiendo del sistema operativo que uses (si usas Windows puedes usar Visual Studio e instalar un compilador; si usas Linux puedes usar Gnu OpenCOBOL, nosotros usaremos éste último en el blog ). Saber qué extensión se usa para crear un programa COBOL (.cb, cbl, .cb). Nosotros usaremos .cbl  Comprender la estructura de un programa COBOL.  Conocer las estructuras de control y estructuras de datos en COBOL. Practicar.
2 comentarios
Leer más