The DSNAMES (Data Set Names) function will report all the data
set names used in a set of JCL jobs and procedures libraries.
The two example reports below show, first, data set names,
including SYSOUT and temporary data set names, for a group of
jobs. Second is the same report of the same job set with
SYSOUT and temporary data sets removed, using the 'DS*=NO' option.
SV RELEASE: C306M1C FUNCTION: WHERE
VBASE: O : ADPRBH1.ZEX.VBASE DATE: 06/14/2003
SYSLIB: O : ADPRBH1.ZEX.SOURCE TIME: 11:17
ALTLIB: N : *** NOT ALLOCATED *** EXEC: BACKGROUND
COPYLIB: O : ADPRBH1.ZEX.COPY TAPE: D00110
C2COPY: O : ADPRBH1.ZEX.COPY2 USERID: ADPRBH1H
P1PROC: O : ADPRBH1.ZEX.PROC
P2PROC: N : *** NOT ALLOCATED ***
JOBCNTL: O : ADPRBH1.ZEX.JOB
OUTLIB: O : ADPRBH1.ZEX.OUTLIB
PMHELP: N : *** NOT ALLOCATED ***
S1SCEN: N : *** NOT ALLOCATED ***
S2SCEN: N : *** NOT ALLOCATED ***
L1LOAD: I : ADPRBH1.ZEX.LOAD
L2LOAD: N : *** NOT ALLOCATED ***
@SV INPUT:
@SV.DSNAMES TITLE='DSN: '
@SV MEM=CTL*
@SV
@SV
@SV ERR=GO,PMR=NO
WHERE MESSAGES: DSN: ADPAC, USE BY AGREEMENT ONLY 06/14/2003 PAGE 1
START: CTLCRE8
START: CTLRPT
START: CTLUPDT
WHERE MESSAGES: 1
DATASET LIST DSN: ADPAC, USE BY AGREEMENT ONLY 06/14/2003 PAGE 1
RPT USER PROCEDURE PGM DATA SET I/O RECFM F XREF
LINE CODES MEMBER NAME NAME DISP DDNAME UNIT LRECL BLKSZ FORM ID T LINE
1--------- 11-------- 21------ 31------------------------------------------ 45- 61------ 70 48- 51--- 56--- 61------69 73----
1 000001UJJ IDCAMS ***SYS:* OD SYSIN IC T 000007
2 000001UJJ IDCAMS ***SYS:SYSOUT=Q ND SYSPRINT OP T 000014
3 000002 JJ CNTLCRE8 ADRBH.PDS.LOAD S STEPLIB ID 000018
4 000002 JJ CNTLCRE8 ADRBH.CNTL.MASTER S CNTLER I 000019
5 000002 JJ CNTLCRE8 ***SYS:* OD DATAIN IC 000020
6 000002 JJ CNTLCRE8 ***SYS:SYSOUT=Q ND SYSDSPLY OP 000024
7 000003UJJ IDCAMS ADRBH.CNTL.MASTER S CNTLMSTR I T 000029
8 000003UJJ IDCAMS ***SYS:SYSOUT=Q ND SYSPRINT OP T 000030
9 000003UJJ IDCAMS ***SYS:* OD SYSIN IC T 000031
10 000004 JJ CNTLRPT ADRBH.PDS.LOAD S STEPLIB ID 000007
11 000004 JJ CNTLRPT ADRBH.CNTL.MASTER S CNTLER I 000008
12 000004 JJ CNTLRPT ***SYS:SYSOUT=Q ND PRINTER OP 000009
13 000004 JJ CNTLRPT ***SYS:SYSOUT=Q ND SYSDSPLY OP 000010
14 000005 JJ CNTLUPDT ADRBH.PDS.LOAD S STEPLIB ID 000007
15 000005 JJ CNTLUPDT ADRBH.CNTL.MASTER S CNTLER I 000008
16 000005 JJ CNTLUPDT ***SYS:SYSOUT=Q ND SYSDSPLY OP 000009
PM@000-10 NORMAL EOJ CPU HRS:00 MIN:00 SEC:02.60
--------------------
SV RELEASE: C306M1C FUNCTION: WHERE
VBASE: O : ADPRBH1.ZEX.VBASE DATE: 06/14/2003
SYSLIB: O : ADPRBH1.ZEX.SOURCE TIME: 11:17
ALTLIB: N : *** NOT ALLOCATED *** EXEC: BACKGROUND
COPYLIB: O : ADPRBH1.ZEX.COPY TAPE: D00110
C2COPY: O : ADPRBH1.ZEX.COPY2 USERID: ADPRBH1H
P1PROC: O : ADPRBH1.ZEX.PROC
P2PROC: N : *** NOT ALLOCATED ***
JOBCNTL: O : ADPRBH1.ZEX.JOB
OUTLIB: O : ADPRBH1.ZEX.OUTLIB
PMHELP: N : *** NOT ALLOCATED ***
S1SCEN: N : *** NOT ALLOCATED ***
S2SCEN: N : *** NOT ALLOCATED ***
L1LOAD: I : ADPRBH1.ZEX.LOAD
L2LOAD: N : *** NOT ALLOCATED ***
@SV INPUT:
@SV.DSNAMES TITLE='DSN: '
@SV MEM=CTL*
@SV DS*=NO
@SV
@SV ERR=GO,PMR=NO
WHERE MESSAGES: DSN: ADPAC, USE BY AGREEMENT ONLY 06/14/2003 PAGE 1
START: CTLCRE8
START: CTLRPT
START: CTLUPDT
WHERE MESSAGES: 1
DATASET LIST DSN: ADPAC, USE BY AGREEMENT ONLY 06/14/2003 PAGE 1
RPT USER PROCEDURE PGM DATA SET I/O RECFM F XREF
LINE CODES MEMBER NAME NAME DISP DDNAME UNIT LRECL BLKSZ FORM ID T LINE
1--------- 11-------- 21------ 31------------------------------------------ 45- 61------ 70 48- 51--- 56--- 61------69 73----
1 000002 JJ CNTLCRE8 ADRBH.PDS.LOAD S STEPLIB ID 000018
2 000002 JJ CNTLCRE8 ADRBH.CNTL.MASTER S CNTLER I 000019
3 000003UJJ IDCAMS ADRBH.CNTL.MASTER S CNTLMSTR I T 000029
4 000004 JJ CNTLRPT ADRBH.PDS.LOAD S STEPLIB ID 000007
5 000004 JJ CNTLRPT ADRBH.CNTL.MASTER S CNTLER I 000008
6 000005 JJ CNTLUPDT ADRBH.PDS.LOAD S STEPLIB ID 000007
7 000005 JJ CNTLUPDT ADRBH.CNTL.MASTER S CNTLER I 000008
PM@000-10 NORMAL EOJ CPU HRS:00 MIN:00 SEC:04.68
--------------------