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
 

 

want to replace a particular char for rename purpose

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
Purnendu.it

New User


Joined: 11 May 2007
Posts: 59
Location: chennai

PostPosted: Sat May 10, 2008 2:36 pm    Post subject: want to replace a particular char for rename purpose
Reply with quote

Hi all,
I have a tricky question.I have just come with a requirement
that i have to copy few members of a data set to another data set
if those member are there in a third dataset..
Now after copying i have to change the naming convention of the
member..
ex: like
GZSDATE should be changed to GZNDATE
mean third char S has to be replace with N for every member.Can i
do it by submitting a job or writing a cobol program.I have thousands
lots of member in the library to change.So maually its very mechanical
and tiring..

thanks in advance for your help.....
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: Sat May 10, 2008 2:51 pm    Post subject:
Reply with quote

Hello,

You need to post a complete set of "rules".

Please create an example list of the member names in the 3 partitioned datasets and describe how you want your process to work (including an external list of member names to process). The last part of the description will be the list of member names in all 3 datasets after your process is run.

Once the rules are understood, it will be possible to generate the needed jcl and control statements to do what you need.
Back to top
View user's profile Send private message
Purnendu.it

New User


Joined: 11 May 2007
Posts: 59
Location: chennai

PostPosted: Tue May 13, 2008 7:28 pm    Post subject:
Reply with quote

hi dick,
what i m doing is creating a clone region for the testing purpose for the
production library.now in new library i have to copy all the
runbooks from production.its contains a lots of member.I have copied
it.But the problem is i have to change the naming convention according
to the new region for example.
if its in prodution region GZSBKUP1
TO GZMBKUP1.I mean i have to changed only third charecter.i m doing it
manually..can i do by some program or job itself..
Back to top
View user's profile Send private message
yogeshwar_ade

Active User


Joined: 31 Aug 2006
Posts: 103
Location: INDIA

PostPosted: Tue May 13, 2008 7:43 pm    Post subject:
Reply with quote

Purnendu.it wrote:
if its in prodution region GZSBKUP1
TO GZMBKUP1.


Hi,

I did same kind of work sometime before... You can use 'ADRDSSU', make search on ADRDSSU, there are many good postings on it.
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: Tue May 13, 2008 10:24 pm    Post subject:
Reply with quote

Hello,

Quote:
i m doing it manually..can i do by some program or job itself..
Sure, you can.

Create a list of all of the members for some pds to be copied/renamed.

Read the list and generate the jcl to copy each member from the old pds(mbrname) to the new pds(mbrname) and submit the generated jcl thru the internal reader. Make sure to do less than 255 per job.

If you are not familiar with the internal reader, there are multiple topics in the forum.
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Wed May 14, 2008 6:05 pm    Post subject:
Reply with quote

Hi,

You can also try IEHPROGM to rename the members. Do a 3.4 then SAVE the member list: SAVE any 1-8 pos name.

This creates a PS file w/a DSN in the form: yrTSOid.1-8pos.MEMBERS. It contains a copy of the display created by 3.4. Edit that file to conform to the RENAME stmt, and use an overlay move (M/OO-OO), then use the result as the SYSIN to IEHPROGM.
Code:
RENAME VOL=disk=222222,DSNAME=yourDSN,NEWNAME=        ,MEMBER=


See the IBM Manuals section here (click manuals at top of this screen and look for IBM JCLUtilities Guide etc.) for details on IEHPROGM.
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Comparing Decimal and CHAR columns rakesh17684 DB2 7 Thu Oct 20, 2016 2:33 am
No new posts Error during restore rename archanamuthukrishnan All Other Mainframe Topics 2 Fri Oct 14, 2016 3:30 pm
No new posts Replace repeated JCL with looping REXX prino CLIST & REXX 3 Thu Oct 13, 2016 5:30 am
This topic is locked: you cannot edit posts or make replies. Sort card to replace text using cross... Susanta SYNCSORT 32 Tue Sep 13, 2016 4:17 pm
No new posts Replace function abdulrafi COBOL Programming 13 Mon Sep 12, 2016 10:12 am


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