Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Reading selected volumes of a multi-volume tape file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
RickBig

New User


Joined: 11 Jul 2016
Posts: 8
Location: Canada

PostPosted: Wed Jul 13, 2016 7:26 pm    Post subject: Reading selected volumes of a multi-volume tape file
Reply with quote

We have a (very) old series of batch jobs that read selected volumes of a multi-volume tape file. This is just a technique for splitting the file into 'manageable' segments.

So the code is like:

Code:
//COPY01   EXEC  PGM=SORT                                         
//*                                                               
//SORTIN    DD  DISP=SHR,DSN=MY.BIG.TAPE.FILE,
//          UNIT=TAPE,VOL=SER=(UC4622,UI0455)   


Now until recently, this has been working fine, the step would only read the first two volumes.

Recently however, we see the following on the job output:

Code:
IEC716I SORTIN  :TAPE MULTIVOLUME LIST CORRECTED   


and instead of just the first two volumes being read, the entire file is read. Notably, if the volumes listed do not include the first volume, only the volumes in the scope of the VOL=SER are read.

Our systems people have not explained what caused this to change. Any ideas?

BTW, bypassing label processing, OPTCD=B, resolves the issue.
Back to top
View user's profile Send private message

Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1731
Location: UK

PostPosted: Wed Jul 13, 2016 7:52 pm    Post subject:
Reply with quote

No idea but...DISP=SHR for tape is "invalid". You cannot share a tape volume - you should use OLD.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7951
Location: Bellevue, IA

PostPosted: Wed Jul 13, 2016 8:16 pm    Post subject:
Reply with quote

Quote:
BTW, bypassing label processing, OPTCD=B, resolves the issue.
Actually, LABEL=BLP is the DCB subparameter to bypass label processing. What you are doing, from the JCL Reference manual, is:
Quote:
B
requests that the end-of-volume (EOV) routine disregard the end-of-file (EOF) recognition for magnetic tape. For an input data set on a standard-labeled (SL or AL) tape, the EOV routine treats EOF labels as EOV labels until the volume serial list is exhausted. This option allows SL or AL tapes to be read out of volume sequence or to be concatenated to another tape with the same data set name using one DD statement. See "Data Sets that Span Libraries" in z/OS MVS JCL User's Guide for a description of allocation processing for multi-volume data sets created in different tape libraries.
Back to top
View user's profile Send private message
steve-myers

Active User


Joined: 30 Nov 2013
Posts: 486
Location: The Universe

PostPosted: Wed Jul 13, 2016 8:30 pm    Post subject:
Reply with quote

Nic Clouston wrote:
No idea but...DISP=SHR for tape is "invalid". You cannot share a tape volume - you should use OLD.
You are correct when you say two jobs cannot "share" a tape volume, but what DISP=SHR is saying is another job can "share" the data set name.

Actually, two jobs can "share" a tape volume, but only one job at a time can have a data set open on the volume. For that matter, one job cannot have 2 (or more) data sets open on one volume at a time. In other words, this won't work -
Code:
//A       EXEC PGM=SORT
//SYSOUT   DD  SYSOUT=*
//SORTIN01 DD  DISP=SHR,LABEL=1,UNIT=TAPE,VOL=SER=TAPEV1,DSN=TAPEV1.FILE1
//SORTIN02 DD  DISP=SHR,LABEL=2,UNIT=TAPE,VOL=SER=TAPEV1,DSN=TAPEV1.FILE2
//SORTOUT  DD  ...
//SYSIN    DD  *
 MERGE ...
Back to top
View user's profile Send private message
RickBig

New User


Joined: 11 Jul 2016
Posts: 8
Location: Canada

PostPosted: Thu Jul 14, 2016 1:13 am    Post subject: Reply to: Reading selected volumes of a multi-volume tape file
Reply with quote

Thanks for the valuable feedback. I'm still mystified, however, that the same job would work one way one month, and then differently the next.

I'm unaware of any system changes in the interim (at least I wasn't told of any). Perhaps a PTF was applied...

I'll forward any answer I receive from our support group.
Back to top
View user's profile Send private message
Bryan Lehner

New User


Joined: 29 Jul 2016
Posts: 1
Location: United States

PostPosted: Sat Aug 13, 2016 12:03 am    Post subject:
Reply with quote

I experienced this same situation, and a new version of CA-1 had been installed that leveraged the IBM Label Anomaly Exit. We had to start using the OPTCD=B for jobs that read individual tapes of a multi-volume group.
Back to top
View user's profile Send private message
RickBig

New User


Joined: 11 Jul 2016
Posts: 8
Location: Canada

PostPosted: Mon Aug 22, 2016 8:01 pm    Post subject: Reply to: Reading selected volumes of a multi-volume tape file
Reply with quote

Thanks, I will check and see if we had a similar update to CA-1 in that time period.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Formating the Input file sreekusr DFSORT/ICETOOL 3 Fri Feb 17, 2017 10:40 pm
No new posts Sort two file having same field, one ... himanshu malik DFSORT/ICETOOL 7 Thu Feb 02, 2017 10:09 am
No new posts Remove junk values in a file and rite... KP1125 DFSORT/ICETOOL 2 Wed Jan 25, 2017 9:58 pm
No new posts SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts Storing huge volume of data, compare ... Pradeep K M All Other Mainframe Topics 3 Mon Jan 16, 2017 5:08 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us