IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

finding STORCLAS=USER in each step of the jcl


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
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
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: 8797
Location: Welsh Wales

PostPosted: Fri Mar 26, 2010 12:00 pm
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

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Fri Mar 26, 2010 2:08 pm
Reply with quote

see
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: 8797
Location: Welsh Wales

PostPosted: Fri Mar 26, 2010 4:38 pm
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: 2481
Location: Netherlands, Amstelveen

PostPosted: Fri Mar 26, 2010 4:58 pm
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: 8797
Location: Welsh Wales

PostPosted: Fri Mar 26, 2010 5:14 pm
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: 2481
Location: Netherlands, Amstelveen

PostPosted: Fri Mar 26, 2010 6:13 pm
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Finding and researching jobs All Other Mainframe Topics 0
No new posts VB to FB - Finding LRECL SYNCSORT 4
No new posts PuTTY - "User is not a surrogate... IBM Tools 5
No new posts Return codes-Normal & Abnormal te... JCL & VSAM 7
No new posts How to delete a user's alias from the... JCL & VSAM 11
Search our Forums:

Back to Top