I haven't tried it. Are you sure it wasn't processing? Note the list in "JOB 2" did not include H38479 which had already been dismounted when the job started. H25146, the 2nd volume was dismounted at 23:10, but someone already replied "NO" to IEF235D which canceled JOB 2.
-- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:[email protected] Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ On Tue, 8 Jan 2013 17:27:21 +0000, Mingee, David <[email protected]> wrote: >Yes, see below: >JOB 1 >23.01.48 JOB25740 $HASP373 DRAHDLM2 STARTED - INIT 5 - CLASS 3 - SYS SYST > >23.01.48 JOB25740 IEF403I DRAHDLM2 - STARTED - TIME=23.01.48 > >23.01.48 JOB25740 IEF233A M >0A94,H38479,,DRAHDLM2,S04,ICAS.CAD.PREMS.THRU1212.V1TAPE >23.05.24 JOB25740 IEC502E K >0A94,H38479,SL,DRAHDLM2,S04,ICAS.CAD.PREMS.THRU1212.V1TAPE >23.05.24 JOB25740 TMS014 IEC502E K >0A94,H38479,SL,DRAHDLM2,S04,ICAS.CAD.PREMS.THRU1212.V1TAPE >23.05.24 JOB25740 IEC501A M >0A94,H25146,SL,COMP,DRAHDLM2,S04,ICAS.CAD.PREMS.THRU1212.V1TAPE >23.10.18 JOB25740 IEC502E K >0A94,H25146,SL,DRAHDLM2,S04,ICAS.CAD.PREMS.THRU1212.V1TAPE >23.10.18 JOB25740 TMS014 IEC502E K >0A94,H25146,SL,DRAHDLM2,S04,ICAS.CAD.PREMS.THRU1212.V1TAPE >23.10.19 JOB25740 IEC501A M >0A94,H25696,SL,COMP,DRAHDLM2,S04,ICAS.CAD.PREMS.THRU1212.V1TAPE > >//S04 EXEC PGM=EZTPA00 >//SYSPRINT DD SYSOUT=H >//SYSSNAP DD SYSOUT=H >//SYSOUT DD SYSOUT=H >//SYSUDUMP DD SYSOUT=H >//SORTWK01 DD UNIT=DISK,SPACE=(CYL,(50,100),RLSE) >//SORTWK02 DD UNIT=DISK,SPACE=(CYL,(50,100),RLSE) >//SORTWK03 DD UNIT=DISK,SPACE=(CYL,(50,100),RLSE) >//SORTWK04 DD UNIT=DISK,SPACE=(CYL,(50,100),RLSE) >//EZTVFM DD UNIT=DISK,SPACE=(CYL,(50,100),RLSE) >//FILEA DD DSN=ICAS.CAD.PREMS.THRU1212.V1TAPE,DISP=SHR, >// FREEVOL=EOV >//FILEC DD DSN=GRT.GIOIDXM.PREMS.THRU1212.V1, >// DISP=(NEW,DELETE),DATACLAS=DSORGPSE, >// DCB=(RECFM=VB,LRECL=1078,BLKSIZE=0), >// UNIT=DISK,SPACE=(CYL,(3300,1100),RLSE) > >JOB 2 >23.06.07 JOB25741 $HASP373 DRAHDLM3 STARTED - INIT 7 - CLASS 3 - SYS SYST > >23.06.07 JOB25741 IEF403I DRAHDLM3 - STARTED - TIME=23.06.07 > >23.06.07 JOB25741 IEF690I FOLLOWING VOLUMES UNAVAILABLE TO DRAHDLM3 S04 192 > > 192 IEF690I H25146 H25696 H26646 H26772 H39385 H46181 H27224 > H28986 >23.06.07 JOB25741 *166 IEF235D DRAHDLM3 S04 WAITING FOR VOLUMES. TO CANCEL >WAIT REPLY 'NO' >23.07.12 JOB25741 R 166,NO > >23.07.12 JOB25741 IEF251I DRAHDLM3 JOB CANCELLED > >23.07.12 JOB25741 - -----TIMINGS >(MINS.)------ >23.07.12 JOB25741 -STEPNAME PROCSTEP RC EXCP CONN TCB SRB >CLOCK > >//S04 EXEC PGM=EZTPA00 >//SYSPRINT DD SYSOUT=H >//SYSSNAP DD SYSOUT=H >//SYSOUT DD SYSOUT=H >//SYSUDUMP DD SYSOUT=H >//SORTWK01 DD UNIT=DISK,SPACE=(CYL,(50,100),RLSE) >//SORTWK02 DD UNIT=DISK,SPACE=(CYL,(50,100),RLSE) >//SORTWK03 DD UNIT=DISK,SPACE=(CYL,(50,100),RLSE) >//SORTWK04 DD UNIT=DISK,SPACE=(CYL,(50,100),RLSE) >//EZTVFM DD UNIT=DISK,SPACE=(CYL,(50,100),RLSE) >//FILEA DD DSN=ICAS.CAD.PREMS.THRU1212.V1TAPE,DISP=SHR >//FILEC DD DSN=GRT.GIOIDXM.PREMS.THRU1212.V2, >// DISP=(NEW,DELETE),DATACLAS=DSORGPSE, >// DCB=(RECFM=VB,LRECL=1078,BLKSIZE=0), >// UNIT=DISK,SPACE=(CYL,(4000,1100),RLSE) > > > >-----Original Message----- >From: IBM Mainframe Discussion List [mailto:[email protected]] On >Behalf Of Lizette Koehler >Sent: Tuesday, January 08, 2013 11:41 AM >To: [email protected] >Subject: Re: FREEVOL=EOV on R1.13 > >Could you provide the JCL you are using? > >Lizette > >> -----Original Message----- >> From: IBM Mainframe Discussion List [mailto:[email protected]] >> On >Behalf >> Of Mingee, David >> Sent: Tuesday, January 08, 2013 9:38 AM >> To: [email protected] >> Subject: FW: FREEVOL=EOV on R1.13 >> >> Hi SME's >> ��������� Has anyone successfully used the new KEYWORD FREEVOL=EOV on >> z/OS R1.13.� I read the manuals and must be missing something as I >> cannot get 2 >jobs to >> read the same input multi volume tape. �The second job waits on the >> tape >as in the >> past. �I would greatly appreciate advice. > >---------------------------------------------------------------------- >For IBM-MAIN subscribe / signoff / archive access instructions, send email to >[email protected] with the message: INFO IBM-MAIN > >---------------------------------------------------------------------- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
