Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
//IBMUSERO JOB (0000),'Dan Walther',CLASS=A,MSGCLASS=Z,MSGLEVEL=(1,1),
//IBMUSERO JOB (0000),'Your Name',CLASS=A,MSGCLASS=Z,MSGLEVEL=(1,1),
// NOTIFY=&SYSUID,REGION=0M
//*-------------------------------------------------------------------*
//*--Report processor group Overrides --------------------------------*
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -2,7 +2,7 @@
// 'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,REGION=0M,MSGCLASS=A,
// NOTIFY=&SYSUID
//*-------------------------------------------------------------------
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
//*--------------------------------------------------------------
//*- To Report and delete very old elements from Test -----------
//*--------------------------------------------------------------
Expand All @@ -11,9 +11,9 @@
//*--------------------------------------------------------------------*
//STEP1 EXEC PGM=NDVRC1,REGION=4M,
// PARM='BC1PCSV0'
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
//BSTIPT01 DD *
LIST ELEMENT '*'
FROM ENVIRONMENT SMPLTEST SYSTEM '*' SUBSYSTEM '*'
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -2,7 +2,7 @@
// 'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,REGION=0M,MSGCLASS=A,
// NOTIFY=&SYSUID
//*-------------------------------------------------------------------
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
//*--------------------------------------------------------------
//*- To Report Packages created over nnn days ago -----------
//*--------------------------------------------------------------
Expand All @@ -11,9 +11,9 @@
//*--------------------------------------------------------------------*
//STEP1 EXEC PGM=NDVRC1,REGION=4M,
// PARM='BC1PCSV0'
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
//BSTIPT01 DD *
LIST PACKAGE ID '*'
WHERE DATE TYPE CR IS OLDER THAN 20 DAYS
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -2,7 +2,7 @@
// 'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,REGION=0M,MSGCLASS=A,
// NOTIFY=&SYSUID
//*-------------------------------------------------------------------
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
//*--------------------------------------------------------------
//*- Add members of a PDS into Endevor -----------
//*--------------------------------------------------------------
Expand Down Expand Up @@ -55,9 +55,9 @@
//*--------------------------------------------------------------------*
//STEP03 EXEC PGM=NDVRC1,REGION=4M,
// PARM='BC1PCSV0'
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
//BSTIPT01 DD *
LIST ELEMENT '*' FROM ENVIRONMENT SMPLPROD STAGE P
SYSTEM '*' SUBSYSTEM '*' TYPE "*"
Expand Down
20 changes: 10 additions & 10 deletions endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL#4.jcl
Original file line number Diff line number Diff line change
Expand Up @@ -5,17 +5,17 @@
//*-- Execute PDM to update elements out of sync. --------------------*
//*-- Outputs: IBMUSER.ENDEVOR.WIPFILE --------------------*
//*-------------------------------------------------------------------*
// SET SYSEXEC=SYS1.EXEC
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
// SET SYSEXEC=YOUR.REXX.EXEC
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
//*-------------------------------------------------------------------*
//PDM#001 EXEC PGM=NDVRC1,
// DYNAMNBR=1500,
// REGION=4096K,
// PARM='C1BM3000'
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
//CONLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
//CONLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
//C1MSGS1 DD SYSOUT=*
//C1MSGS2 DD DSN=&&C1MSGS2,DISP=(NEW,PASS),
// UNIT=SYSDA,SPACE=(TRK,(5,5)),
Expand Down Expand Up @@ -65,10 +65,10 @@
//*--------------------------------------------------------------------*
//PDM#003 EXEC PGM=NDVRC1,REGION=4M,
// PARM='BC1PCSV0'
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
//CONLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
//CONLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
//BSTIPT01 DD DSN=&&CSVLISTS,DISP=(OLD,DELETE)
//APIEXTR DD DSN=&&CSVFILE,
// DCB=(RECFM=FB,LRECL=1800,BLKSIZE=9000,DSORG=PS),
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -8,8 +8,8 @@
//*--------------------------------------------------------------------
// SET TABLE=IBMUSER.NDVR.DATASETS <- Saved 3.4 data
// SET TABLE=IBMUSER.PUBLIC.DATASETS <- Saved 3.4 data
// SET SYSEXEC=SYS1.EXEC <- Rexx library
// SET SYSEXEC=CAPRD.NDVR.EMER.CATSNDVR.CSIQCLS0
// SET SYSEXEC=YOUR.REXX.EXEC <- Rexx library
// SET SYSEXEC=YOUR.NDVR.EMER.ADMINSYS.CSIQCLS0
//*--------------------------------------------------------------------
//TEST001 EXEC PGM=IRXJCL,PARM='ENBPIU00 PARMLIST'
//TABLE DD DISP=SHR,DSN=&TABLE
Expand Down
Original file line number Diff line number Diff line change
@@ -1,12 +1,12 @@
//IBMUSER5 JOB (0000),'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,
// REGION=0M,MSGCLASS=A,NOTIFY=&SYSUID
//*--------------------------------------------------------------------
//*- SYS1.EXEC(ALLOLIKE)
//*- YOUR.REXX.EXEC(ALLOLIKE)
//*--------------------------------------------------------------------
// SET DSNLIST=IBMUSER.MYLIST.DATASETS <-
// SET DSNLIST=IBMUSER.CAPRD.DATASETS <-
// SET DSNLIST=IBMUSER.YOUR.DATASETS <-
// SET DSNLIST=IBMUSER.TESTING.DATASETS <-
// SET SYSEXEC=SYS1.EXEC <-
// SET SYSEXEC=YOUR.REXX.EXEC <-
//*--------------------------------------------------------------------
//*- IBMUSER.JCL(EXAMPL#5) --------------------------------------------
//*--------------------------------------------------------------------
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -3,8 +3,8 @@
// NOTIFY=&SYSUID 00040000
//*------------------------------------------------------------------- 00050000
// SET WORKLIB=IBMUSER.PARMS 00060000
// SET CSIQCLS0=CAPRD.NDVR.PROD.CATSNDVR.CSIQCLS0 00070000
// SET NDVR#HLQ=CAPRD.NDVR.V180CA06 00080000
// SET CSIQCLS0=YOUR.NDVR.PROD.ADMINSYS.CSIQCLS0 00070000
// SET NDVR#HLQ=YOUR.NDVR.V180CA06 00080000
//*------------------------------------------------------------------- 00090000
//* Report processor usage 00100000
//* Outputs: 00110000
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -30,6 +30,6 @@ LIST ELEMENT '*'
ELM_LAST_LL_DATE=&ELM_LAST_LL_DATE @ &ELM_LAST_LL_TIME
//TABLE DD DSN=&&CSVFILE,DISP=(OLD,DELETE)
//SYSTSPRT DD SYSOUT=*
//SYSEXEC DD DISP=SHR,DSN=CARSMINI.NDVR.R1801.CSIQCLS0
//SYSEXEC DD DISP=SHR,DSN=YOURHLQ.NDVR.R1801.CSIQCLS0
//TBLOUT DD SYSOUT=*

Original file line number Diff line number Diff line change
Expand Up @@ -54,6 +54,6 @@ Element- Type---- Dup System-- Subsys-- --Date-- Signout
&Element &Type &dup &System &Subsys &Date &Userid
//TABLE DD DSN=&&CSVFILE2,DISP=(OLD,DELETE)
//SYSTSPRT DD SYSOUT=*
//SYSEXEC DD DISP=SHR,DSN=CARSMINI.NDVR.R1801.CSIQCLS0
//SYSEXEC DD DISP=SHR,DSN=YOURHLQ.NDVR.R1801.CSIQCLS0
//TBLOUT DD SYSOUT=*

Original file line number Diff line number Diff line change
Expand Up @@ -2,7 +2,7 @@
// 'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,REGION=0M,MSGCLASS=A,
// NOTIFY=&SYSUID
//*-------------------------------------------------------------------
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
//*--------------------------------------------------------------
//*- To Report Packages created over nnn days ago -----------
//*--------------------------------------------------------------
Expand All @@ -11,9 +11,9 @@
//*--------------------------------------------------------------------*
//STEP1 EXEC PGM=NDVRC1,REGION=4M,
// PARM='BC1PCSV0'
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
//BSTIPT01 DD *
LIST PACKAGE ID '*'
WHERE DATE TYPE CR IS OLDER THAN 20 DAYS
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@
//*--------------------------------------------------------------
// JCLLIB ORDER=(IBMUSER.JCL.CSV)
//*--
//*- To Report Elements moved within a date span -----------
//*- To Report Element changes within a date span -----------
//*--------------------------------------------------------------
// EXPORT SYMLIST=(*) <- make JCL symbols available
//*---
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -2,7 +2,7 @@
// 'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,REGION=0M,MSGCLASS=A,
// NOTIFY=&SYSUID
//*-------------------------------------------------------------------
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
//*--------------------------------------------------------------
//*- To Report Packages created over nnn days ago -----------
//*--------------------------------------------------------------
Expand All @@ -11,9 +11,9 @@
//*--------------------------------------------------------------------*
//STEP1 EXEC PGM=NDVRC1,REGION=4M,
// PARM='BC1PCSV0'
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
//BSTIPT01 DD *
LIST PACKAGE ID '*'
WHERE DATE TYPE CR IS OLDER THAN 20 DAYS
Expand Down
Loading