Product Interfaces › Disabling the JES3 Write Ring and Expiration Date Check

Disabling the JES3 Write Ring and Expiration Date Check

Because of the tape protection provided by CA TLMS, it is recommended that you disable two checks provided by JES3. During setup, JES3 checks the label expiration date of SL tapes mounted for scratch requests. All tapes originally created with a TLMS keyword expiration date will be rejected. JES3 allows this check to be disabled only on a job basis using the //*MAIN statement.

JES3 checks for the presence or absence of tape write rings. With CA TLMS, it is not necessary to remove the write rings.

The subsystem forces the label type and density of the tape being mounted to match the JCL by rejecting the tape if the label type and density do not match for JES3 users. For JES3 versions having IATUX62 (JES3 Version 2.1.5 or higher), this user exit allows SL functions to be overridden.

To disable both checks, modify the JES3 user exit IATUX29. See "Obtaining Job Accounting Information" in the IBM JES3 SPL: User Modifications and JES3 Macros. Turn on the following bits in the JDAB control blocks (DSECTed by the JES3 macro IATYJDA):

01 JDABFLG3,JDABNOXP BYPASS EXPDT CHECK
01 JDABFLG2,JDABRNGC RING CHECK=NO

If the following code is not present in IATUX29, you will also need to add it prior to the two 01 instructions above.

USING IATISDT,R13
L     R8,JDABADDR
USING JDABSTRT,R8

You must also ensure that R15 is set with the correct value for the IATUX29 exit to be invoked. Please see the appropriate IBM manual.

Additionally, a suggested change is to the JES3 module IATIIDY to disable expiration date checking during dynamic allocation. Sequence numbers should be checked, as they may change. Consult your IBM PSR.

         TM  JSTDFLG1,JSTTA      Q. TAPE?              02580100
         BC  ALLOFF,SKIPNEXT     A. NO                 02580200
         OI  JSTHFLG4,JSTNOXP    BYPASS EXP CHK        02580300
SKIPNEXT OS  0H