IBM Mainframe Forum

THE RETURN CODE EQ 20,CAN ANYONE GIVE ME SOME ADVICES TO FIND WHERE THE MISTAKE IS ?JCL CODE:
//ADER1 JOB ACCT#,ADCDMST,CLASS=A,MSGCLASS=H,MSGLEVEL=(1,1),
// NOTIFY=&SYSUID
//STEP1 EXEC PGM=SORT
//SYSPRINT DD SYSOUT=*
//SORTOUT DD DSN=ADCDMST.SMDATA,DISP=(NEW,CATLG),
// SPACE=(TRK,(1,1)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=80)
//SORTIN DD DSN=ADCDMST.COBOL.DATA(MDATA),DISP=SHR
//SYSIN DD *
SORT FIELDS=(1,5,CH,A)
/*
//
JESYSMSG:
ICH70001I ADCDMST LAST ACCESS AT 23:14:52 ON THURSDAY, APRIL 26, 2012
IEF236I ALLOC. FOR ADER1 STEP1
IEF237I JES2 ALLOCATED TO SYSPRINT
IGD100I 0A82 ALLOCATED TO DDNAME SORTOUT DATACLAS ( )
IEF237I 0A82 ALLOCATED TO SORTIN
IEF237I JES2 ALLOCATED TO SYSIN
IEF142I ADER1 STEP1 - STEP WAS EXECUTED - COND CODE 0020
IEF285I ADCDMST.ADER1.JOB00241.D0000102.? SYSOUT
IEF285I ADCDMST.SMDATA CATALOGED
IEF285I VOL SER NOS= Z9SYS1.
IEF285I ADCDMST.COBOL.DATA KEPT
IEF285I VOL SER NOS= Z9SYS1.
IEF285I ADCDMST.ADER1.JOB00241.D0000101.? SYSIN
IEF373I STEP/STEP1 /START 2012117.2319
IEF374I STEP/STEP1 /STOP 2012117.2319 CPU 0MIN 00.02SEC SRB 0MIN 00.00S
IEF375I JOB/ADER1 /START 2012117.2319
IEF376I JOB/ADER1 /STOP 2012117.2319 CPU 0MIN 00.02SEC SRB 0MIN 00.00S

What about showing the ICE messages? Probably show that you have a missing SYSOUT DD statement. Which would go to SYSOUT. So you won't see them. Try adding this to your sort step:

THANKS ,I WILL TRY SOON.

Hello and welcome to the forum,

Please turn off CAPS - it is considered shouting. . .

Also, you should learn to use the Code tag to improve readability of code, jcl, data, etc as this will preserve alignment and improve readability. There is a Preview function so you can see your post as it will appea to the forum (rather than how looks in the Editor). When the post appears as you want, Submit.

huangjie,

If you are using DFSORT, its return codes are DOCUMENTED in the DFSORT Message manual, so you can actually look them up yourself:

http://publibz.boulder.ibm.com/cgi-bin/ ... 0601111744