//REST55 JOB ,'MARIE NEWMAN',MSGCLASS=S,
//         MSGLEVEL=(1,1),NOTIFY=COINEWM,TIME=6
/*JOBPARM      SHIFT=D,LINES=10
/*SETUP     TEMP20(T9099)
//*
//COPYNEW  PROC
//A        EXEC PGM=IEBGENER,TIME=3
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DSN=&TDSN,LABEL=(&FILE,SL),
//         VOL=(,RETAIN,SER=T9099),UNIT=TAPE6250,DISP=(OLD,KEEP),
//         DCB=(DEN=4,LRECL=&LRECL,BLKSIZE=&BLKSIZE,
//         RECFM=&RECFM)
//SYSUT2   DD DSN=&DSN,DISP=(NEW,CATLG),
//         SPACE=(TRK,(100,100),RLSE),UNIT=TEMP,
//         DCB=(LRECL=&LRECL,BLKSIZE=&BLKSIZE,
//         RECFM=&RECFM,DSORG=&DSORG)
//SYSIN    DD DUMMY
//COPYNEW  PEND
//*
//COPYOLD  PROC
//A        EXEC PGM=IEBGENER,TIME=3
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DSN=&TDSN,LABEL=(&FILE,SL),
//         VOL=(,RETAIN,SER=T9099),UNIT=TAPE6250,DISP=(OLD,KEEP),
//         DCB=(DEN=4,LRECL=&LRECL,BLKSIZE=&BLKSIZE,
//         RECFM=&RECFM)
//SYSUT2   DD DSN=&DSN,DISP=SHR
//SYSIN    DD DUMMY
//COPYOLD  PEND
//*
//STEP1   EXEC COPYNEW,TDSN='LOMBOK.TEMB2',FILE=88,LRECL=80,
//         BLKSIZE=16000,RECFM=FB,DSORG=PS,
//         DSN='COINEWM.LOMBOK.TEMB2'
//STEP1   EXEC COPYNEW,TDSN='LOMBOK.TEMB3',FILE=89,LRECL=80,
//         BLKSIZE=16000,RECFM=FB,DSORG=PS,
//         DSN='COINEWM.LOMBOK.TEMB3'
//STEP1   EXEC COPYNEW,TDSN='LOMBOK.TEMN1',FILE=90,LRECL=80,
//         BLKSIZE=16000,RECFM=FB,DSORG=PS,
//         DSN='COINEWM.LOMBOK.TEMN1'
//STEP1   EXEC COPYNEW,TDSN='LOMBOK.TEMN2',FILE=91,LRECL=80,
//         BLKSIZE=16000,RECFM=FB,DSORG=PS,
//         DSN='COINEWM.LOMBOK.TEMN2'
//STEP1   EXEC COPYNEW,TDSN='LOMBOK.TEMP1',FILE=92,LRECL=80,
//         BLKSIZE=16000,RECFM=FB,DSORG=PS,
//         DSN='COINEWM.LOMBOK.TEMP1'
//STEP1   EXEC COPYNEW,TDSN='LOMBOK.TEMP2',FILE=93,LRECL=80,
//         BLKSIZE=16000,RECFM=FB,DSORG=PS,
//         DSN='COINEWM.LOMBOK.TEMP2'
//STEP1   EXEC COPYNEW,TDSN='LOMBOK.TEMP3',FILE=94,LRECL=80,
//         BLKSIZE=16000,RECFM=FB,DSORG=PS,
//         DSN='COINEWM.LOMBOK.TEMP3'
//STEP1   EXEC COPYNEW,TDSN='LOMBOK.TEMT3',FILE=95,LRECL=80,
//         BLKSIZE=16000,RECFM=FB,DSORG=PS,
//         DSN='COINEWM.LOMBOK.TEMT3'
//
