Extract all volumes located in VAULT1 that were created by job ZCOIBKUP during June 2000.
//EXTRACT EXEC CTTRPT
|
//SYSIN DD *
|
EXTRACT PATH=VOLUME/ALLDS
|
INCLUDE LOCATION=VAULT1,CREJBN=ZCOIBKUP
|
EXCLUDE CREDT<20000601
|
EXCLUDE CREDT>20000630
|
REPORT NAME=GENERAL,SUMMARY=YES,MARGINS=1-80,LINESIZE=80,
|
TITLE='Inventory Report'
|
FIELDS ROWID,VOLSER,VOLSTAT,MOVEDATE,VOLSEQ,SLOTNUM,VOLEXPDT,
|
ID=P
|
FIELDS DSNAME/C13,DSLABEL,CREJBN,CREDT,BLOCKCT,DSEXPDT,
|
ID=S
|
SORTBY ACTIVE/BRK/RSP,POOL/BRK/RSP,
|
LOCATION/BRK/RSR,VOLSER,DSLABEL
|
BREAK FIELD=LOCATION,EDIT='ZZ9',
|
SUMTITLE='Total number of volumes in %FIELD: %COUNTP'
|
BREAK FIELD=ACTIVE,EDIT='ZZ,ZZ9',
|
SUMTITLE='Number of %FIELD Volumes: %COUNTP'
|
BREAK FIELD=POOL,EDIT='ZZ9',
|
SUMTITLE='Total number of volumes in %FIELD: %COUNTP(%COUNT)'
|
ATTR FIELD=ROWID,TITLE='Row/Id',EDIT='ZZ,ZZ9'
|
ATTR FIELD=VOLSER,TITLE='/Volser'
|
ATTR FIELD=VOLSTAT,TITLE='Volume/Status'
|
ATTR FIELD=MOVEDATE,TITLE='Move/Date',EDIT='DD MMM YYYY'
|
ATTR FIELD=VOLSEQ,TITLE='Vol/Seq.',EDIT='Z9'
|
ATTR FIELD=SLOTNUM,TITLE='Slot/No.',EDIT='Z,ZZ9'
|
ATTR FIELD=VOLEXPDT,TITLE='Volume/Expiration',EDIT='DD MMM YYYY'
|
ATTR FIELD=DSNAME,TITLE='/Dataset Name',LENGTH=24
|
ATTR FIELD=DSLABEL,TITLE='Ds/Seq.',EDIT='ZZ9'
|
ATTR FIELD=CREJBN,TITLE='Create/Job'
|
ATTR FIELD=CREDT,TITLE='Create/Date',EDIT='DD MMM YY'
|
ATTR FIELD=BLOCKCT,TITLE='Block/Count',EDIT='ZZ,ZZ9'
|
ATTR FIELD=DSEXPDT,TITLE='Dataset/Expiration',EDIT='YYYY-MMM-DD'
|
ATTR FIELD=ACTIVE,TITLE='Type',EDIT='ACTIVE/SCRATCH'
|
ATTR FIELD=LOCATION,TITLE='Location'
|
ATTR FIELD=POOL,TITLE='Pool/Name'
|
/*
|
The following is a sample output produced by the above example. Note the following about the output:
BMC, INC. CONTROL-M/TAPE REPORT (VER 6.1.00)
|
|
Inventory Report
|
----------------
|
Type: ACTIVE Pool Name: POOL-NUMBER-1 Location: VAULT1
|
|
Row Volume Move Vol Slot Volume
|
Id Volser Status Date Seq. No. Expiration
|
Ds Create Create Block Dataset
|
Dataset Name Seq. Job Date Count Expiration
|
---------------------------- ---------------------------------------------
|
1 010222 Vaulted Jun 20-2000 2 427 21 Jun 2000
|
FDRABR.VPROD02.C1005204 6 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VPROD01.C1008804 5 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VSAS001.C1006504 4 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VTSO006.C1004804 3 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VTSO003.C1015904 2 ZCOIBKUP 14 Jun 00 999 2000-Jun-21
|
|
2 010372 Vaulted Jun 20-2000 1 433 21 Jun 2000
|
FDRABR.VTSO003.C1015904 2 ZCOIBKUP 14 Jun 00 999 2000-Jun-21
|
FDRABR.VTSO002.C1015904 1 ZCOIBKUP 14 Jun 00 999 2000-Jun-21
|
|
3 011938 Vaulted Jun 20-2000 14 487 21 Jun 2000
|
FDRABR.VWGLE00.C1035504 17 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VWGLE1C.C1027404 16 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VMVS89C.C1005304 15 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VMVS89D.C1005304 14 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VMVSR1A.C1028204 13 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VWGL800.C1006704 12 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
4 011954 Vaulted Jun 20-2000 15 492 21 Jun 2000
|
FDRABR.VWGL514.C1041704 20 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VWGLE13.C1031304 19 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VMVSRES.C1018704 18 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VWGLE00.C1035504 17 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
5 012016 Vaulted Jun 20-2000 13 506 21 Jun 2000
|
FDRABR.VWGL800.C1006704 12 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VSCLM03.C1001304 11 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
6 012191 Vaulted Jun 20-2000 3 529 21 Jun 2000
|
FDRABR.VPROD04.C1016204 7 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VPROD02.C1005204 6 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
7 012271 Vaulted Jun 20-2000 9 539 21 Jun 2000
|
FDRABR.VSCLM03.C1001304 11 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
8 012313 Vaulted Jun 20-2000 12 544 21 Jun 2000
|
FDRABR.VSCLM03.C1001304 11 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
9 013315 Vaulted Jun 20-2000 4 551 21 Jun 2000
|
FDRABR.VPROD06.C1016204 9 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VPROD05.C1015904 8 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VPROD04.C1016204 7 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
10 014347 Vaulted Jun 20-2000 11 568 21 Jun 2000
|
FDRABR.VSCLM03.C1001304 11 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
11 014743 Vaulted Jun 20-2000 10 572 21 Jun 2000
|
FDRABR.VSCLM03.C1001304 11 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
12 016465 Vaulted Jun 20-2000 5 583 21 Jun 2000
|
FDRABR.VSCLM01.C1008904 10 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
|
Inventory Report
|
----------------
|
Type: ACTIVE Pool Name: POOL-NUMBER-1 Location: VAULT1
|
|
Row Volume Move Vol Slot Volume
|
Id Volser Status Date Seq. No. Expiration
|
Ds Create Create Block Dataset
|
DataSet Name Seq. Job Date Count Expiration
|
---------------------------- --------------------------------------------
|
12 016465 Vaulted Jun 20-2000 5 583 21 Jun 2000
|
FDRABR.VPROD06.C1016204 9 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
13 017248 Vaulted Jun 20-2000 6 587 21 Jun 2000
|
FDRABR.VSCLM01.C1008904 10 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
14 018377 Vaulted Jun 20-2000 8 596 21 Jun 2000
|
FDRABR.VSCLM03.C1001304 11 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
FDRABR.VSCLM01.C1008904 10 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
15 018393 Vaulted Jun 20-2000 7 596 21 Jun 2000
|
FDRABR.VSCLM01.C1008904 10 ZCOIBKUP 14 Jun 00 0 2000-Jun-21
|
|
Total number of volumes in VAULT1 : 15
|
|
POOL-NUMBER-1 Volumes: 73 , POOL-NUMBER-1 Datasets: 581
|
|
Number of ACTIVE Volumes: 221
|