Page 1 of 1

pcompare jcl to compare to panvalet members

PostPosted: Fri Aug 14, 2015 6:15 pm
by chinatrain99
Does anyone have actual JCL to run a compare? I've been looking at the manuals and I haven't gotten it figured out yet. Here's what I have, but i'm not sure what to do with the SYSIN. You would have thought I could find a "real" example out there somewhere... Thanks for any assistance, Jeff

//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
//

Locked as duplicate on another forum