JCLCheck S40D and/or S878 abended when JCLCheck is used with the REXX interface enabled (option STDREXX(pgm)).
Other symptoms:
. IRX0005I Error running CAZ1REXX. line xxxx: Machine storage exhausted
. JCLCheck CAY6345S A REQUEST FOR ADDITIONAL STORAGE HAS FAILED, INCREASE REGION SIZE AND RESUBMIT JOB
This happens after applying maintenance for zOS 2.5 support
Release : 12.0
Component : JCLCheck Workload Automation
1. JCLCheck PTFs SO07766 and SO07767 were created in March 2019 to add a new call to the REXX interface before the JCL is read. This new call is identified in the RAW_DATA_PROCESSING routine by a new record type ($CA.RSTYPE = 'OPTS'), and variable $CA.RCOUNT initialized to zeros. If the REXX program does not check for $CA.RCOUNT, a loop shall occur and consume available storage.
2. JCLCheck PTF LU03796: Additional storage blocks are obtained if there are more than 127 REXX variables, but the storage blocks do not get released.
1. Add the check for the $CA.RCOUNT value at the start of the RAW_DATA_PROCESSING routine in your REXX exec.
RAW_DATA_PROCESSING:
IF $CA.RCOUNT = 00000 THEN /* add */
RETURN /* add */
2. Apply PTFs LU07630 and LU07631.