Eliminating the job cards from all the members in a pds.

bobvilch · New User Joined: 11 Oct 2006 Posts: 3

I need to modify all the members in a pds. I need to remove all the job cards and certain comment lines. I was able to execute it on 1 pds, but not all the members at 1 time. From what I have researched, it looks as if I can only do 1 member at a time. Please tell this is not so!
This is what I execute (not all member begin with the same nbr. so I set them to 100.
//SYSIN DD *
./ CHANGE NAME=GDGPCP
./ NUMBER NEW1=100,INCR=100
./ ENDUP
/*
//
After the change I execute the DELETE
./ DELETE SEQ1=100,SEQ2=100
I don't have to use ICETOOL, anything just to get it done. Once I get past this hump, this process will be used in many departments.
Any help would be greatly appreciated.
Bob Vilches

superk · Posted: Thu Oct 12, 2006 6:39 am

Bob, I'm sorry, but I don't recognize that sytax you're using that starts with ./ .

May I ask what utility you're using?

bobvilch · New User Joined: 11 Oct 2006 Posts: 3

I am using PGM=IEBUPDTE. I found this syntax './' in the examples.
./ CHANGE NAME=member name , seems to take one member name. I would like to know if there is a way to perform this on multiple members with out having to list each and everyone. I tried ICETOOL with no success. I saw some REXX examples but I am not a REXXpert and would need some pointers (ie how and where to concatenate my pds with the REXX commands) to be able to execute the REXX member.

Thanks for any assistance I can get in this matter.

Kevin · Active User Joined: 25 Aug 2005 Posts: 234

Here's two processes that I might do for a quick and dirty solution without a lot of programming:

1. "Flatten" the PDS into a sequential dataset with the IEBPTPCH utility.

2. Use DFSORT to delete the records that match the criteria as given, reformat the existing records as needed, and to build the IEBUPDTE ./ records for each member.

3. Use IEBUPDTE to build the changed members to the PDS.

<< OR >>

1. Build a member list.

2. Dynamically build and submit a job using DFSORT and the first member in the list to delete the records that match the criteria as given.

3. Delete the processed member from the list.

4. Go back to step 2 until there are no more members to process.