| View previous topic :: View next topic |
| Author |
Message |
sankar narayanan
Beginner
Joined: 16 Oct 2007
Posts: 29
Topics: 12
|
 Posted: Thu Jul 24, 2008 6:48 am Post subject: |
 |
|
Its DASD only,If you have the code please share it  .... |
|
| Back to top |
|
 |
expat
Intermediate
Joined: 01 Mar 2007
Posts: 475
Topics: 9
Location: Welsh Wales
|
| Posted: Thu Jul 24, 2008 9:14 am Post subject: |
|
|
The link to the IBM DFSMSdss manual is here
CLICK HERE
Take a look at the COPY command and also the REPLACEUNCONDITIONAL AND RENAMEUNCONDITIONAL parameters.
I do not have an example in my JCL archive, but this should not take you more than half an hour to prepare and test. |
|
| Back to top |
|
|
jsharon1248
Intermediate
Joined: 08 Aug 2007
Posts: 291
Topics: 2
Location: Chicago
|
| Posted: Thu Jul 24, 2008 9:43 am Post subject: |
|
|
| Quote: | | If you have the code please share it |
You've got to be joking. 2 days to find an automated solution to an urgent task that should take no longer than 2 hours to complete manually?!?! I admire the patience of the folks that took time to post some really good ideas to help out. I must share an observation and a prediction. This guy doesn't want ideas; he wants someone to do the dirty work for him, and when he's forced to do it himself, he's going to hose it up and someone else will need to clean the mess. |
|
| Back to top |
|
|
sankar narayanan
Beginner
Joined: 16 Oct 2007
Posts: 29
Topics: 12
|
| Posted: Fri Jul 25, 2008 1:21 am Post subject: |
|
|
Hi instead typing such a big sentence u could have find the solution 
Anyway i completed this tasks Via Rexx code....Others Thanks for your Timely Help and suggestion. |
|
| Back to top |
|
|
expat
Intermediate
Joined: 01 Mar 2007
Posts: 475
Topics: 9
Location: Welsh Wales
|
| Posted: Fri Jul 25, 2008 1:33 am Post subject: |
|
|
And would you care to share your solution so that others who find themselves in the same situation may benefit from your experience ?
_________________
If it's true that we are here to help others,
then what exactly are the others here for ? |
|
| Back to top |
|
|
jsharon1248
Intermediate
Joined: 08 Aug 2007
Posts: 291
Topics: 2
Location: Chicago
|
| Posted: Fri Jul 25, 2008 11:41 am Post subject: |
|
|
| Quote: | | Hi instead typing such a big sentence u could have find the solution |
I did tell you the solution. For an urgent task, an experienced professional would have coded the solution manually in less than 2 hours rather than spending 2 days asking others for an automated solution. As a guideline, I exert the same effort in my responses that I perceive the op exerts trying to resolve the issue on their own. In your case, very little. I am happy to see that you did resolve this on your own, and reiterate expat's request that you post your solution for the benefit of others. |
|
| Back to top |
|
|
Southington
Beginner
Joined: 02 Jun 2006
Posts: 6
Topics: 0
Location: Phoenix AZ
|
| Posted: Wed Sep 10, 2008 4:13 pm Post subject: |
|
|
Wouldn't this work, even with tape: | Code: |
// exec pgm=iebgener
//sysut1 dd dsn=usr.aaaa.test,disp=old gets all GDG files
//sysut2 dd dsn=new.bbbb.test(+1),
// disp=(,catlg,delete), dcb=whatever, etc.
//sysin dd dummy
//sysprint dd sysout=*
//sysout dd sysout=*
// |
|
|
| Back to top |
|
|
Mervyn
Moderator
Joined: 02 Dec 2002
Posts: 415
Topics: 6
Location: Hove, England
|
| Posted: Wed Sep 10, 2008 4:20 pm Post subject: |
|
|
No, that would just copy all generations of the original GDG into a single generation of the new GDG, whereas the OP wants one generation of the new GDG for each generation of the original GDG.
_________________
The day you stop learning the dinosaur becomes extinct |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
