Previous Topic

Next Topic

Book Contents

Book Index

CTTRPT Example 1

Extract all data sets from location VAULT1 and generate a report showing all VAULT1 data sets and their volumes sorted by their pool name (DSPOOL) that is derived from data set volser.

Figure 127 CTTRPT – Example 1

//EXTRACT EXEC CTTRPT

//SYSIN   DD *

    EXTRACT PATH=DATASET/ALLVOLS

    INCLUDE LOCATION=VAULT1

    REPORT NAME=GENERAL,SUMMARY=YES,MARGINS=1-080,LINESIZE=080,

           TITLE='Datasets in Vault VAULT1'

    FIELDS ROWID,FIRSTVOL,

           DSNAME,DSLABEL,CREJBN,CREDT,LRECL,RECFM,

           ID=P

    FIELDS VOLSER/C13,MOVEDATE,VOLSEQ,SLOTNUM,

           ID=S

    SORTBY DSPOOL/BRK/RSP,FIRSTVOL,DSLABEL,VOLSEQ,SLOTNUM

    BREAK FIELD=DSPOOL,COLUMN=10,EDIT='Z,ZZ9',

      SUMTITLE='%FIELD Datasets in VAULT1:  %COUNTP'

    ATTR FIELD=ROWID,TITLE='Row/Id',EDIT='ZZ,ZZ9'

    ATTR FIELD=FIRSTVOL,TITLE='First/Volume'

    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=LRECL,TITLE='Record/Length',EDIT='ZZ,ZZ9'

    ATTR FIELD=RECFM,TITLE='Record/Format'

    ATTR FIELD=DSPOOL,TITLE='Pool/Name'

    ATTR FIELD=VOLSER,TITLE='/Volser'

    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'

A sample of the output report from the above example is illustrated as follows:

Figure 128 CTTRPT Sample Report 1

        BMC,INC.       CONTROL-M/TAPE REPORT  (VER 6.1.00)

 

                                    Datasets in Vault VAULT1

                                    -------------------------

       

        Pool Name:  POOL-NUMBER-1

       

        Row    First                   Ds    Create   Create    Record Record

        Id     Volume Dataset Name     Seq.  Job      Date      Length Format

                                    Move                Vol             Slot

                    Volser          Date                Seq.            No.

------ ------------------------------------- ------------------ ------ ------

         58 016475 FDRABR.VTSO006.C1004900     27 ZCOBKUPD 13 Jun 00      0 U

                    012517          23 Jun 2000             55             74

                    015692          23 Jun 2000             56            163

                    015646          23 Jun 2000             57            162

                    016024          23 Jun 2000             58            177

       

         59 016475 FDRABR.VESAD1A.C1002800     28 ZCOBKUPD 13 Jun 00      0 U

                    016024          23 Jun 2000             58            177

                    015722          23 Jun 2000             59            167

                    016048          23 Jun 2000             60            178

                    012771          23 Jun 2000             61             90

       

         60 016475 FDRABR.VVSAM00.C1001300     29 ZCOBKUPD 13 Jun 00      0 U

                    012771          23 Jun 2000             61             90

                    010096          23 Jun 2000             62             16

                    018862          23 Jun 2000             63            223

                    018839          23 Jun 2000             64            222

                    012914          23 Jun 2000             65             96

                    016314          23 Jun 2000             66            190

                    016296          23 Jun 2000             67            187

                    016211          23 Jun 2000             68            184

         61 016475 FDRABR.VSCLM02.C1003500     30 ZCOBKUPD 13 Jun 00      0 U

                    016211          23 Jun 2000             68            184

                    016201          23 Jun 2000             69            183

                    016127          23 Jun 2000             70            181

                    016337          23 Jun 2000             71            193

                    016322          23 Jun 2000             72            192

                    015072          23 Jun 2000             73            148

        62 016475 FDRABR.VVSAM12.C1006800     31 ZCOBKUPD 13 Jun 00      0 U

                    015072          23 Jun 2000             73            148

                    015062          23 Jun 2000             74            147

                    011488          23 Jun 2000             75             44

                    011035          23 Jun 2000             76             31

                    010970          23 Jun 2000             77             29

                    010967          23 Jun 2000             78             28

        63 017244 CA.BKUPMSTR.G0502V00         1 CALDPBK  12 Jun 00  8,287 VB

                    017244          23 Jun 2000              1            113

                    013076          23 Jun 2000              2            110

                    018149          23 Jun 2000              3            114

                    015278          23 Jun 2000              4            112

                    019308          23 Jun 2000              5            115

                    013099          23 Jun 2000              6            111

       64 018042 TS63.CATALOG.VWGL507.BAC     1 ZTSVSMB4 13 Jun 00 32,756 VBS

                    018042          23 Jun 2000              1              9

                    018137          23 Jun 2000              2             10

                    013684          23 Jun 2000              3              7

                    011951          23 Jun 2000              4              5

                    011932          23 Jun 2000              5             61

        BMC,  INC.        CONTROL-M/TAPE REPORT  (VER 6.1.00)

       

                                    Datasets in Vault VAULT1

                                    -------------------------

        Pool Name:  POOL-NUMBER-1

       

   Row    First                      Ds    Create   Create    Record Record

   Id     Volume Dataset Name        Seq.  Job      Date      Length Format

                                    Move                 Vol            Slot

                    Volser          Date                 Seq.           No.

------ ------------------------------------- ------------------ ------ ------

       64 018042 TS63.CATALOG.VWGL507.BAC     1 ZTSVSMB4 13 Jun 00 32,756 VBS

                    011257         23 Jun 2000               6             40

                    010885         23 Jun 2000               7             25

                    010870         23 Jun 2000               8             24

                    017991         23 Jun 2000               9            209

                    017509         23 Jun 2000              10            203

                    014339         23 Jun 2000              11            136

                    015050         23 Jun 2000              12            145

                    015097         23 Jun 2000              13            149

       

       65 018228 TS63.CATALOG.VMVSCAT.BAC     1 ZTSVSMB1 13 Jun 00 32,756 VBS

                    018228         23 Jun 2000               1             11

       

       66 018288 TS63.CATALOG.VWGL83A.BAC     1 ZTSVSMBA 13 Jun 00 32,756 VBS

                    018288         23 Jun 2000               1             13

                    018280         23 Jun 2000               2             12

       

       67 018358 TS63.CATALOG.VWGL514.BAC     1 ZTSVSMB3 13 Jun 00 32,756 VBS

                    018358         23 Jun 2000               1             14

       

                 POOL-NUMBER-1 Datasets in VAULT1:  67

Parent Topic

Examples for CTTRPT