ICETOOL - VERIFY Operator


Examines specified decimal fields in a data set.

Examines up to 10 specified decimal fields.

Prints a message identifying each invalid value found for each field.

A decimal value is considered invalid under one of the following circumstances:

  • It contains A-F as a digit.
  • It contains 0-9 as a sign and the NOSIGN operand is not specified.

Syntax: -



Required Operands: -


FROM -

Specifies the ddname of the input data set.

DD statement must supply for the ddname specified.


ON -

Specifies a field to be used for this operation.

From 1 to 10 ON fields can be specified.

(p,m,f) gives the position, length and format of a numeric or character field. A field must not extend beyond position 32752 or the end of the record.


Optional Operands: -


NOSIGN -

Specifies the sign of the decimal values is not to be checked for validity.


LIMIT -

Specifies a limit for the number of invalid decimal values.

Overrides the default of 200.

If n invalid decimal values are found, ICETOOL terminates the operation.


VSAMTYPE -

Specifies the record format for a VSAM input data set (F or V).


Example: -

Below example to copy only data employee records (exclude header and footer).


Input: -

MTHUSR.INPUT.DATASET3 -


JCL: -

----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
***************************** Top of Data ******************************
//MTHUSRR JOB (123),'MTHUSR',CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),         
//             NOTIFY=&SYSUID                                           
//*                                                                     
//STEP01   EXEC PGM=ICETOOL                                             
//INDD     DD DSN=MTHUSR.INPUT.DATASET3,DISP=SHR                        
//TOOLIN   DD *                                                         
  VERIFY FROM(INDD) ON(65,6,ZD)                                         
/*                                                                      
//TOOLMSG  DD DSN=MTHUSR.OUTPUT.TOOLMSG1,DISP=SHR                       
//DFSMSG   DD SYSOUT=*                                                  
//                                                                      
**************************** Bottom of Data ****************************


OUTPUT: -

TOOLMSG: -


Explaining Solution: -

  • INDD - Specifies the ddname for input dataset.
  • TOOLIN DD * - Specifies the ICETOOL statements for DFSORT.
  • TOOLMSG - Specifies ICETOOL message data set.
  • DFSMSG - Specifies DFSORT message data set.
  • VERIFY FROM(INDD) ON(65,6,ZD) - Verifies and prints the invalid results in the TOOLMSG based on the criteria from 65th position of length 6 and type Zoned Decimal.