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
 

 

finding STORCLAS=USER in each step of the jcl

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
surya_pathaus

Active User


Joined: 28 Aug 2006
Posts: 110

PostPosted: Fri Mar 26, 2010 4:49 am    Post subject: finding STORCLAS=USER in each step of the jcl
Reply with quote

Hi all,

In my shop, testing and Production datasets are stored at same disk spaces. They gave us a to use a storage class "USER". In my test JCLs some times developers miss to add STORCLAS=USER. And datasets are stored on Disks allocated to production.

Now I need to search for STORCLAS=USER in the JCL, for each step, each DSN which contains DISP=NEW and if it is not there I need to add it to that Dataset allocation statement.

EX: //dataset1 DD DSN=AA.BB.CC,
// DISP=(,CATLG,DELETE),
// UNIT=DISK,
// SPACE=(27998,(00999,0399),RLSE),
// DCB=(LRECL=3606,BLKSIZE=27998,RECFM=VB)

Here STORCLAS=USER is missed, I need to search this and to add STORCLAS=USER after UNIT=DISK.
As a tester, I dont have authority to write cobol pgms. I can write JCLs, REXX code.

Can somebody help me out to solve this using a JCL or REXX code.
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 Mar 26, 2010 12:00 pm    Post subject:
Reply with quote

There are numerous threads on the forum for processing all members in a PDS, so a forum search would be the place to start.

Following that, you need to work out the logic of processing each DD name contained in each member to ensure the required values are present. And then the process to add any required fields.

However, if your storage management subsystem was correctly set up this problem would never arise. Maybe contact your storage people to resolve this, and put the fire out rather than running after it to repair the damage.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10291
Location: italy

PostPosted: Fri Mar 26, 2010 2:08 pm    Post subject: Reply to: finding STORCLAS=USER in each step of the jcl
Reply with quote

see
http://ibmmainframes.com/viewtopic.php?t=32494&highlight=jcl+parser
for a jcl parser I wrote

when processing the DD statement just check if the storclass keyword is there
and modify or add the value as needed

anyway sms related DD parameter should not be used by users
proper standars specifications and properly written ACS should assign the right SMS classes to each dataset
simply based on the dataset name pattern

better review the whole setup icon_smile.gif
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 Mar 26, 2010 4:38 pm    Post subject: Re: finding STORCLAS=USER in each step of the jcl
Reply with quote

surya_pathaus wrote:
In my shop, testing and Production datasets are stored at same disk spaces. They gave us a to use a storage class "USER". In my test JCLs some times developers miss to add STORCLAS=USER. And datasets are stored on Disks allocated to production.
Mmmmmmmmmmm, the more I read this the more confused I get. And as a storage guy get frustrated and think to myself what F&%$!£G IDIOT set up the storage environment.

In one part you say that the datasets are stored on the same DASD, and then you go on to say that dev datasets are being stored on DASD allocated to production. So which is it, do they share a storage group or not.

I suppose the DFdss aould allow the datasets to be filtered and moved back to where they should be, but once again it really is a pigs ear of a storage environment you have there.

But look on the bright side, I will probably be available in July so if you need an experienced storagr guy - let me know. Reasonable rates icon_lol.gif
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2436
Location: Netherlands, Amstelveen

PostPosted: Fri Mar 26, 2010 4:58 pm    Post subject:
Reply with quote

Testing in a production environment ?
Or sharing dasd between production and test ?

Nice shop. icon_eek.gif
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 Mar 26, 2010 5:14 pm    Post subject:
Reply with quote

Peter, I see no reason why the DASD should not be available to both LPARs, assuming that is the case icon_rolleyes.gif but who knows icon_eek.gif if the DASD is shared then who knows what else is. If it is set up correctly then there are generally NO problems.

I usually set it up like that as quite often the prod support people need to perform a data refresh in one or more of the
sandpit / testing / acceptance environments.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2436
Location: Netherlands, Amstelveen

PostPosted: Fri Mar 26, 2010 6:13 pm    Post subject:
Reply with quote

Hello expat,

i was just thinking about using ADRDSSU to dump data from a production
pack and use that to update my bank account (i was working for a bank)
and then restore the changed data.
In the past we were using ACF2 and that could be done. With RACF i dont know.
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Finding IMS resource blocker after se... Hooman24 IMS DB/DC 1 Wed Aug 16, 2017 9:17 pm
No new posts Restart=Step not working ALAK SAHA JCL & VSAM 6 Fri Jun 30, 2017 6:28 pm
No new posts finding delayed job/s in OPC jzhardy IBM Tools 0 Mon May 29, 2017 9:04 am
No new posts Job failing with USER = 4093 REASON C... Pradeepa S ABENDS & Debugging 1 Wed May 17, 2017 3:35 pm
No new posts Validate date and numeric fields and ... Rick Silvers DFSORT/ICETOOL 6 Thu May 11, 2017 6:51 pm


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