COPY desired columns and no duplicates

 //STEP002 EXEC PGM=SORT                                            
//SYSOUT   DD SYSOUT=*                                             
//SORTIN  DD DISP=SHR,DSN=WESTLAW.PROD@B.SPIS.DAILY.LOGRECS.G7030V00
//SORTOUT DD DISP=(NEW,CATLG,DELETE),DSN=U123557.LOGRECS,          
//         DCB=WESTLAW.PROD@B.SPIS.DAILY.LOGRECS.G7030V00,         
//         SPACE=(CYL,(1,10),RLSE),UNIT=SYSDA                      
//SYSIN  DD *                                                      
  SORT FIELDS=(5,18,CH,A)                                          
  SUM FIELDS=NONE                                                  
  OUTREC FIELDS=(5,18)                                             
/*