Thursday 20 August 2015

ICEMAN Utility

ICEMAN utility is used to count the number of records in a tape data set. 

Example:

//A171501C JOB (Accounting-information),CLASS=T,             
//         MSGCLASS=H,NOTIFY=&SYSUID                      
//*THIS JCL TELLS THE NO. OF RECORDS IN THE SPECIFIED TAPE DATASET 
//COUNT    EXEC PGM=ICEMAN                                         
//SORTIN   DD DSN=Dataset-name,DISP=SHR                           
//SYSOUT   DD SYSOUT=*                                             
//SORTOUT  DD SYSOUT=*                                             
//SYSIN    DD *                                                    
  SORT FIELDS=COPY                                                 
  OUTFIL REMOVECC,NODETAIL,                                        
  TRAILER1=('NO. OF RECORDS: ' ,COUNT)                             
/*                                                                 
//* 

REMOVECC - REMOVES ANSI CONTROL CHARACTERS FROM THE REPORT      
NODETAIL - PREVENTS DETAIL RECORDS FROM BEING WRITTEN TO OUTFIL                                                                

No comments:

Post a Comment