COBOL - Configuración del Entorno

Instalar COBOL en Windows/Linux

Existen muchos Mainframe Los Emuladores disponibles para Windows, lo que se puede utilizar para escribir y aprender simples programas COBOL.

Uno de los emuladores es Hércules, que se puede instalar fácilmente en Windows siguiendo unos sencillos pasos como se indica a continuación:

  • Descargue e instale el emulador Hercules, que está disponible en el sitio de la casa de Hércules: www.hercules-390.eu

  • Una vez que haya instalado el paquete en máquina Windows, se creará una carpeta como C:\hércules\mvs\cobol.

  • Ejecutar la línea de comandos (CMD) y llegar al directorio C:\hércules\mvs\cobol en CMD.

Hercules es el resultado de una implementación de software de fuente abierta de la mainframe System/370 y de la ESA/390 arquitecturas, además de los últimos 64 bits z/Architecture. Hércules se ejecuta bajo Linux, Windows, Solaris, FreeBSD y Mac OS X.

Un usuario puede conectarse a un servidor central en un número de maneras diferentes, un cliente ligero, un terminal, Virtual Client System (VCS), o Virtual Desktop System (VDS). Cada usuario válido dado un id de inicio de sesión para entrar en el Z/OS interfaz (TSO/E o ISPF).

Compilar programas COBOL.

Con el fin de ejecutar un programa COBOL en modo de proceso por lotes utilizando JCL, es preciso compilar el programa, y un módulo de carga se crea con todos los sub-programas. El JCL utiliza el módulo de carga y no el programa en el momento de la ejecución. Las bibliotecas de carga se concatenan y dada en el JCL en el momento de la ejecución mediante JCLLIB o STEPLIB.

Hay muchas utilidades mainframe compilador para compilar un programa COBOL. Algunas empresas utilizan herramientas de administración de cambios como actuación, que compila y almacena todas las versiones del programa. Esto es útil en el seguimiento de los cambios realizados en el programa.

//COMPILE   JOB ,CLASS=6,MSGCLASS=X,NOTIFY=&SYSUID             
//*            
//STEP1     EXEC IGYCRCTL,PARM=RMODE,DYNAM,SSRANGE
//SYSIN     DD DSN=MYDATA.URMI.SOURCES(MYCOBB),DISP=SHR
//SYSLIB    DD DSN=MYDATA.URMI.COPYBOOK(MYCOPY),DISP=SHR
//SYSLMOD   DD DSN=MYDATA.URMI.LOAD(MYCOBB),DISP=SHR
//SYSPRINT  DD SYSOUT=*
//*

Es un IBM IGYCRCTL compilador COBOL utilidad. Las opciones del compilador se pasan con el PARM parámetro. En el ejemplo anterior, RMODE indica al compilador que utilice modo de direccionamiento relativo en el programa. El programa COBOL se transmite mediante el parámetro SYSIN. Copybook es la biblioteca utilizada por el programa en SYSLIB.

Ejecutar programas COBOL.

A continuación es un JCL ejemplo en caso de que el programa se ejecuta MIPROG utilizando el archivo de entrada MYDATA.URMI.INPUT y produce dos archivos de salida en el carrete.

//COBBSTEP  JOB CLASS=6,NOTIFY=&SYSUID
//
//STEP10    EXEC PGM=MYPROG,PARM=ACCT5000
//STEPLIB   DD DSN=MYDATA.URMI.LOADLIB,DISP=SHR
//INPUT1    DD DSN=MYDATA.URMI.INPUT,DISP=SHR
//OUT1      DD SYSOUT=*
//OUT2      DD SYSOUT=*
//SYSIN     DD *
//CUST1     1000
//CUST2     1001
/*

El módulo de carga de MIPROG se encuentra en MYDATA.URMI.LOADLIB. Esto es importante señalar que el JCL se puede utilizar para un no-COBOL DB2 sólo en el módulo.

Ejecutar COBOL DB2 programas

Para la ejecución de una COBOL-DB2 programa especializado, IBM se utiliza la utilidad en el JCL y el programa, DB2 y se pasan los parámetros necesarios como entrada a la utilidad.

Los pasos seguidos en la realización de un COBOL DB2 programa son los siguientes:

  • Cuando el COBOL DB2 programa se compila, DBRM (Solicitud de Base Module) es creado junto con el módulo de carga. El DBRM contiene las sentencias SQL del COBOL programas con su sintaxis se comprueba que es correcta.

  • El DBRM está vinculado a la DB2 (medio ambiente) en el que el COBOL. Esto se puede hacer utilizando la utilidad IKJEFT01 en un JCL.

  • Después del enlace, el COBOL DB2 se ejecuta el programa mediante IKJEFT01 (de nuevo) con la biblioteca de carga y el DBRM biblioteca como la entrada para el.

//STEP001  EXEC PGM=IKJEFT01
//*
//STEPLIB  DD DSN=MYDATA.URMI.DBRMLIB,DISP=SHR
//*
//input files
//output files
//SYSPRINT DD SYSOUT=*
//SYSABOUT DD SYSOUT=*
//SYSDBOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DISPLAY  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD *

   DSN SYSTEM(SSID)
   RUN PROGRAM(MYCOBB) PLAN(PLANNAME) PARM(parameters to cobol program) -
   LIB('MYDATA.URMI.LOADLIB')
   END
/*

En el ejemplo anterior, MYCOBB es el COBOL DB2 ejecución de programa utilizando IKJEFT01. Por favor tenga en cuenta que el nombre del programa,DB2 Sub-System Id (SSID), y DB2 nombre del Plan se aprobó en el SYSTSIN DD. El DBRM biblioteca se especifica en la STEPLIB.

Pruebe en línea, opción

Usted realmente no tiene que configurar su propio entorno para empezar a aprender lenguaje de programación COBOL. Razón es muy simple, ya hemos establecido entorno de programación COBOL en línea, de modo que se puede compilar y ejecutar todos los ejemplos disponibles en línea al mismo tiempo cuando usted está haciendo su teoría. Esto le da confianza en lo que están leyendo y para comprobar el resultado con las diferentes opciones. Siéntase libre para modificar cualquier ejemplo y ejecutar en línea.

Pruebe el siguiente ejemplo usando nuestro Probar opción disponible junto con el código de nuestra página web.

IDENTIFICACIÓN DIVISIÓN.
PROGRAMA-ID. HOLA.

PROCEDIMIENTO DIVISIÓN.
PANTALLA "Hello World".
FIN DE FUNCIONAMIENTO.

Cuando se compila y ejecuta el programa antes mencionado, se produce el resultado siguiente:

Hello World

Para algunos de los ejemplos de este tutorial, usted encontrará laprobar opción en nuestro sitio web selecciones de código en la esquina derecha que te llevará a la compilador en línea. Así que tan sólo hacer uso de ella y disfrutar de su aprendizaje. Intente que opción sería trabajar sólo con el código compatible con OpenCOBOL. Los programas que requieren JCL (archivo de entrada, archivo de salida o parámetros) para su ejecución, no se ejecute en Tryit opción.

Advertisements