Sort - To eliminate duplicates and copy only unique records and copy the eliminated records into another output file

//STEP010  EXEC PGM=SORT                                        
//SYSPRINT DD  SYSOUT=*                                         
//SYSOUT   DD  SYSOUT=*                                         
//SORTIN   DD  DSN=TCCCN.CN2330WP.PREV.WEEK.CALLTBL.OCT20,      
//             DISP=SHR                                         
//         DD  DSN=TCCCN.CN2330WP.SENT.DIALER,                  
//             DISP=SHR                                         
//SORTOUT  DD  DSN=TCCCN.CN2330WP.SENT.DIALER.SORT,             
//             DISP=(,CATLG,DELETE),                            
//             UNIT=SYSDA,                                      
//             SPACE=(CYL,(750,400),RLSE),                      
//             DCB=RECFM=FB                                     
//SORTXSUM DD  DSN=TCCCN.CN2330WP.SENT.DIALER.XSUM,             
//             DISP=(,CATLG,DELETE),                            
//             UNIT=SYSDA,                                      
//             SPACE=(CYL,(400,400),RLSE),                      
//             DCB=RECFM=FB                                     
//SYSIN    DD  *                                                
  SORT FIELDS=(1,15,CH,A)                                       
  SUM FIELDS=NONE,XSUM                                          
/*

SUM FIELDS=NONE - will eliminate duplicates
SUM FIELDS=NONE,XSUM - will eliminate duplicates and eliminated records are captured in SORTXUM dataset