| View previous topic :: View next topic |
| Author |
Message |
kirmvs
Beginner
Joined: 07 Apr 2004
Posts: 5
Topics: 3
|
 Posted: Fri May 14, 2004 11:50 am Post subject: Updating different stats to on different members |
 |
|
Hi all,
Stats are wiped out while creating new members from existing members in a single PDS. Each old member has been updated last by different users and I want to save the same stats on the new members. Please suggest a code/method to this.
Thanks
Kiran |
|
| Back to top |
|
 |
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12376
Topics: 75
Location: San Jose
|
| Posted: Fri May 14, 2004 12:26 pm Post subject: |
|
|
kiranmvs,
If you have file-aid at your shop then you can use to copy the old member as a new member with ISPF stastics.
| Code: |
//STEP0100 EXEC PGM=FILEAID,REGION=4M
//SYSPRINT DD SYSOUT=*
//SYSLIST DD SYSOUT=*
//DD01 DD DSN=YOUR SOURCE PDS,
// DISP=SHR
//DD01O DD DSN=YOUR SOURCE PDS,
// DISP=SHR
//SYSIN DD *
$$DD01 COPY MEMBER=OLDNAME,NEWMEM=NEWNAME
/*
|
Hope this helps...
Cheers
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
kirmvs
Beginner
Joined: 07 Apr 2004
Posts: 5
Topics: 3
|
| Posted: Fri May 14, 2004 1:31 pm Post subject: |
|
|
Kolusu,
The new members are not just a copy of the original members. I have a REXX code which replaces a specific line from the old structure and creates a new member but I could not figure out a way to retain/copy the stats. I am not sure if the file-aid code you gave, could be modified to suit this. Please let me know the changes as I am new to File-Aid.
Thanks
Kiran |
|
| Back to top |
|
|
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12376
Topics: 75
Location: San Jose
|
| Posted: Fri May 14, 2004 3:09 pm Post subject: |
|
|
Kiran,
When you replace a string in old member, the ISPF stats are updated. Now do you want these stats to be copied to the new member also?
File aid has the option of updating or skip updating the ISPF stats
The Parm PDSSTAT maintains PDS member statistics when updating partitioned datasets. It maintains only standard PDF directory entries.The parameter is valid only with the UPDATE function. The syntax of the PDSSTAT parameter is:
Valid values for the x parameter are:
| Code: |
Y - Update PDS statistics if they exist
N - Do not update PDS statistics
A - Update PDS statistics if they exist, or add statistics if they do not exist.
|
The following JCl will update the oldmember and create a new member also
| Code: |
//STEP0100 EXEC PGM=FILEAID,REGION=4M
//SYSPRINT DD SYSOUT=*
//SYSLIST DD SYSOUT=*
//DD01 DD DSN=YOUR SOURCE PDS,
// DISP=SHR
//DD01O DD DSN=YOUR SOURCE PDS,
// DISP=SHR
//SYSIN DD *
$$DD01 UPDATE MEMBER=KIRANK,
EDITALL=(1,0,C'STRING TO BE REPLACED',C'REPLACING STRING'),
PDSSTAT=A
$$DD01 COPY MEMBER=KIRANK,NEWMEM=KOLUSU
/*
|
Hope this helps...
Cheers
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
