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

modity text in multiple members in a dataset


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
shobvid

New User


Joined: 03 Apr 2008
Posts: 11
Location: India

PostPosted: Thu Apr 03, 2008 2:04 pm
Reply with quote

Hi,
Iam interested to modify a text in multiple members in the same PDS. I tried the following code but did not work.
//AAAAAA EXEC PGM=IPOUPDTE,PARM='UPDATE'
//INST1 DD DISP=SHR,DSN=AAA.TEST.STRING
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
AA<BBBB<

alternatively i tried using filemanager(FILEAID in not available with us)
//AAAAAA EXEC PGM=FMNMAIN,REGION=6M
//SYSPRINT DD SYSOUT=*
//SYSLIST DD SYSOUT=*
//DD01 DD DSN=AAA.TEST.STRING,DISP=SHR
//SYSIN DD *
$$DD01 UPDATE REPL=(1,0,C'AA',C'BBBB')
/*

both the options did not work...please suggest
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8796
Location: Welsh Wales

PostPosted: Thu Apr 03, 2008 3:03 pm
Reply with quote

I usually use an ISPF edit macro
Back to top
View user's profile Send private message
shobvid

New User


Joined: 03 Apr 2008
Posts: 11
Location: India

PostPosted: Thu Apr 03, 2008 3:18 pm
Reply with quote

Could you please share the macro or any other batch method to do the same
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8796
Location: Welsh Wales

PostPosted: Thu Apr 03, 2008 3:53 pm
Reply with quote

Search button is at the top of each page

Enter Macro for the keyword
Enter expat for the author

continue
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Thu Apr 03, 2008 4:46 pm
Reply with quote

I was going to suggest IPOUPDTE, so I'd be curious to know why it didn't work for you. It sounds like you need to code your own solution using whatever method you feel most comfortable with.
Back to top
View user's profile Send private message
shobvid

New User


Joined: 03 Apr 2008
Posts: 11
Location: India

PostPosted: Thu Apr 03, 2008 5:37 pm
Reply with quote

job runs fine but the results are not seen

here is the spool output

********************************* TOP OF DATA ******************************
BATCH JCL TAILORING AID UPDATE CONTROL STATEMENTS
MEMBER COMMENTS ....|....1....|....2....|....3....|....4....|....5.
SYSIN AAAA<BBBB<
MESSAGE IPO005 END OF INPUT CONTROL STATEMENTS
MESSAGE IPO011 IPOUPDTE ENDED. CODE=00
******************************** BOTTOM OF DATA ****************************


I have put AAAA string in few of the members but the values remained unchanged.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10886
Location: italy

PostPosted: Thu Apr 03, 2008 5:50 pm
Reply with quote

IPOUPDTE is ... tricky,
once upon a time a member named "$$$COIBM" with any content was needed for ipoupdte to work
Back to top
View user's profile Send private message
shobvid

New User


Joined: 03 Apr 2008
Posts: 11
Location: India

PostPosted: Thu Apr 03, 2008 6:14 pm
Reply with quote

I did create $$$COIBM member but its not working
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10886
Location: italy

PostPosted: Thu Apr 03, 2008 6:21 pm
Reply with quote

IPOUPDTE is tricky also for the ddnames to be used for the libraries to be updated

here is a pointer to some docs

http://gsf-soft.com/Documents/IPOUPDTE.shtml
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10886
Location: italy

PostPosted: Thu Apr 03, 2008 6:39 pm
Reply with quote

here is a sample working which means tested
Code:
****** ***************************** Top of Data ******************************
000001 //ENRICO@A JOB (H001),'IPOUPDTE',NOTIFY=ENRICO,
000002 //             CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1)
000003 //* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
000004 //*            DSN=ENRICO.MF.JCLLIB(IPOUPDTE)
000005 //* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
000006 // JCLLIB      ORDER=(ENRICO.MF.JCLLIB)
000007 //* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
000008 //*
000009 //UPDT    EXEC PGM=IPOUPDTE,PARM=CHECK
000010 //SYSPRINT  DD SYSOUT=*
000011 //SYSIN     DD *
000012 ENRICO<OTHER<
000013 //@LIB01    DD DISP=SHR,DSN=ENRICO.MF.JCLLIB


note the ddnme tarting with the special char @
Back to top
View user's profile Send private message
shobvid

New User


Joined: 03 Apr 2008
Posts: 11
Location: India

PostPosted: Fri Apr 04, 2008 9:36 am
Reply with quote

Super, it worked fine..thanks a lot.
Back to top
View user's profile Send private message
vidyakonda

New User


Joined: 25 Jan 2006
Posts: 8

PostPosted: Mon May 19, 2008 4:18 pm
Reply with quote

Does this utility support to modify a mixed case of text?
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10886
Location: italy

PostPosted: Mon May 19, 2008 4:24 pm
Reply with quote

Quote:
Does this utility support to modify a mixed case of text?


why don' t you try and tell us?

a string is a string... caseless

after that, when using ispf to edit a dataset/member,
casing is influenced by the edit-profile settings
Back to top
View user's profile Send private message
vidyakonda

New User


Joined: 25 Jan 2006
Posts: 8

PostPosted: Mon May 19, 2008 5:30 pm
Reply with quote

I did try but its not updating though the string exists.
Please see the jcl used

//STRCHG EXEC PGM=IPOUPDTE,PARM=UPDATE
//@INST1 DD DISP=SHR,DSN=AAA.TEST.TEMP
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
wS-<PR123-<
//*

Here the "w" is in lower case and though this text exists in the member its not getting changed.

By default in the spool its getting converted to upper case as shown in the spool output below.

BATCH JCL TAILORING AID UPDATE CONTROL STATEMENTS
MEMBER COMMENTS ....|....1....|....2....|....3....|....4....|....
SYSIN WS<PR123-<
MESSAGE IPO005 END OF INPUT CONTROL STATEMENTS
BATCH JCL TAILORING AID VOL=PR0351 DSNAME=AAA.TEST.TEMP
MEMBER COMMENTS ....|....1....|....2....|....3....|....4....|....
MESSAGE IPO010 FILE @INST1 HAD NO UPDATES
MESSAGE IPO011 IPOUPDTE ENDED. CODE=04
******************************** BOTTOM OF DATA **************************

Hope the point is clear.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10886
Location: italy

PostPosted: Mon May 19, 2008 5:51 pm
Reply with quote

ipoupdte/cppupdte is quite picky about string tokenizing...

are You sure that wS- is a properly bounded word

here is a pointer to ipoupdte/cppupdte docs

http://gsf-soft.com/Documents/IPOUPDTE.shtml

Now that I think about it better,
I do not remember ( it was a long time ago ) if my IPOUPDTE was hacked to support mixed case icon_biggrin.gif
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 -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Copy only TEXT or String from a record SYNCSORT 4
No new posts combine multiple unique records into ... DFSORT/ICETOOL 2
No new posts batch SFTP job using AOPBATCH unable ... All Other Mainframe Topics 7
No new posts SORT JCL to merge multiple tow into s... DFSORT/ICETOOL 6
No new posts Using Multiple IFTHEN and WHEN condit... SYNCSORT 12
Search our Forums:

Back to Top