We are trying to produce the "Archive Volser Report" by executing the DSCULP21 Culprit control statements but the job is abending with a U0999 in Module=CULE.
Is there a fix available that would prevent the U0999 abend?
When running DSEXCULP with MEMBER=DSCULP21 or the "ARCHIVE broken chain REBUILD" utility DSEXARU1, the IDMS CULE module overflows a counter and issues this decimal overflow U0999 abend. This abend occurs when the number of lines in the CULPRIT output reaches or exceeds ten million lines.
Application of the following PTF will resolve this problem:
PTF LU09095 - DISPATCH CULPRIT JOB DSEXCULP MAY ABEND WITH U0999
PROBLEM DESCRIPTION:
Dispatch Culprit Reporting Job DSEXCULP or the DSEXARU1 job may ABEND with U0999.
DESCRIPTION:
AFTER WRITING 10 MILLION RECORDS TO THE REPORT OR OUTPUT FILE, MODULE=CULE OVERFLOWS A COUNTER AND ABENDS WITH A DECIMAL OVERFLOW ERROR.
Original Dispatch PTF RO94428 - If you already have RO94428 applied, this PTF provides a new program (CADSARVL), a module replacement for the VCBTDATE program, and new execution JCL (DSEXARVL) which will be available in the CA Dispatch installed 'hlq...CADSJCL' library. Instead of running DSEXCULP with MEMBER=DSCULP21, clients can now run the new DSEXARVL job to produce an alternative "Archive Volser Report" report.