//*
//* Sample JCL to unload '77 MODS tape
//*
//COPY1    EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//SYSUT1   DD  DSN=INSTRUCT,
//         DISP=OLD,UNIT=TAPE,
//         VOL=SER=SHAR77,LABEL=(1,SL,EXPDT=98000)
//SYSUT2   DD  DSN=dasdhlq.SHAR77.INSTRUCT,
//          DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,VOL=SER=vvvvvv,
//          SPACE=(TRK,(50,15),RLSE)
//SYSIN    DD  DUMMY
//*
//COPY2    EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//SYSUT1   DD  DSN=MIM#3,
//         DISP=OLD,UNIT=TAPE,
//         VOL=SER=SHAR77,LABEL=(2,SL,EXPDT=98000)
//SYSUT2   DD  DSN=dasdhlq.SHAR77.MIM#3,
//          DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,VOL=SER=vvvvvv,
//          SPACE=(TRK,(50,15),RLSE)
//SYSIN    DD  DUMMY
//*
//COPY3    EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//SYSUT1   DD  DSN=MICHMODS,
//         DISP=OLD,UNIT=TAPE,
//         VOL=SER=SHAR77,LABEL=(3,SL,EXPDT=98000)
//SYSUT2   DD  DSN=dasdhlq.SHAR77.MICHMODS,
//          DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,VOL=SER=vvvvvv,
//          SPACE=(TRK,(50,15),RLSE)
//SYSIN    DD  DUMMY
//*
//COPY4    EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//SYSUT1   DD  DSN=LSPS,
//         DISP=OLD,UNIT=TAPE,
//         VOL=SER=SHAR77,LABEL=(4,SL,EXPDT=98000)
//SYSUT2   DD  DSN=dasdhlq.SHAR77.LSPS,
//          DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,VOL=SER=vvvvvv,
//          SPACE=(TRK,(50,15),RLSE)
//SYSIN    DD  DUMMY
//*
//COPY5    EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//SYSUT1   DD  DSN=ABSTRACT,
//         DISP=OLD,UNIT=TAPE,
//         VOL=SER=SHAR77,LABEL=(5,SL,EXPDT=98000)
//SYSUT2   DD  DSN=dasdhlq.SHAR77.ABSTRACT,
//          DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,VOL=SER=vvvvvv,
//          SPACE=(TRK,(50,15),RLSE)
//SYSIN    DD  DUMMY
//*
//COPY6    EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//SYSUT1   DD  DSN=SURVEY,
//         DISP=OLD,UNIT=TAPE,
//         VOL=SER=SHAR77,LABEL=(6,SL,EXPDT=98000)
//SYSUT2   DD  DSN=dasdhlq.SHAR77.SURVEY,
//          DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,VOL=SER=vvvvvv,
//          SPACE=(TRK,(50,15),RLSE)
//SYSIN    DD  DUMMY