Alquimista de código

Un bloque en Cobol es similar a una función. Un bloque nos ayuda a dividir nuestro código y hacerlo más legible. Recordemos un poco la estructura básica de un programa en Cobol . IDENTIFICATION DIVISION . PROGRAM-ID . NOMBRE. AUTHOR AUTOR. INSTALLATION. ALQUIMISTA. DATE-WRITTEN. dd / mm / yy. DATE-COMPILED. SECURITY. NO ES CONFIDENCIAL. *>BLOQUE DE DATOS DATA DIVISION . WORKING-STORAGE SECTION . *> BLOQUE PRINCIPAL PROCEDURE DIVISION . STOP RUN . Recordar también que la extensión de un programa Cobol es *.cbl y/o *.cob. ¿Cómo podemos crear un bloque en Cobol?  La sintaxis es la siguiente: BLOQUE. *> CÓDIGO. ¿Cómo podemos definir una variable y qué tipo está permitido? *> PARA COLOCAR VARIABLES DATA DIVISION . WORKING-STORAGE SECTION . *> SE PUEDE USAR PIC O PICTURE *> EJEMPLOS: *> NÚMERO CON SIGNO, VALUE PARA ASIGNAR UN VALOR AL INICIO 01 WS-NUMERO PICTURE S9(05)V99 VALUE - 33 . 11 . *> CARACTER

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. 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

Para programar en COBOL debemos respetar la siguiente estructura: Estructura COBOL IDENTI FICATION DIVISION . PROGRA M-ID . PROGRAMA . AUTHOR AUTOR . INSTAL LATION . EMPRESA . DATE-W RITTEN . dd / mm / yy . DATE-C OMPILED . SECURI TY . NO ES CONFIDENCIAL . DATA D IVISION . WORKIN G-STORAGE SECTION . *> COM ENTARIO PROCED URE DIVISION . NOMBR E SECTION . MAIN. ST OP "PAUSE" . ST OP RUN . Ejemplo. Hola mundo. prog001.cbl. IDENTI FICATION DIVISION . PROGRA M-ID . HOLA-MUNDO . AUTHOR ALQUIMISTA . INSTAL LATION . ALQUIMISTA . DATE-W RITTEN . 16 / 04 / 19 . DATE-C OMPILED . SECURI TY . NO ES CONFIDENCIAL . DATA D IVISION . WORKIN G-STORAGE SECTION . PROCED URE DIVISION . DISPLA Y '****************************' . DISPLA Y '** PROGRAMANDO EN COBOL **' . DISPLA Y ' ' . DISPLA Y ' HOLA, MUNDO!! ' . DISPLA Y '**************************

COBOL es un lenguaje de programación que se niega a morir. Por ahí escuchamos que nunca morirá. Que será eterno. Que muy pronto cobrará vida y todos le rendiremos pleitesía. ¡Larga vida al Rey! ¡Larga vida al señor benevolente!  Los bancos se niegan a migrar sus robustas aplicaciones a lenguajes como Java, C#, Python, etc. Consideran que "están muy chavos y les falta madurez". ¿Realmente Java puede procesar miles de miles de archivos sin perder nada, sin alterar el status quo o provocar una catástrofe? ¿Puede Python con todo el paquete? ¿Acaso es necesario convertir miles de líneas de código Cobol a Java y así obtendremos mejores resultados? Muchas preguntas y no muchas respuestas satisfactorias. COBOL es un lenguaje de programación destinado para la creación de aplicaciones empresariales donde es necesario procesar grandes cantidades de datos. Se ha escuchado en el mundo de la programación que si algo funciona correctamente es mejor "no moverle nada" para que

En este post veremos cómo instalar  Open Cobol. Instalación: $ sudo apt-get update $ sudo apt-get install open-cobol $ cobc -V La extensión de un programa COBOL puede ser *.cbl y/o *.cob Ejemplo: Hola, mundo en Cobol. Nombre del archivo: prog001.cbl IDENTI FICATION DIVISION . PROGRA M-ID . PROG001 . AUTHOR ALQUIMISTA . INSTAL LATION . ALQUIMISTA DE CODIGO . DATE-W RITTEN . 13 / 04 / 19 . DATE-C OMPILED . SECURI TY . NO ES CONFIDENCIAL . PROCED URE DIVISION . DISPLA Y '****************************' . DISPLA Y '** PROGRAMANDO EN COBOL **' . DISPLA Y ' ' . DISPLA Y ' HOLA, MUNDO!! ' . DISPLA Y '****************************' . STOP R UN . Compilamos: $ cobc - x - free *. cbl - o prog001 . exe Ejecutamos: $ ./pr og001 . exe ¡Eeeeso eeeso tooodo por hoy! ;)