//DTSBXTST JOB (UI,4300,3400,T),TESTMSTB,                               
//          CLASS=S,MSGCLASS=X,REGION=0M                                         
//STEP0120 EXEC PGM=IDCAMS                            
//SYSOUT   DD  SYSOUT=*                                                 
//INDD01   DD  DSN=DOESTAX.PROD.VSAM.MSTB,DISP=SHR,                
//             AMP=('BUFNI=5,BUFND=30')                                 
//OUTDD01  DD  DSN=DOESTAX.PROD.BACKUP.MSTB(+1),           
//             DISP=(NEW,CATLG,DELETE),                                    
//             UNIT=CART,                                               
//             LABEL=(2,SL,,,EXPDT=99000),                              
//             DCB=(RECFM=VB,LRECL=4096,BLKSIZE=32760)       
//SYSIN    DD  *
   REPRO INFILE(INDD01) OUTFILE(OUTDD01)