Abend U0999 CA JCLCheck when ADRDSSU has invalid sysin
Article ID: 191372
Updated On:
Products
JCLCheck Workload Automation
UNICENTER JCLCHECK COMMON COMPONENT
Issue/Introduction
We got the U0999 abend when the CA JCLCHECK is running to verify the SYSIN of the ADRDSSU JCL.
The verify JCL has incorrectly(typo) SYSIN of ADRDSSU.
Why does the CA JCLCheck abend occur?
JOBLOG:
IEA995I SYMPTOM DUMP OUTPUT 073
USER COMPLETION CODE=0999
TIME=16.40.40 SEQ=24950 CPU=0000 ASID=00D6
PSW AT TIME OF ERROR 478D1000 00175AF2 ILC 2 INTC 0D
ACTIVE LOAD MODULE ADDRESS=001753E0 OFFSET=00000712
NAME=ADRDSSU
DATA AT PSW 00175AEC - 00181610 0A0D58D0 C04E58E0
GR 0: C0000000 1: C00003E7
2: 00175B00 3: 00122298
4: 801222BC 5: 556006B0
6: 00000000 7: 00103460
8: 801216AC 9: 556363DC
A: 00163C50 B: 00162C50
C: 50175AB6 D: 00175B00
E: 50175ACA F: 0000000C
END OF SYMPTOM DUMP
JCLCHECK - ABEND=S000 U0999 REASON=00000000
JCLCHECK 12.0 INVOKED AT 2:40:40 AM ON FRIDAY MAY 22, 2020
SYSTEM INFORMATION: CPU MODEL=3906 SP7.2.1 TSO4.01.0 SMS3210 ENVIRONMENT ARRAY: SHAR00000000000000000 Z/OS 02.01.00
CALLING PARAMETERS: NOJOB NOCOND V SEV(4) NOSPIE ERROR(INLINE) NOF SX(NOR) DYN(XEOJ,XERR) DSNERR
DEFAULT PARAMETERS: CTL FULL JOB LIST XREF PXREF(RPT)
OPTIONS IN EFFECT: NOCOND NOFULL NOJOB NOSPIE CTLSCAN() DSNERR ERROR(INLINE) HCD SEV(4) VSAM(USING CSI)
** JCL **
//JCKJOB JOB (XXXX),'JCLCHK',MSGCLASS=H
//JCLCHECK EXEC JCLCHK,RGN=6M,
// PRM='NOJOB NOCOND V NOSPIE NOF SX(NOR)',
// PAN='DYN(XEOJ,XERR) DSNERR'
//SYSUDUMP DD SYSOUT=*
//SYSIN DD DATA,[email protected]@
//TESTJOB JOB (XXXX),'JCLCHK',MSGCLASS=H
//*------------------
//DFDSS1 EXEC PGM=ADRDSSU
//STEPLIB DD DSN=SYS1.DFDSSLIB,DISP=SHR
//INPUT DD UNIT=SYSDA,VOL=SER=TSO10B,DISP=SHR
//OUTPUT DD DSN=PUBLIC.JCLCHCK.TEST,DISP=(NEW,KEEP),
// UNIT=SYSDA,VOL=SER=TSO10C,
// SPACE=(CYL,(1,1),RLSE)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
DUNP LOGINDD(INPUT) OUTDD(OUTPUT) - <== TYPO sysin
DATASET(INC(PUBLIC.TEST.DATA.**)) -
ALLDATA(*) ALLEXCP SHR
/*
//
@@
//
The verify JCL has incorrectly(typo) SYSIN of ADRDSSU.
Why does the CA JCLCheck abend occur?
JOBLOG:
IEA995I SYMPTOM DUMP OUTPUT 073
USER COMPLETION CODE=0999
TIME=16.40.40 SEQ=24950 CPU=0000 ASID=00D6
PSW AT TIME OF ERROR 478D1000 00175AF2 ILC 2 INTC 0D
ACTIVE LOAD MODULE ADDRESS=001753E0 OFFSET=00000712
NAME=ADRDSSU
DATA AT PSW 00175AEC - 00181610 0A0D58D0 C04E58E0
GR 0: C0000000 1: C00003E7
2: 00175B00 3: 00122298
4: 801222BC 5: 556006B0
6: 00000000 7: 00103460
8: 801216AC 9: 556363DC
A: 00163C50 B: 00162C50
C: 50175AB6 D: 00175B00
E: 50175ACA F: 0000000C
END OF SYMPTOM DUMP
JCLCHECK - ABEND=S000 U0999 REASON=00000000
JCLCHECK 12.0 INVOKED AT 2:40:40 AM ON FRIDAY MAY 22, 2020
SYSTEM INFORMATION: CPU MODEL=3906 SP7.2.1 TSO4.01.0 SMS3210 ENVIRONMENT ARRAY: SHAR00000000000000000 Z/OS 02.01.00
CALLING PARAMETERS: NOJOB NOCOND V SEV(4) NOSPIE ERROR(INLINE) NOF SX(NOR) DYN(XEOJ,XERR) DSNERR
DEFAULT PARAMETERS: CTL FULL JOB LIST XREF PXREF(RPT)
OPTIONS IN EFFECT: NOCOND NOFULL NOJOB NOSPIE CTLSCAN() DSNERR ERROR(INLINE) HCD SEV(4) VSAM(USING CSI)
** JCL **
//JCKJOB JOB (XXXX),'JCLCHK',MSGCLASS=H
//JCLCHECK EXEC JCLCHK,RGN=6M,
// PRM='NOJOB NOCOND V NOSPIE NOF SX(NOR)',
// PAN='DYN(XEOJ,XERR) DSNERR'
//SYSUDUMP DD SYSOUT=*
//SYSIN DD DATA,[email protected]@
//TESTJOB JOB (XXXX),'JCLCHK',MSGCLASS=H
//*------------------
//DFDSS1 EXEC PGM=ADRDSSU
//STEPLIB DD DSN=SYS1.DFDSSLIB,DISP=SHR
//INPUT DD UNIT=SYSDA,VOL=SER=TSO10B,DISP=SHR
//OUTPUT DD DSN=PUBLIC.JCLCHCK.TEST,DISP=(NEW,KEEP),
// UNIT=SYSDA,VOL=SER=TSO10C,
// SPACE=(CYL,(1,1),RLSE)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
DUNP LOGINDD(INPUT) OUTDD(OUTPUT) - <== TYPO sysin
DATASET(INC(PUBLIC.TEST.DATA.**)) -
ALLDATA(*) ALLEXCP SHR
/*
//
@@
//
Environment
Release : 12.0
Component : CA JCLCheck workload Automation
Cause
Customer-specific problem
The ADRDSSU program had the user-exit on this SITE only.
If the SYSIN of ADRDSSU has the typo, the ADRDSSU exit will U0999 abend.
There is no CA JCLCheck problem.
The ADRDSSU program had the user-exit on this SITE only.
If the SYSIN of ADRDSSU has the typo, the ADRDSSU exit will U0999 abend.
There is no CA JCLCheck problem.
Resolution
If you want to prevent u0999 abend, please set the load library of ADRDDSU of no exit to the STEPLIB on JCLCheck.
** JCL SAMPLE **
//JCKJOB JOB (XXXX),'JCLCHK',MSGCLASS=H
//JCLCHECK EXEC JCLCHK,RGN=6M,
// PRM='NOJOB NOCOND V NOSPIE NOF SX(NOR)',
// PAN='DYN(XEOJ,XERR) DSNERR'
//STEPLIB DD DSN=SYS1.ADRDSSU.LOADLIB <== load library of ADRDDSU of no exit
//SYSUDUMP DD DUMMY
//SYSIN DD DATA,[email protected]@
//TESTJOB JOB (XXXX),'JCLCHK',MSGCLASS=H
//*------------------
//DFDSS1 EXEC PGM=ADRDSSU
//STEPLIB DD DSN=SYS1.DFDSSLIB,DISP=SHR
//INPUT DD UNIT=SYSDA,VOL=SER=TSO10B,DISP=SHR
//OUTPUT DD DSN=PUBLIC.JCLCHCK.TEST,DISP=(NEW,KEEP),
// UNIT=SYSDA,VOL=SER=TSO10C,
// SPACE=(CYL,(1,1),RLSE)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
DUNP LOGINDD(INPUT) OUTDD(OUTPUT) - <== TYPO sysin
DATASET(INC(PUBLIC.TEST.DATA.**)) -
ALLDATA(*) ALLEXCP SHR
/*
//
@@
//
** JCL SAMPLE **
//JCKJOB JOB (XXXX),'JCLCHK',MSGCLASS=H
//JCLCHECK EXEC JCLCHK,RGN=6M,
// PRM='NOJOB NOCOND V NOSPIE NOF SX(NOR)',
// PAN='DYN(XEOJ,XERR) DSNERR'
//STEPLIB DD DSN=SYS1.ADRDSSU.LOADLIB <== load library of ADRDDSU of no exit
//SYSUDUMP DD DUMMY
//SYSIN DD DATA,[email protected]@
//TESTJOB JOB (XXXX),'JCLCHK',MSGCLASS=H
//*------------------
//DFDSS1 EXEC PGM=ADRDSSU
//STEPLIB DD DSN=SYS1.DFDSSLIB,DISP=SHR
//INPUT DD UNIT=SYSDA,VOL=SER=TSO10B,DISP=SHR
//OUTPUT DD DSN=PUBLIC.JCLCHCK.TEST,DISP=(NEW,KEEP),
// UNIT=SYSDA,VOL=SER=TSO10C,
// SPACE=(CYL,(1,1),RLSE)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
DUNP LOGINDD(INPUT) OUTDD(OUTPUT) - <== TYPO sysin
DATASET(INC(PUBLIC.TEST.DATA.**)) -
ALLDATA(*) ALLEXCP SHR
/*
//
@@
//
Feedback
Yes
No
Powered by
