SORT with XSUM option

Saturday, September 28, 2013

SORT with XSUM option

SORT with XSUM

SORT with SUM FIELDS=NONE,XSUM option will eliminate duplicate records based on key fields defined in 'SORT FIELDS' and will copy all records unique records to SORTOUT, all duplicate records will be copied to SORTXSUM, Please find an example job below.

//*JOB CARD
//**********************************************************************      
//*                      XSUM JOB                                            
//**********************************************************************      
//*                                                                          
//PS0010   EXEC  PGM=SORT,PARM=ABEND                                          
//SORTIN   DD  DSN=INPUT.DATASET,DISP=SHR                        
//*                                                                          
//SORTOUT  DD  DSN=OUTPUT.DATASET.SORT,                            
//             DISP=(NEW,CATLG,DELETE),                                      
//             SPACE=(CYL,(5,3),RLSE),UNIT=DISK,                              
//             DCB=(RECFM=FB,LRECL=100,BLKSIZE=0)                            
//*                                                                          
//SORTXSUM DD  DSN=OUTPUT.DATASET.XSUM,                            
//             DISP=(NEW,CATLG,DELETE),                                      
//             SPACE=(CYL,(5,3),RLSE),UNIT=DISK,                              
//             DCB=(RECFM=FB,LRECL=100,BLKSIZE=0)                            
//*                                                                          
//SYSOUT   DD  SYSOUT=*                                                      
//SYSIN    DD  *                                                              
 SORT FIELDS=(1,09,CH,A)                                                      
 SUM FIELDS=NONE,XSUM                                                        
//*                                                                          
//**********************************************************************      
//**********************************************************************      

SORTOUT     - Will have all unique records based on key fields defined in SORT FIELDS
SORTXSUM  - Will have all duplicate records based on key fields defined in SORT FIELDS

Details about Sort Commands Used

SORT FIELDS=(1,09,CH,A)

  • Input file will be sorted depending up on the key specified above.
  • 1,09,CH,A - Key starting position is 1, length 9, data type character(CH), Sort ascending(A) order.


SUM FIELDS=NONE,XSUM

  • SUM FIELDS=NONE means it will eliminate duplicates 
  • XSUM options will copy all records eliminated in sort process will copy to another data set defined in SORTXSUM step.

Error 404

The page you were looking for, could not be found. You may have typed the address incorrectly or you may have used an outdated link.

Go to Homepage