Skip to content

Commit 31a25a5

Browse files
adam-wolfeadam-wolfe
authored
Merge pull request #124 from BroadcomMFD/Table-Tool-Examples-update
Cleanup of references
2 parents f8a7592 + 39d90da commit 31a25a5

15 files changed

+101
-42
lines changed

‎endevor/Field-Developed-Programs/Table-Tool-Examples/CLEANOVR.jcl

+1-1
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
//IBMUSERO JOB (0000),'Dan Walther',CLASS=A,MSGCLASS=Z,MSGLEVEL=(1,1),
1+
//IBMUSERO JOB (0000),'Your Name',CLASS=A,MSGCLASS=Z,MSGLEVEL=(1,1),
22
// NOTIFY=&SYSUID,REGION=0M
33
//*-------------------------------------------------------------------*
44
//*--Report processor group Overrides --------------------------------*

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL#1.jcl

+4-4
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22
// 'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,REGION=0M,MSGCLASS=A,
33
// NOTIFY=&SYSUID
44
//*-------------------------------------------------------------------
5-
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
5+
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
66
//*--------------------------------------------------------------
77
//*- To Report and delete very old elements from Test -----------
88
//*--------------------------------------------------------------
@@ -11,9 +11,9 @@
1111
//*--------------------------------------------------------------------*
1212
//STEP1 EXEC PGM=NDVRC1,REGION=4M,
1313
// PARM='BC1PCSV0'
14-
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
15-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
16-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
14+
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
15+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
16+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
1717
//BSTIPT01 DD *
1818
LIST ELEMENT '*'
1919
FROM ENVIRONMENT SMPLTEST SYSTEM '*' SUBSYSTEM '*'

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL#2.jcl

+4-4
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22
// 'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,REGION=0M,MSGCLASS=A,
33
// NOTIFY=&SYSUID
44
//*-------------------------------------------------------------------
5-
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
5+
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
66
//*--------------------------------------------------------------
77
//*- To Report Packages created over nnn days ago -----------
88
//*--------------------------------------------------------------
@@ -11,9 +11,9 @@
1111
//*--------------------------------------------------------------------*
1212
//STEP1 EXEC PGM=NDVRC1,REGION=4M,
1313
// PARM='BC1PCSV0'
14-
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
15-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
16-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
14+
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
15+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
16+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
1717
//BSTIPT01 DD *
1818
LIST PACKAGE ID '*'
1919
WHERE DATE TYPE CR IS OLDER THAN 20 DAYS

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL#3.jcl

+4-4
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22
// 'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,REGION=0M,MSGCLASS=A,
33
// NOTIFY=&SYSUID
44
//*-------------------------------------------------------------------
5-
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
5+
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
66
//*--------------------------------------------------------------
77
//*- Add members of a PDS into Endevor -----------
88
//*--------------------------------------------------------------
@@ -55,9 +55,9 @@
5555
//*--------------------------------------------------------------------*
5656
//STEP03 EXEC PGM=NDVRC1,REGION=4M,
5757
// PARM='BC1PCSV0'
58-
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
59-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
60-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
58+
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
59+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
60+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
6161
//BSTIPT01 DD *
6262
LIST ELEMENT '*' FROM ENVIRONMENT SMPLPROD STAGE P
6363
SYSTEM '*' SUBSYSTEM '*' TYPE "*"

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL#4.jcl

+10-10
Original file line numberDiff line numberDiff line change
@@ -5,17 +5,17 @@
55
//*-- Execute PDM to update elements out of sync. --------------------*
66
//*-- Outputs: IBMUSER.ENDEVOR.WIPFILE --------------------*
77
//*-------------------------------------------------------------------*
8-
// SET SYSEXEC=SYS1.EXEC
9-
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
8+
// SET SYSEXEC=YOUR.REXX.EXEC
9+
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
1010
//*-------------------------------------------------------------------*
1111
//PDM#001 EXEC PGM=NDVRC1,
1212
// DYNAMNBR=1500,
1313
// REGION=4096K,
1414
// PARM='C1BM3000'
15-
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
16-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
17-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
18-
//CONLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
15+
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
16+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
17+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
18+
//CONLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
1919
//C1MSGS1 DD SYSOUT=*
2020
//C1MSGS2 DD DSN=&&C1MSGS2,DISP=(NEW,PASS),
2121
// UNIT=SYSDA,SPACE=(TRK,(5,5)),
@@ -65,10 +65,10 @@
6565
//*--------------------------------------------------------------------*
6666
//PDM#003 EXEC PGM=NDVRC1,REGION=4M,
6767
// PARM='BC1PCSV0'
68-
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
69-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
70-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
71-
//CONLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
68+
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
69+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
70+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
71+
//CONLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
7272
//BSTIPT01 DD DSN=&&CSVLISTS,DISP=(OLD,DELETE)
7373
//APIEXTR DD DSN=&&CSVFILE,
7474
// DCB=(RECFM=FB,LRECL=1800,BLKSIZE=9000,DSORG=PS),

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL#5.jcl

+2-2
Original file line numberDiff line numberDiff line change
@@ -8,8 +8,8 @@
88
//*--------------------------------------------------------------------
99
// SET TABLE=IBMUSER.NDVR.DATASETS <- Saved 3.4 data
1010
// SET TABLE=IBMUSER.PUBLIC.DATASETS <- Saved 3.4 data
11-
// SET SYSEXEC=SYS1.EXEC <- Rexx library
12-
// SET SYSEXEC=CAPRD.NDVR.EMER.CATSNDVR.CSIQCLS0
11+
// SET SYSEXEC=YOUR.REXX.EXEC <- Rexx library
12+
// SET SYSEXEC=YOUR.NDVR.EMER.ADMINSYS.CSIQCLS0
1313
//*--------------------------------------------------------------------
1414
//TEST001 EXEC PGM=IRXJCL,PARM='ENBPIU00 PARMLIST'
1515
//TABLE DD DISP=SHR,DSN=&TABLE

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL#6.jcl

+3-3
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,12 @@
11
//IBMUSER5 JOB (0000),'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,
22
// REGION=0M,MSGCLASS=A,NOTIFY=&SYSUID
33
//*--------------------------------------------------------------------
4-
//*- SYS1.EXEC(ALLOLIKE)
4+
//*- YOUR.REXX.EXEC(ALLOLIKE)
55
//*--------------------------------------------------------------------
66
// SET DSNLIST=IBMUSER.MYLIST.DATASETS <-
7-
// SET DSNLIST=IBMUSER.CAPRD.DATASETS <-
7+
// SET DSNLIST=IBMUSER.YOUR.DATASETS <-
88
// SET DSNLIST=IBMUSER.TESTING.DATASETS <-
9-
// SET SYSEXEC=SYS1.EXEC <-
9+
// SET SYSEXEC=YOUR.REXX.EXEC <-
1010
//*--------------------------------------------------------------------
1111
//*- IBMUSER.JCL(EXAMPL#5) --------------------------------------------
1212
//*--------------------------------------------------------------------

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL#8.jcl

+2-2
Original file line numberDiff line numberDiff line change
@@ -3,8 +3,8 @@
33
// NOTIFY=&SYSUID 00040000
44
//*------------------------------------------------------------------- 00050000
55
// SET WORKLIB=IBMUSER.PARMS 00060000
6-
// SET CSIQCLS0=CAPRD.NDVR.PROD.CATSNDVR.CSIQCLS0 00070000
7-
// SET NDVR#HLQ=CAPRD.NDVR.V180CA06 00080000
6+
// SET CSIQCLS0=YOUR.NDVR.PROD.ADMINSYS.CSIQCLS0 00070000
7+
// SET NDVR#HLQ=YOUR.NDVR.V180CA06 00080000
88
//*------------------------------------------------------------------- 00090000
99
//* Report processor usage 00100000
1010
//* Outputs: 00110000

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL1A.jcl

+1-1
Original file line numberDiff line numberDiff line change
@@ -30,6 +30,6 @@ LIST ELEMENT '*'
3030
ELM_LAST_LL_DATE=&ELM_LAST_LL_DATE @ &ELM_LAST_LL_TIME
3131
//TABLE DD DSN=&&CSVFILE,DISP=(OLD,DELETE)
3232
//SYSTSPRT DD SYSOUT=*
33-
//SYSEXEC DD DISP=SHR,DSN=CARSMINI.NDVR.R1801.CSIQCLS0
33+
//SYSEXEC DD DISP=SHR,DSN=YOURHLQ.NDVR.R1801.CSIQCLS0
3434
//TBLOUT DD SYSOUT=*
3535

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL1B.jcl

+1-1
Original file line numberDiff line numberDiff line change
@@ -54,6 +54,6 @@ Element- Type---- Dup System-- Subsys-- --Date-- Signout
5454
&Element &Type &dup &System &Subsys &Date &Userid
5555
//TABLE DD DSN=&&CSVFILE2,DISP=(OLD,DELETE)
5656
//SYSTSPRT DD SYSOUT=*
57-
//SYSEXEC DD DISP=SHR,DSN=CARSMINI.NDVR.R1801.CSIQCLS0
57+
//SYSEXEC DD DISP=SHR,DSN=YOURHLQ.NDVR.R1801.CSIQCLS0
5858
//TBLOUT DD SYSOUT=*
5959

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL2$.jcl

+4-4
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22
// 'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,REGION=0M,MSGCLASS=A,
33
// NOTIFY=&SYSUID
44
//*-------------------------------------------------------------------
5-
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
5+
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
66
//*--------------------------------------------------------------
77
//*- To Report Packages created over nnn days ago -----------
88
//*--------------------------------------------------------------
@@ -11,9 +11,9 @@
1111
//*--------------------------------------------------------------------*
1212
//STEP1 EXEC PGM=NDVRC1,REGION=4M,
1313
// PARM='BC1PCSV0'
14-
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
15-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
16-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
14+
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
15+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
16+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
1717
//BSTIPT01 DD *
1818
LIST PACKAGE ID '*'
1919
WHERE DATE TYPE CR IS OLDER THAN 20 DAYS

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL2B.jcl

+1-1
Original file line numberDiff line numberDiff line change
@@ -4,7 +4,7 @@
44
//*--------------------------------------------------------------
55
// JCLLIB ORDER=(IBMUSER.JCL.CSV)
66
//*--
7-
//*- To Report Elements moved within a date span -----------
7+
//*- To Report Element changes within a date span -----------
88
//*--------------------------------------------------------------
99
// EXPORT SYMLIST=(*) <- make JCL symbols available
1010
//*---

‎endevor/Field-Developed-Programs/Table-Tool-Examples/EXAMPL2P.jcl

+4-4
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22
// 'ENDEVOR JOB',MSGLEVEL=(1,1),CLASS=B,REGION=0M,MSGCLASS=A,
33
// NOTIFY=&SYSUID
44
//*-------------------------------------------------------------------
5-
// SET SYSEXEC=CAPRD.NDVR.PROD.CATSNDVR.CEXEC
5+
// SET SYSEXEC=YOUR.NDVR.PROD.ADMINSYS.CEXEC
66
//*--------------------------------------------------------------
77
//*- To Report Packages created over nnn days ago -----------
88
//*--------------------------------------------------------------
@@ -11,9 +11,9 @@
1111
//*--------------------------------------------------------------------*
1212
//STEP1 EXEC PGM=NDVRC1,REGION=4M,
1313
// PARM='BC1PCSV0'
14-
//STEPLIB DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTU
15-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQAUTH
16-
// DD DISP=SHR,DSN=CAPRD.NDVR.V160PRD.CSIQLOAD
14+
//STEPLIB DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTU
15+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQAUTH
16+
// DD DISP=SHR,DSN=YOUR.NDVR.V160PRD.CSIQLOAD
1717
//BSTIPT01 DD *
1818
LIST PACKAGE ID '*'
1919
WHERE DATE TYPE CR IS OLDER THAN 20 DAYS

0 commit comments

Comments
 (0)