View previous topic :: View next topic
|
Author |
Message |
satish.ms10
Active User
Joined: 10 Aug 2009 Posts: 184 Location: India
|
|
|
|
Hi,
We have done some code changes to a JCL job and the code changes are done in two PDS's for the same job.
Do we have any way to consolidate those changes in one PDS?
Thanks in advance. |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
I think that you need to explain what has happened and what you need help with in much more detail to be able to get some assistance. |
|
Back to top |
|
|
satish.ms10
Active User
Joined: 10 Aug 2009 Posts: 184 Location: India
|
|
|
|
Hi,
I have job (ex. JOB123) in PDS: ABC and in PDS: XYZ. User A modified the job in ABC pds and user B modifed in XYZ pds in different lines.
Now we need to consolidate those changes in any one PDS.
Do we have any way to achieve this? If yes, guide me how can I do?
Thanks... |
|
Back to top |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
Put the job in 1 pds only and apply the changes again. |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
Back to top |
|
|
satish.ms10
Active User
Joined: 10 Aug 2009 Posts: 184 Location: India
|
|
|
|
Thank you very much Dick,
I will look into this manual and let you know.
Thanks, |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
I believe you can compare both the members from different PDS using ISPF 3.13, and then just take one JCL-member as reference and pick what needs to be added from other member. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
ok, you can use this - this will give a comparison in the OUTDSN, which is pretty easy to comprehend.
Code: |
//jobcard
//*
// SET NEWDSN=some.pds1(mem)
// SET OLDDSN=some.pds2(mem)
// SET OUTDSN=compared.output
//*******************************************************************
//SUPERC2 EXEC PGM=ISRSUPC,REGION=0M,
// PARM=(CHNGL,LINECMP,'DPBLKCL ANYC WIDE','')
//NEWDD DD DSN=&NEWDSN,
// DISP=SHR,DCB=BUFNO=30
//OLDDD DD DSN=&OLDDSN,
// DISP=SHR,DCB=BUFNO=30
//OUTDD DD DSN=&OUTDSN,
// DISP=(,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(CYL,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=133,BLKSIZE=3325)
//SYSIN DD *
CMPCOLM 1:72 |
|
|
Back to top |
|
|
|