JCL Sort Example

****************************** SORT ***************************
//MAPLE12A JOB (ACC1),'KUMAR',TIME=(,5),NOTIFY=&SYSUID, 00010000
// REGION=5M,PRTY=6,MSGLEVEL=(1,0),CLASS=A 00020000
//STEP1 EXEC PGM=SORT 00030000
//SYSPRINT DD SYSOUT=* 00040000
//SYSOUT DD SYSOUT=* 00040000
//SORTIN DD DSN=MAPLE12.JCLSORT.PS1,DISP=SHR
//SORTOUT DD DSN=MAPLE12.JCLSORT.PS2,DISP=SHR
//SRTWK01 DD UNIT=SYSDA,SPACE=(TRK,(5,3))
//SYSIN DD *
SORT FIELDS=(4,2,CH,A)
/* 00080000
//* SORT A FILE 00090000
**************************************************************
******************************** SORT ******************************
//MAPLE12A JOB (ACC1),'KUMAR',TIME=(,5),NOTIFY=&SYSUID, 00010000
// REGION=5M,PRTY=6,MSGLEVEL=(1,0),CLASS=A 00020000
//STEP1 EXEC PGM=SORT 00030000
//SYSPRINT DD SYSOUT=* 00040000
//SYSOUT DD SYSOUT=* 00040000
//SORTIN DD DSN=MAPLE12.JCLSORT.PS1,DISP=SHR
//SORTOUT DD DSN=MAPLE12.JCLSORT.PS2,DISP=SHR
//SRTWK01 DD UNIT=SYSDA,SPACE=(TRK,(5,3))
//SYSIN DD *
SORT FIELDS=(1,2,CH,A)
SUM FIELDS=NONE
/* 00080000
//* SORT A FILE 00090000
*********************************************************************
******************************** SORT ************************
//MAPLE12A JOB (ACC1),'KUMAR',TIME=(,5),NOTIFY=&SYSUID, 00010000
// REGION=5M,PRTY=6,MSGLEVEL=(1,0),CLASS=A 00020000
//STEP1 EXEC PGM=SORT 00030000
//SYSPRINT DD SYSOUT=* 00040000
//SYSOUT DD SYSOUT=* 00040000
//SORTIN DD DSN=MAPLE12.JCLSORT.PS1,DISP=SHR
//SORTOUT DD DSN=MAPLE12.JCLSORT.PS3,DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,BLKSIZE=800,RECFM=FB,DSORG=PS)
//SRTWK01 DD UNIT=SYSDA,SPACE=(TRK,(5,3))
//SYSIN DD *
SORT FIELDS=(1,2,CH,A)
SUM FIELDS=NONE
/* 00080000
//* SORT A FILE 00090000
*************************************************************
**************************** SORT *********************************
//MAPLE12A JOB (ACC1),'KUMAR',TIME=(,5),NOTIFY=&SYSUID, 00010000
// REGION=5M,PRTY=6,MSGLEVEL=(1,0),CLASS=A 00020000
//STEP1 EXEC PGM=SORT 00030000
//SYSPRINT DD SYSOUT=* 00040000
//SYSOUT DD SYSOUT=* 00040000
//SORTIN DD DSN=MAPLE12.JCLSORT.PS1,DISP=SHR
//SORTOUT DD DSN=MAPLE12.JCLSORT.PS2,DISP=SHR
//SRTWK01 DD UNIT=SYSDA,SPACE=(TRK,(5,3))
//SYSIN DD *
SORT FIELDS=(1,3,CH,A,11,9,CH,A)
INCLUDE COND=(21,6,CH,EQ,C'DEPT2')
/* 00080000
//* sort and include cond 00090000
*********************************************************************
*********************************** SORT ******************************
//MAPLE12A JOB (ACC1),'KUMAR',TIME=(,5),NOTIFY=&SYSUID, 00010000
// REGION=5M,PRTY=6,MSGLEVEL=(1,0),CLASS=A 00020000
//STEP1 EXEC PGM=SORT 00030000
//SYSPRINT DD SYSOUT=* 00040000
//SYSOUT DD SYSOUT=* 00040000
//SORTIN DD DSN=MAPLE12.JCLSORT.PS1,DISP=SHR
//SORTOUT DD DSN=MAPLE12.JCLSORT.PS2,DISP=SHR
//SRTWK01 DD UNIT=SYSDA,SPACE=(TRK,(5,3))
//SYSIN DD *
SORT FIELDS=(1,3,CH,A,11,9,CH,A)
OMIT COND=(21,6,CH,EQ,C'DEPT2')
/*
//
/* sort and omit
******************************************************************
****************************** SORT *******************************
//MAPL737A JOB (ACC1),'KUMAR',TIME=(,5),NOTIFY=&SYSUID, 00010000
// REGION=5M,PRTY=6,MSGLEVEL=(1,0),CLASS=A 00020000
//STEP1 EXEC PGM=SORT 00030000
//SYSPRINT DD SYSOUT=* 00040000
//SYSOUT DD SYSOUT=* 00040000
//SORTIN DD DSN=MAPL737.SAKTHI.PS,DISP=SHR
//SORTOUT DD DSN=MAPL737.SAKTHI.PS2,DISP=SHR
//SRTWK01 DD UNIT=SYSDA,SPACE=(TRK,(5,3))
//SYSIN DD *
SORT FIELDS=(1,1,CH,A)
OUTREC FIELDS=(1,3,21,5)
/*
//
/* sort , omit , take select fields
SORT FIELDS=(1,3,CH,A,11,9,CH,A)
INREC FIELDS=(1,3)
*********************************************************************