During the job execution, all dataset allocations were done, the following message emitted:
TMSEARL03 - INITIALIZING FOR SEQUENTIAL PROCESSING
And then the abend occurred:
IEA995I SYMPTOM DUMP OUTPUT
USER COMPLETION CODE=3000
TIME=20.41.56 SEQ=03324 CPU=0000 ASID=0138
PSW AT TIME OF ERROR 078D1000 00008CE8 ILC 2 INTC 0D
ACTIVE MODULE ADDRESS=00000000_00007528 OFFSET=000017C0
NAME=EARL
DATA AT PSW 00008CE2 - 00181610 0A0D58D0 C24C5880
GR 0: 80000000 1: 80000BB8
2: 000D7F24 3: 000091D4
4: 00018F78 5: 00000000
6: 000000F9 7: 000096E0
8: 00000000 9: 00000000
A: 00008C50 B: 00009010
C: 00009010 D: 00008D48
E: 40008C9A F: 00000000
END OF SYMPTOM DUMP
IEF472I TMDEARL STEP010 - COMPLETION CODE - SYSTEM=000 USER=3000 REASON=00000000
JCL:
4 //STEP010 EXEC PGM=EARL
5 //EARLLIB DD DISP=SHR,DSN=SYS1.CAI.CAISRC
6 //TAPEDB DD DISP=SHR,DSN=SYSS.CA1.TMC
7 //SYSIN DD DISP=SHR,DSN=TMUSP.SSTAPE.PARMLIB(EARLDLY)
8 //SYSEARL DD DISP=(,PASS),DSN=TMUSP.TMDEARL.TEMP,
// DATACLAS=LARGE,DSORG=PS,RECFM=FB,LRECL=250
9 //SYSOUT DD SYSOUT=*
10 //SYSPRINT DD SYSOUT=*
11 //SYSUDUMP DD SYSOUT=*
12 //EARLOBJ DD UNIT=SYSDA,SPACE=(CYL,(100,100))
13 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(100,100))
14 //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(100,100))
15 //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(100,100))
16 //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(100,100))
17 //SYSUT5 DD UNIT=SYSDA,SPACE=(CYL,(100,100))
18 //SYSUT6 DD UNIT=SYSDA,SPACE=(CYL,(100,100))
19 //SORTIN DD UNIT=SYSDA,SPACE=(CYL,(100,50))
20 //SORTOUT DD UNIT=SYSDA,SPACE=(CYL,(100,50))
21 //WORK1 DD UNIT=SYSDA,SPACE=(CYL,(100,50))
22 //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(500,500))
23 //SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(500,500))
24 //SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(500,500))
//*
Release : 6.1 - Component : EARL-MVS COMMON COMPONENT
CA/1 R14.0 : TMSEARL
SYSEARL DD LRECL has been set too large causing the abend.
The maximum size for the printer width is 216, which is coded in the Earl program:
OPTION PRINTER=216
The SYSEARL's LRECL can not be greater than LRECL=220.
Otherwise, a U3000 ABEND will occur.