Editing the content of multiple Files at the same time

ganga79 · New User Joined: 16 Nov 2005 Posts: 23

Hi,

1)I have one PDS in that we have around 50 members all the members are having the error messages like SUBJECT: error information for this error information i have to change it to SUBJECT: SYSTEMNAME error information i have to edit this message for all the members like that ,for that i need to create a job ..

2) same as above in the second job i have to create to remove the SYSTEMNAME from the subject line..

i guess it is possible in REXX , but let me know same thing is possible through JCL,if any one knows please let me know

Thanks
Ganga

Ganga

UmeySan · Posted: Fri Sep 22, 2006 1:41 pm

Hi !

You could use IBM-Utility IPOUPDATE to make changes in every member
of an PDS, if your not having an online-utility, perhaps PDSFAST.

//UPDAT1 EXEC PGM=IPOUPDTE,
//* PARM='UPDATE'
// PARM='CHECK'
//?INST1 DD DISP=SHR,DSN=IE31000.ISPF.ISPCLIST
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
OldString<NewString<
//

Regards, UmeySan

ganga79 · New User Joined: 16 Nov 2005 Posts: 23

hi UmeySan,
Thanks for your reply,Please explain in detail same IPOUPDTE i tried execute it giving problem.So if you provide indetail it will be more useful for me.Thanks..

UmeySan · Posted: Fri Sep 22, 2006 5:34 pm

Hi !

Sorry, i forgot to tell you, that in the pds-lib you have to create a member named $$$COIBM. Thats only a dummy member wich you could
copy vom sys1.proclib to your pds..

//UPDAT1 EXEC PGM=IPOUPDTE, PARM='UPDATE'

You could start IPO with two kinds of parm. parm=check will only display you the result of changes without updating all the members.
Parm=update does the changes an updates the members.

//?INST1 DD DISP=SHR,DSN=This.IS.YOUR.PDS

That's the PDS-File where you have to do the changes

//SYSIN DD *
OldString<NewString<

OldString is changed to NewString, i.e.

aaa<zzz< = replace all 'aaa' by 'zzz'

Hope that satisfies, UmeySan