Sunday, February 6, 2011

Syncsort - Copy reocrds from Variable (VB) to Fixed (FB) file

//STEP001  EXEC  PGM=SYNCSORT                                        
//*SORTIN   DD  DSN=PCCAR.AR4050WP.SORTED.REGIONS.BKUP.G0005V00,     
//SORTIN   DD  DSN=PCCPU.PU0400DP.INPUT.TRACRECS(0),                 
//             DISP=SHR                                              
//SORTOUT  DD  DSN=TCCPU.PU0400DP.INPUT.TRACRECS.VBTOFB,             
//             DISP=(,CATLG,DELETE),                                 
//             UNIT=SYSDA,                                           
//             SPACE=(CYL,(550,150),RLSE),                           
//             DCB=(RECFM=FB,BLKSIZE=0)                              
//SYSOUT   DD  SYSOUT=*                                              
//SYSIN    DD  *                                                     
  SORT FIELDS=COPY                                                   
  OUTREC FIELDS=(1:5,10000),CONVERT                                  
//
                                                                   

No comments:

Post a Comment