Este JCL mostrará el uso de los parámetros SKIP y COUNT del programa IDCAMS para poder seleccionar secciones de un archivo secuencial.
SKIP : Omite N registros desde el inicio del archivo.
COUNT : Selecciona los N registros indicados a partir del inicio del archivo o en combinación con SKIP desde el registro siguiente del omitido.
Continue reading »
Como ya lo había comentado, en este espacio “mainframe” publicaré algunos ejemplos de JCL con las tareas que comúnmente se realizan, seque hay miles de manuales, pero trataré de ponerlos para que sea sólo un copy&paste:
Bueno, este primer ejemplo será una copia simple de archivos a través de la utilería ICEGENER:
//*--------------------------------------------------------------------
//* COPIA DE ARCHIVOS SECUENCIALES CON ICEGENER
//* SYSUT1 : ARCHIVO ORIGEN
//* SYSUT2 : ARCHIVO DESTINO
//*--------------------------------------------------------------------
//COPY0001 EXEC PGM=ICEGENER
//SYSUT1 DD DSN=ARCHIVO.DE.ENTRADA,
// DISP=SHR
//SYSUT2 DD DSN=ARCHIVO.DE.SALIDA,
// DISP=(NEW,CATLG,DELETE),
// UNIT=3390,SPACE=(CYL,(1,1),RLSE),
// DCB=*.SYSUT1
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//*--
Si crees que es necesario que explique línea por línea dímelo por este medio o a través de twitter a @hackob en lo haré en los siguientes ejemplos.
