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
 

 

How to UNCATLG 1000's of Tape DSN thrug SYSIN control member

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

New User


Joined: 15 Jul 2006
Posts: 10

PostPosted: Thu Aug 05, 2010 10:13 pm    Post subject: How to UNCATLG 1000's of Tape DSN thrug SYSIN control member
Reply with quote

Hi all
Can you please help me with JCL that can be used to UNCATLOG Tape DSN with out copying the entire list in the JCL.And can be passed the list through Control member or SYSIN ,Basiclay wanted to reduce the SIZe of JCL lines,Due the Huge nmbr of DSN's
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


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

PostPosted: Thu Aug 05, 2010 10:51 pm    Post subject:
Reply with quote

This is your third post in the last couple of weeks on the same topic. Either follow the previously given advice, or accept that we cannot provide you the solution you want and move on.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Aug 05, 2010 11:26 pm    Post subject: Reply to: How to UNCATLG 1000's of Tape DSN thrug SYSIN cont
Reply with quote

Well, a new dataset naming standard could be implemented and the old dsn's left to rot. . . icon_confused.gif

If the list had been built (by hand or automated) and the uncatalogs done when the question first came up, all of the work would have been done some time ago.

I suppose it is better to waste many people's time rather than simply do what is needed one's self. . . icon_sad.gif

d
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Fri Aug 06, 2010 11:37 am    Post subject:
Reply with quote

And in both of the previous posts I have linked to a job that will do everything that you want to do and yet you still ask the same question.

Well, my question to you is, are you sure that IT is the correct career choice for you ?
Back to top
View user's profile Send private message
harimca
Warnings : 1

New User


Joined: 15 Jul 2006
Posts: 10

PostPosted: Fri Aug 06, 2010 10:04 pm    Post subject:
Reply with quote

Dude you have lot of job options,why dont u try in phycology dept..Lol
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Aug 06, 2010 11:45 pm    Post subject: Reply to: How to UNCATLG 1000's of Tape DSN thrug SYSIN cont
Reply with quote

Hmmm. . .

Won't follow simple directions.

Replies as though this was a chat room.

Can't spell/type and won't spell-check. . .

Sounds like a new "manager" in the making. . .


And yes, several of us have multiple options icon_cool.gif
Back to top
View user's profile Send private message
harimca
Warnings : 1

New User


Joined: 15 Jul 2006
Posts: 10

PostPosted: Sat Aug 07, 2010 10:04 pm    Post subject: Re: Reply to: How to UNCATLG 1000's of Tape DSN thrug SYSIN
Reply with quote

Expat

I realy apology for my statement jst got carried away,I did wrote a small REXX code to list out my selection into file and wanted to use them as input to my UNCATLG JCL,Anyway got the issue fixed now Thanks all -Manager..))
Back to top
View user's profile Send private message
harimca
Warnings : 1

New User


Joined: 15 Jul 2006
Posts: 10

PostPosted: Wed Aug 25, 2010 1:24 am    Post subject: Reply to: How to UNCATLG 1000's of Tape DSN thrug SYSIN cont
Reply with quote

Hi
Atlast Got results with SAS coding to build a Job for the list of Tape DSN's provided through PDS control member


//STEP015 EXEC SAS
//SYSUT1 DD DSN=FCS1186.SELUCRT.DATASETS(FCSUNLD),DISP=OLD
//SYSUT2 DD DSN=FCS6715.HARI0,DISP=(,CATLG,DELETE),
// UNIT=DISK,
// SPACE=(CYL,(1,1)),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=27920)
//SYSIN DD *
OPTIONS NONOTES;
DATA _NULL_;
INFILE SYSUT1;
INPUT @1 DS_NAME $44.;
FILE SYSUT2 NOTITLES NOPRINT;
NEWCARD1=' LISTC LEVEL('||TRIM(DS_NAME)||')';
PUT @2 NEWCARD1;

Not sure may be usefull to someone
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 Browsing member from any PDS shiitiizz CLIST & REXX 7 Wed Mar 08, 2017 1:17 am
No new posts Bind plan as a member to another bind... rexx77 DB2 0 Thu Feb 16, 2017 2:02 am
No new posts find particular member name in PDS us... ravi243 CLIST & REXX 10 Mon Dec 19, 2016 6:44 pm
No new posts TAPE VERIFY utility?? MrExtraordinare JCL & VSAM 3 Fri Dec 09, 2016 10:57 pm
No new posts What is the command to check MODE of ... rohanthengal CLIST & REXX 7 Fri Nov 18, 2016 1:48 pm


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