How to bypass any handling of Not Catlg 2 by CA Allocate?
book
Article ID: 103193
calendar_today
Updated On:
Products
Allocate DASD Space and Placement
Issue/Introduction
The customer is trying to use IBM's parameter in ALLOC00 in parmlib to control this and CA Allocate keeps getting in there. They just want to bypass any type of handling of the "Not Catlg 2" condition by CA Allocate.
How to bypass any handling of "Not Catlg 2" by CA Allocate?
Environment
Release: Component: ALLOC
Resolution
Check for &IFCAT = 'Y' and set EXIT CODE(8) to fail before any data set that would get a ‘not catlgd-2’ error is allocated.
Sample ASR code: IF &VAMENVIR = 'ALLOC' THEN DO IF &IFCAT = 'Y' AND &IFALREADYCATVOL ¬= 'ARCIVE' THEN DO WRITE '***' WRITE 'STEP &STEPNAME WILL BE FAILED' WRITE ' TO PREVENT A NOT CATLG 2 CONDITION' WRITE ' FOR &DSN' WRITE '***' EXIT CODE(8) END END
With this, the batch job will fail before any data set that would get a ‘not catlgd-2’ error is allocated with messages: IEF453I jobname- JOB FAILED - JCL ERROR IEF272I jobname stepname - STEP WAS NOT EXECUTED.
Additional Information
Note: The data sets that are Archived under CA Disk, need to be excluded via &IFALREADYCATVOL ¬= 'ARCIVE', otherwise all the restores will fail with CC=8 because these actually are cataloged with volser ARCIVE.