View previous topic :: View next topic
|
Author |
Message |
vikram
New User
Joined: 08 Mar 2005 Posts: 8
|
|
|
|
Hi
I have a PDS and want to change a particular string say tdb292.I want to search for this string in all members of a PDS and change it to tdb294.
How can I do this? |
|
Back to top |
|
|
William Thompson
Global Moderator
Joined: 18 Nov 2006 Posts: 3156 Location: Tucson AZ
|
|
|
|
chg 'tdb292' 'tdb294' all |
|
Back to top |
|
|
mansoor22
New User
Joined: 12 Apr 2006 Posts: 3
|
|
|
|
Hi,
With my TSO there is a tool 'PDSMAN' (option - 7) where we can specify the PDS and the string to be modified. This will search all the members of the PDS and replace if any strings are found.
Can anyone let me know if this tool is availale with all the TSO or if there are any similar tools. |
|
Back to top |
|
|
UmeySan
Active Member
Joined: 22 Aug 2006 Posts: 771 Location: Germany
|
|
|
|
Hi !
In normal IBM environment thers is an old tool named IPOUPDATE.
A IBM-Batch-Utility for replacing Strings in PDS-members. I have posted that here a lot of time.
PDSMAN ore PDSFAST are ISPF-Enhancement-Tolls. Depends if they are installed ore not.
Have a look in your system-lib's for a member named $$$COIBM
This is a sign that IPO is usable. Because this util needs that dummy-member in a PDS.
//STEP1 EXEC PGM=IPOUPDTE,PARM=UPDATE
//SYSPRINT DD SYSOUT=*
//?DD1 DD DISP=SHR,
// DSN=IE31000.ISPF.ISPSLIB
//SYSIN DD *
SYS1.ISPF.ISPEXEC<SYS1.ISPF.SISPEXEC<
SYS1.ISPF.ISPGENU<SYS1.ISPF.SISPGENU<
OldString<NewString
Parm= Update => Do-it
Parm= Check => No real update only display result
Regard, UmeySan |
|
Back to top |
|
|
hikaps14
Active User
Joined: 02 Sep 2005 Posts: 189 Location: Noida
|
|
|
|
Hi Vikram,
i guess Rexx would be quite suitable for ur job.
this can be achieved very easily thru a simple rexx code.
Thanks,
-Kapil. |
|
Back to top |
|
|
bbharathiraj Warnings : 1 New User
Joined: 26 Oct 2006 Posts: 50 Location: Chennai
|
|
|
|
In file-aid there is an option F;3;6 for mass update of all members in PDS by giving source string and dest string |
|
Back to top |
|
|
Jatin saraf
New User
Joined: 30 Mar 2007 Posts: 22 Location: United States of america
|
|
|
|
Hi, I tried the IPOUPDTE utility to change a particular string in all the members of a pds but its not working. I know that the utility is supported on the mainframe here(as the return code for the job is zero) but the change is not happening. Below is the JCL i am using:-
Code: |
//*
//STEP1 EXEC PGM=IPOUPDTE,PARM=UPDATE
//SYSPRINT DD SYSOUT=*
//DD1 DD DSN=HNTU099.JCL1(BVSAD928),DISP=SHR
//SYSIN DD *
DEV<ABC<
/*
|
Can somebody suggest me a solution? |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Once again, in the light of responses to this thread, I would use an ISPF EDIT macro.
Fileaid, and other products, and even IPOUPDATE may not always be available on any given system. By sticking to the bare basic principles you will have a method of achieving what you want and also the fact that the tool will be transportable to virtually any z/OS site with minimal changes required for it to work. |
|
Back to top |
|
|
abhishek dadhichi
New User
Joined: 19 Apr 2007 Posts: 37 Location: Bangalore
|
|
|
|
Hi ,
You can use File-Aid option 3.6 and then type Change command with the required string to be changed throughout the whole PDS.
Regards,
Abhi |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Quote: |
You can use File-Aid option 3.6 |
Only if the system has fileaid. Many do not. . . |
|
Back to top |
|
|
tangentray
New User
Joined: 30 Dec 2006 Posts: 20 Location: Kolkata, India
|
|
|
|
I would go with expat's solution.
Record a macro:
e
c all tdb292 tdb294
F3
tab
edit the macro by adding a loop of as many members you have in the PDS. Position your cursor on the first member and ru the macro. All should be done. |
|
Back to top |
|
|
|