sort:count
Posted: Tue Mar 19, 2013 1:03 pm
what is wrong with this code? It goes in an infinite loop..
000100 //xxxxxx JOB (1234),CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1),
000200 // NOTIFY=&SYSUID,PRTY=15
000300 //STEP1 EXEC PGM=SORT
000400 //SORTIN DD DSN=xxxxx.xxxx.xxxxx(IP1),DISP=SHR
000500 //SORTOUT DD DSN=xxxxxx.xxxx.xxxxxx(OP1),
000600 // DISP=(NEW,CATLG,DELETE),
000700 // SPACE=(TRK,(1,2),RLSE),
000800 // DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
001000 //SYSIN DD *
001100 SORT FIELDS=COPY,
001110 OUTFIL REMOVECC,NODETAIL,
001120 TRAILER1=('NO OF RECORDS:',COUNT=(M11,LENGTH=7))
001200 /*
001300 //SYSOUT DD SYSOUT=*
000100 //xxxxxx JOB (1234),CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1),
000200 // NOTIFY=&SYSUID,PRTY=15
000300 //STEP1 EXEC PGM=SORT
000400 //SORTIN DD DSN=xxxxx.xxxx.xxxxx(IP1),DISP=SHR
000500 //SORTOUT DD DSN=xxxxxx.xxxx.xxxxxx(OP1),
000600 // DISP=(NEW,CATLG,DELETE),
000700 // SPACE=(TRK,(1,2),RLSE),
000800 // DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
001000 //SYSIN DD *
001100 SORT FIELDS=COPY,
001110 OUTFIL REMOVECC,NODETAIL,
001120 TRAILER1=('NO OF RECORDS:',COUNT=(M11,LENGTH=7))
001200 /*
001300 //SYSOUT DD SYSOUT=*