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
 

 

Adding data to all members in a PDS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IBM Tools
View previous topic :: :: View next topic  
Author Message
mambopras

New User


Joined: 11 Nov 2008
Posts: 52
Location: Hyderabad

PostPosted: Sat Feb 19, 2011 11:23 pm    Post subject: Adding data to all members in a PDS
Reply with quote

Hi,
I am stuck with a problem of having to include 2 lines of comments in all the members of a PDS. Manually adding two lines is very time-taking and tedious.
Example : I need to include two lines like below in all the members of a PDS.
a) /* THIS MEMBER IS USED TO DEFINE THE VALUES
/* FOR SYMBOLIC VARIABLES

Are there any utilities that will help us automate this process ?
Back to top
View user's profile Send private message

superk

Moderator Team Head


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

PostPosted: Sat Feb 19, 2011 11:32 pm    Post subject: Reply to: Adding data to all members in a PDS
Reply with quote

You can:

1. Copy the PDS to a sequential dataset (IEBPTPCH), re-format and add the data as needed where needed (SORT or any other utility/program you desire), then build a new PDS with the updated members (IEBUPDTE).

2. Create a TSO EDIT process to add the data for each member of the PDS (REXX/Clist would be useful here).

3. Use a tool like SAS to do this.

4. Create an ISPF Edit Macro to add the data. Write a program to call ISPF EDIT and have it invoke that Edit Macro for each member.

5. Write a program to read each member, add the data, the rewrite the member, repeated for all the members.

6. Write a program to use ISPF Library Management (LM) services to loop through the members, edit each one, add the data, and rewrite each one. Or, some combination of any of the above.

7. Use whatever third-party product you may already have in your shop for this that we obviously wouldn't know about unless you tell us.
Back to top
View user's profile Send private message
daveporcelan

Active Member


Joined: 01 Dec 2006
Posts: 662
Location: Pennsylvania

PostPosted: Mon Feb 21, 2011 8:56 pm    Post subject:
Reply with quote

I would choose option number 4. But that would be my opinion only.
Back to top
View user's profile Send private message
GuyC

Senior Member


Joined: 11 Aug 2009
Posts: 1281
Location: Belgium

PostPosted: Mon Feb 21, 2011 9:00 pm    Post subject:
Reply with quote

daveporcelan wrote:
I would choose option number 4. But that would be my opinion only.
mine too
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10256
Location: italy

PostPosted: Mon Feb 21, 2011 9:28 pm    Post subject: Reply to: Adding data to all members in a PDS
Reply with quote

strongly agree icon_biggrin.gif

every professional should have into his tools chest
a macro to apply a macro to all the other members of the PDS

my suggested approach is to open an empty member
and insert a line for each member with the indication changed/not changed and all the other info for <debugging>

and a significant set of inner macros to perform any needed process
for example
renumber
unnumber
pack
unpack
build/rebuild a job card
compile
...
mass change
insert lines

I had an ispf dialog for the last two tasks,
but I somehow lost track of it, when I' ll find it I will be glad to post it
Back to top
View user's profile Send private message
mambopras

New User


Joined: 11 Nov 2008
Posts: 52
Location: Hyderabad

PostPosted: Tue Mar 01, 2011 7:04 pm    Post subject: Re:Adding data to all members in a PDS
Reply with quote

Thanks for your sugegstions, I would try using your pointers to achieve it....
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6967
Location: porcelain throne

PostPosted: Tue Mar 01, 2011 7:13 pm    Post subject:
Reply with quote

Though it is written in CLIST, it is easily converted to REXX.


2.4.3 ISRMBRS macro

The ISRMBRS macro (Figure 47 ) uses PDF library access services to determine each member name in the library being edited.

This macro invokes the edit service for each member in the library, except the member currently being edited, passing a user-specified edit macro on the edit service invocation. The ISRMBRS macname command, where macname is the name of the macro to be invoked against each member, starts the service.

This macro can aid in making repetitive changes to all members of a data set, or in searching all members for a specific string of data.



provides a first tool for your tool-chest.
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 -> IBM Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Replace values in the input data Vikas Maharnawar DFSORT/ICETOOL 10 Thu May 11, 2017 2:18 pm
No new posts Adding big TEXT lines to each record ... bshkris SYNCSORT 4 Sat May 06, 2017 1:40 am
No new posts Group Data based on a key Arun Raj DFSORT/ICETOOL 7 Thu Apr 27, 2017 11:29 pm
No new posts unload data from table with lob columns farhad_evan DB2 0 Sat Apr 22, 2017 1:32 pm
No new posts SORT JSON type of data maxsubrat DFSORT/ICETOOL 8 Wed Apr 19, 2017 6:01 pm


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