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.
La guía más completa sobre los diversos comandos para escribir y ejecutar un JCL y COBOL programas que se pueden encontrar en:
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).
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.
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.
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.
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.