Creación y Ejecución de JCL para Generar Reporte en Mainframe
Clase 7 de 10 • Curso Práctico de COBOL
Resumen
¿Cómo se crea el JCL para ejecutar un programa que muestra un reporte?
La creación de un JCL (Job Control Language) es esencial en la automatización de tareas en sistemas mainframe. Este artículo explica detalladamente los pasos para crear un JCL que ejecuta un programa y genera un reporte, utilizando IEFBR14 e IEBGENER. A continuación, se ofrece una guía para codificar tu propio JCL y los archivos necesarios.
¿Cómo iniciar sesión en el emulador?
Para comenzar, necesitas acceder al emulador del sistema. Aquí se muestra cómo hacerlo:
- Presiona
Enter
. - Ingresa tu usuario:
erc01
. - Introduce la contraseña:
ql8tr
. - Una vez dentro, selecciona la opción
1
en el menú principal. - Usa el shortcut
3.4
para acceder a la carpetaplatzi.jcls
.
¿Cómo crear archivos de entrada necesarios?
Dentro del entorno, es importante crear los archivos de datos que el programa utilizará:
- Ve a la opción
3 Utilities
en el menú. - Selecciona la opción
2 Dataset
. - Crea un archivo llamado
erc01.alumnos.becas
. - Usa la opción
A Allocate
y proporciona los detalles:- Tipo de archivo: Fijo bloqueado
- Longitud: 50
- Tamaño del bloque: 19050
- Volumen:
MVSCAT
, - Tracks primarios: 75
- Tracks secundarios: 2
Repite estos pasos para crear un segundo archivo erc01.alumnos.beca
.
¿Cómo generar un nuevo JCL?
Ahora que los archivos de entrada están preparados, es momento de crear el fichero JCL que ejecutará el programa:
- En la carpeta
platzi.jcls
, usa la opción de comando para generar un nuevo JCL, nombradoJCL.PGMU
. - Ingresa a este JCL y elimina el contenido existente.
- Comienza definiendo el JCL:
//REPORT01 JOB (PGMUNI),'Name'
// CLASS=A,
// MSGCLASS=H,
// REGION=8M,TIME=1440,
// NOTIFY=&SYSUID
// MSGLEVEL=(1,1)
//*
¿Cuál es la estructura del JCL?
A continuación, se detalla cada uno de los pasos para configurarlo adecuadamente:
- Paso de compilación: Ejecución de
pgm unib
insertando comentarios y referencias a la compilación COBOL.
//COMPILE EXEC PGM=IEWBLINK,PARM='LIST,XREF'
//STEPLIB DD DSN=ERC01.PLATZI.LOAD,DISP=SHR
- Reference al archivo de carga: Usa
IEFBR14
para manipular archivos entre otros pasos.
//STEP01 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//DUMMY DD DSN=ERC01.REPORTE.BECAS,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(10,5),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=27200)
¿Cómo asegurar la ejecución correcta del programa?
Comprueba que los archivos de entrada estén correctamente referenciados y las salidas sean visibles:
//ALUMNOS DD DSN=ERC01.ALUMNOS.BECAS,DISP=SHR
//REPORTE DD DSN=ERC01.REPORTE.BECAS,
// DISP=(NEW,CATLG,DELETE),
Recomendaciones finales:
- Práctica: Familiarízate con el uso del editor del emulador y los comandos de JCL.
- Comprueba errores: Asegura que todas las referencias a los nombres de archivos y variables sean correctas.
- Consulta documentación: Aprovecha recursos adicionales para resolver dudas sobre el funcionamiento de las utilidades como IEBGENER e IEFBR14.
Esta guía te proporciona los aspectos centrales para codificar un JCL funcional. No te detengas aquí. La práctica constante y la curiosidad por aprender más sobre la gestión de sistemas mainframe te permitirán convertirte en un experto en poco tiempo. ¡Sigue adelante!