CTTRPT Example 2

Extract all volumes located in VAULT1 that were created by job ZCOIBKUP during June 2000.

Figure 129 CTTRPT – Example 2

//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:

The page number, date and time are not printed unless the LINESIZE specified in the REPORT statement is at least 127.
During printing, if there is insufficient room on the current page for secondary lines, the primary line is reprinted as part of the page header on the next page.
A field specified with option /BRK in a SORTBY statement is shown in the page header following the report title and any slashes (/) specified in the TITLE definition are suppressed to blanks.
Figure 130 CTTRPT Sample Report 2

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

Parent Topic

Examples for CTTRPT