//SRENPERT JOB (DEVE2K,282300,SRT,00),'TAPE MAP', 00001050 // CLASS=A,PRTY=4,MSGCLASS=X,NOTIFY=VIAE2K 00002050 /*JOBPARM SYSAFF=CPUA 00031038 //*ROUTE PRINT VIARSCS.U2089 00070038 //* 00080000 //TAPEMAP1 EXEC PGM=TAPEUTIL 00090000 //SYSPRINT DD SYSOUT=* 00100000 //SYSLIST DD SYSOUT=* 00110000 //TAPEIN DD DSN=OSS004,DISP=(OLD,KEEP),UNIT=EA2, 00120053 // VOL=SER=OSS004,LABEL=(,BLP,EXPDT=98000) 00130053 //SYSIN DD * 00140000 MAP INDD=TAPEIN 00150000 /* 00160000