This ICETOOL is used to create a report that contains the number of occurances of a unique values which we specified.

Consider in this example, the unique value is formed by the combination of TYPECODE, APP IND and COMP IND. Like this we could have any number of combinations.

//S1    EXEC  PGM=ICETOOL                                    

//TOOLMSG DD SYSOUT=*                                        

//DFSMSG  DD SYSOUT=*                                        

//IN DD DSN=WCSW.NONX.WCSP084D.WCS08430.SRT.G0958V00,DISP=SHR

//OUT DD SYSOUT=*                                            

//TOOLIN DD *                                                

 OCCUR FROM(IN) LIST(OUT)           -                        

 ON(10,9,CH) ON(34,1,CH) ON(43,1,CH) ON(VALCNT) -            

 HEADER('TYPECODE') HEADER('APP IND') HEADER('COMP IND') -   

 HEADER('OCCURANCE') BLANK                                   

/*