Count the record in a file, then do abend

1. 统计出VSAM文件中以特定字段为判断条件,判断条件不重复的记录条数;如果记录数大于特定值,则Abend Job:
(Count the total records that satisfy specific criteria, then compare with a number, if do abend if necessary.)

//STEP10       EXEC PGM=ICETOOL
//TOOLMSG  DD   SYSOUT=*
//DFSMSG     DD   SYSOUT=*
//IN1               DD   DISP=SHR,DSN=TOUGH.TEST.RATE
//OUT1          DD   DISP=SHR,DSN=TOUGH.TEST.RATE.OUT
//TOOLIN      DD   *
  SELECT FROM(IN1)  TO(OUT1) ON(5,4,BI) FIRST
  COUNT  FROM(OUT1) HIGHER(100) RC12
//*

 

你可能感兴趣的:(JCL)