Sample JCL


The following JCL demonstrates how to add multiple References to multiple Tasks in a single job. It is provided as member WZZPPB in your SAMPLIB.

//CRUXSAMP JOB (),'ADD IMPACTS',
//  CLASS=A,MSGCLASS=A,NOTIFY=PAUL
//WZZPPB EXEC PGM=WZZPPB,REGION=0M
//STEPLIB  DD DISP=SHR,DSN=#BASEHLQ.#BASELOAD
//WZZRCJOB DD DISP=SHR,DSN=#SITEHLQ.#SITELEVP.#SITEPARM(WZZRCJOB )
//SYSPRINT DD SYSOUT=*
//WORKOUT  DD SYSOUT=*
//WORKIN   DD *
$DEFINE_CRUX
  APPL=TSTI
  STREAM=BASIC
  TYPE=CLST
  NAME=TREXX00
  LEVEL=PROD
  DELREF=1
  DELEXT=1
$DEFINE_CRE
  REFCAT=PGM
  REFNAME=WZZTEST1
  IMPTYPE=MANUAL
  SOURCE=1
  RELSHP=W
  INHERIT=Y
$DEFINE_CRX
  EXTNTYPE=M
  EXTNNAME=PANEL_WZZTEST1_LONG
$DEFINE_CRE
  REFCAT=PGM
  REFNAME=WZZTEST2
  IMPTYPE=MANUAL
  SOURCE=1
  RELSHP=D
  INHERIT=Y
$DEFINE_CRE
  REFCAT=PGM
  REFNAME=WZZTEST3
  IMPTYPE=MANUAL
  SOURCE=1
  RELSHP=S
  INHERIT=Y
$DEFINE_CRE
  REFCAT=PGM
  REFNAME=WZZTEST4
  IMPTYPE=MANUAL
  SOURCE=1
  RELSHP=W
  INHERIT=N
$DEFINE_CRUX
  APPL=TSTI
  STREAM=BASIC
  TYPE=CLST
  NAME=TIMPACTS
  LEVEL=PROD
  DELREF=1
  DELEXT=1
$DEFINE_CRE
  REFCAT=PGM
  REFNAME=WZZTEST1
  IMPTYPE=MANUAL
  SOURCE=1
  RELSHP=W
  INHERIT=Y
$DEFINE_CRE
  REFCAT=PGM
  REFNAME=WZZTEST2
  IMPTYPE=MANUAL
  SOURCE=1
  RELSHP=D
  INHERIT=Y
$DEFINE_CRX
  EXTNTYPE=M
  EXTNNAME=PANEL_WZZTEST2_LONG
$DEFINE_CRE
  REFCAT=PGM
  REFNAME=WZZTEST3
  IMPTYPE=MANUAL
  SOURCE=1
  RELSHP=S
  INHERIT=Y
$DEFINE_CRE
  REFCAT=PGM
  REFNAME=WZZTEST4
  IMPTYPE=MANUAL
  SOURCE=1
  RELSHP=W
  INHERIT=N

 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*