chinatrain99 Beginner
Joined: 25 Nov 2014 Posts: 7 Topics: 5
|
Posted: Fri Aug 14, 2015 7:50 am Post subject: pcompare jcl to compare to panvalet members |
|
|
I would appreciate it if someone could give me a "real" example of the pcompare jcl. I've gotten this out of the ca manual but I can't find a clear example of what to put in the SYSIN. I'm guessing I don't need the member name in the pcold/pcnew parm...i'm sure it's in the sysin. You would think CA would have put a "real" example out there. Thanks for any assistance, Jeff
Code: |
//STEP EXEC PGM=PCOMPARE,
// PARM=(SYSIN,SYSPRINT,PCOLD,PCNEW,
// PCDELTA,PCUPDTE,PCWORK1,PCWORK2)
//STEPLIB DD DISP=SHR,DSN=CAI1.PANVALET.V14R6.CBA3LINK
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSABEND DD SYSOUT=*
//PCOLD DD DSN=CAI1.PANVALET.CX7E3.SORCLIB(LDS2500P),DISP=SHR
//PCNEW DD DSN=CAI1.PANVALET.CX7E3.SORCLIB(JEFF100P),DISP=SHR
//PCDELTA DD DSN=TSJEFF.PAN.COMPRE.DELTA,
// DISP=(,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(TRK,(5,1),RLSE),LRECL=100,RECFM=FB
//PCUPDTE DD DSN=TSJEFF.PAN.COMPRE.UPDTE,
// DISP=(,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(TRK,(5,1),RLSE),LRECL=100,RECFM=FB
//PCWORK1 DD DSN=TSJEFF.PAN.COMPRE.WORK1,
// DISP=(,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(TRK,(5,1),RLSE),LRECL=100,RECFM=FB
//PCWORK2 DD DSN=TSJEFF.PAN.COMPRE.WORK2,
// DISP=(,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(TRK,(5,1),RLSE),LRECL=100,RECFM=FB
//SYSIN DD *
COMPARE
//* |
|
|