Comprobar si un fichero está vacío con IDCAMS

La utilidad IDCAMS permite comprobar si un fichero está vacío mediante el comando PRINT, que se utiliza para listar el contenido de un archivo. Cuando solo interesa hacer la comprobación de fichero vacío, se añade el parámetro COUNT(1) para que solo se liste el primer registro. El paso de JCL devuelve 0 si existe al…

Uso de variables en un JCL

Para definir una variable en un JCL y asignarle valor se utiliza el comando SET: // SET PROGRAMA=CARGACLI // SET FICHENT=FF.CLIENTES.ENT // SET FICHSAL=FF.CLIENTES.SAL // SET NUEVO=’DISP=(NEW,CATLG,DELETE)’ Las variables así definidas se pueden usar en cualquiera de los siguientes pasos del JCL añadiendo un ‘&’ a su nombre: //CLIENTES  EXEC PGM=&PROGRAMA //SYSOUT    DD SYSOUT=*…

Comprobar si un fichero está vacío con ICETOOL

Al diseñar un JCL, muchas veces interesa que ciertos pasos no se ejecuten si un determinado fichero está vacío, algo que podemos comprobar fácilmente mediante el operador COUNT de ICETOOL: //—————————– //PASO1 EXEC PGM=ICETOOL //IN DD DSN=FICHERO,DISP=SHR //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //TOOLIN DD DATA COUNT FROM(IN) EMPTY /* //—————————– //INICOND IF PASO1.RC=0  THEN…