View previous topic :: View next topic
|
Author |
Message |
ozgurseyrek
New User
Joined: 22 Feb 2008 Posts: 70 Location: Turkey
|
|
|
|
Hi,
I want to change a string in JCL's in a PDS.
I am using IPOUPDTE but, in control statement I am using a string lower-case. but IPOUPDTE doesn't find that string...(But a member include that string)
member;
JCL Step;
Code: |
//LIBUPDT EXEC PGM=IPOUPDTE,PARM=CHECK
$IJCLLIB DD DISP=SHR,DSN=XXX.YYYYY.ZZZZZ
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
test string<result string<
/*
|
At the result of that JOB doesn't find any string to change.
Are there any parameters about Case sensitivty?
Thanks... |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
Why are you using IPOUPDTE? There's a lot of restrictions on it. If your data set or string doesn't meet the restrictions, no updates will be applied even if the string is found. |
|
Back to top |
|
|
ozgurseyrek
New User
Joined: 22 Feb 2008 Posts: 70 Location: Turkey
|
|
|
|
we have IPOUPDTE, and I don't know another way to Mass update on a PDS...
How can I achieve that requirements without IPOUPDTE? |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
Restrictions:
1. Only CBIPO-provided libraries are eligible for updating by IPOUPDTE.
2. For IPOUPDTE to work, each PDS to be searched MUST contain a member named $$$COIBM
3. The string to be replaced, STRING1, must be totally contained in positions 1 through 71 of an input record.
4. For STRING1 to be a word, it must have one of the following characters to its left and one to its right: ' , . / < > ? " : ; ^ + _ ( ) * % | = and blank
(although it can start in 1 or end in 71)
For small numbers of changes, your best bet would be to use ISPF 3.14 to find the string occurrences and then use ISPF EDIT to replace them. |
|
Back to top |
|
|
ozgurseyrek
New User
Joined: 22 Feb 2008 Posts: 70 Location: Turkey
|
|
|
|
What can I use for big changes? ISPF EDIT is not usefull for that case.
Are there anothe solutions? |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
You can run the ISPF edit in batch.
Take a look at THIS topic to get some ideas |
|
Back to top |
|
|
ozgurseyrek
New User
Joined: 22 Feb 2008 Posts: 70 Location: Turkey
|
|
|
|
Hi expat,
the code at the link doesn't similar to me,
Infact my request is very basic and simple. Only a mass change command?
Must I write a macro, rexx e.t.c.? |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
The code for the Main REXX will need changes only to reflect the pds name, but even that can be easily amended to get the data from the PRM of the EXEC card, or from a file.
The macro code is really quite easy once you get the hang of it. For example
"ISREDIT C 'string A' 'string B' ALL"
will change all occurences of string A into strin B
just the same as you enter it on a terminal. |
|
Back to top |
|
|
|