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
 

 

Need the JCL to list Tape informations

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

New User


Joined: 13 Sep 2006
Posts: 1

PostPosted: Wed Sep 13, 2006 11:40 pm    Post subject: Need the JCL to list Tape informations
Reply with quote

Anyone know the JCL to list Tape info? I have over 200 volumes of which I need the DSN's.

Tx
Back to top
View user's profile Send private message

cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Wed Sep 13, 2006 11:57 pm    Post subject: Re: tape label info
Reply with quote

These used to work years ago. You need to code the VOLSER where the ?????? are. The DSN should not matter although you may need a valid HLQ for your office. You need to use the UNIT parameter that your office typically uses (like UNIT=TAPE, UNIT=TP6250, UNIT=TP9TRK, etc.). The output file (SYSUT2) should print the dataset name on the label of the tape. Each tape dataset is made up of HEADER/DATE/TRAILER, so (1,BLP) will make the program read and print the HEADER. The dataset name that is printed may only show the last 17 positions of the DSN. Also, if you have multiple datasets on a tape, you will need (4,BLP) to READ the 2nd one, (7,BLP) to read the 3rd one, etc.

Code:

//COPY     EXEC PGM=IEBGENER                                   
//SYSPRINT DD SYSOUT=*                                         
//SYSUDUMP DD SYSOUT=*                                         
//SYSUT1   DD DSN=HLQ.TAPE.DATASET.NAME,VOL=SER=??????,       
//            UNIT=TAPE,DISP=OLD,LABEL=(1,BLP,EXPDT=98000),   
//            DCB=(RECFM=U,BLKSIZE=32760)                     
//SYSUT2   DD SYSOUT=*                                         
//SYSIN    DD DUMMY                                           
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Thu Sep 14, 2006 12:00 am    Post subject: Re: tape label info
Reply with quote

My comment about a tape dataset should have been that it is made up of HEADER/DATA/TRAILER.
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 member list compare jzhardy TSO/ISPF 6 Fri May 12, 2017 3:18 pm
No new posts Length of Tape file Mohan Kothakota JCL & VSAM 9 Thu Apr 20, 2017 10:24 pm
No new posts SQL query to run through list of valu... Ni3-db2 DB2 14 Wed Dec 14, 2016 9:52 am
No new posts TAPE VERIFY utility?? MrExtraordinare JCL & VSAM 3 Fri Dec 09, 2016 10:57 pm
No new posts Cobol list of programs being called biswajit.dattagupta COBOL Programming 5 Tue Nov 01, 2016 2:10 am


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