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 menos ese primer registro y 4 en caso contrario. Por tanto, el retorno 4 de dicho paso nos indica que el fichero está vacío.
//SIVACIO EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
PRINT IDS('nombre fichero') COUNT(1)
/*
// IF SIVACIO.RC = 4 THEN --> fichero vacío
// IF SIVACIO.RC = 0 THEN --> fichero con contenido