this should be close
//s01 exec pgm=IDCAMS
//SYSPRINT DD SYSOUT=*
//DD1 DSN=TEST.VSAM.DS,DISP=SHR
//DD2 DSN=TEST.VSAM.SEQ,DISP=(,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(1,1)),
// DCB=RECFM=FB,LRECL=120,BLKSIZE=2400
//SYSIN DD *
REPRO IFILE(DD1) OFILE(DD2)
//