Step 8 – Create the Data Cluster

Customization › Customization Steps › Step 8 – Create the Data Cluster

Step 8 – Create the Data Cluster

After selecting Step 8, the VSAM definition members for the data cluster creation process are generated and saved in the CNTL library, as shown following.

 CAMAT.PMA.CNTL(DEDEFALT) GENERATED
 CAMAT.PMA.CNTL(DEDEFBPM) GENERATED
 CAMAT.PMA.CNTL(DEDEFCIC) GENERATED
 CAMAT.PMA.CNTL(DEDEFCMO) GENERATED
 CAMAT.PMA.CNTL(DEDEFCPP) GENERATED
 CAMAT.PMA.CNTL(DEDEFCSC) GENERATED
 CAMAT.PMA.CNTL(DEDEFCST) GENERATED
 CAMAT.PMA.CNTL(DEDEFDIC) GENERATED
 CAMAT.PMA.CNTL(DEDEFEXC) GENERATED
 CAMAT.PMA.CNTL(DEDEFIMO) GENERATED
 CAMAT.PMA.CNTL(DEDEFIMS) GENERATED
 CAMAT.PMA.CNTL(DEDEFIPP) GENERATED
 CAMAT.PMA.CNTL(DEDEFJOB) GENERATED
 CAMAT.PMA.CNTL(DEDEFLMO) GENERATED
 CAMAT.PMA.CNTL(DEDEFPRO) GENERATED
 CAMAT.PMA.CNTL(DEDEFSQL) GENERATED
 CAMAT.PMA.CNTL(DEFINALT) GENERATED
 CAMAT.PMA.CNTL(DEFINBPM) GENERATED
 CAMAT.PMA.CNTL(DEFINCIC) GENERATED
 CAMAT.PMA.CNTL(DEFINCMO) GENERATED
 CAMAT.PMA.CNTL(DEFINCPP) GENERATED
 CAMAT.PMA.CNTL(DEFINCSC) GENERATED
 CAMAT.PMA.CNTL(DEFINCST) GENERATED
 CAMAT.PMA.CNTL(DEFINDIC) GENERATED
 CAMAT.PMA.CNTL(DEFINEXC) GENERATED
 CAMAT.PMA.CNTL(DEFINIMO) GENERATED
 CAMAT.PMA.CNTL(DEFINIMS) GENERATED
 CAMAT.PMA.CNTL(DEFINIPP) GENERATED
 CAMAT.PMA.CNTL(DEFINJOB) GENERATED
 CAMAT.PMA.CNTL(DEFINLMO) GENERATED
 CAMAT.PMA.CNTL(DEFINPRO) GENERATED
 CAMAT.PMA.CNTL(DEFINSQL) GENERATED
 CAMAT.PMA.CNTL(REPROALT) GENERATED
 CAMAT.PMA.CNTL(REPROBPM) GENERATED
 CAMAT.PMA.CNTL(REPROCIC) GENERATED
 CAMAT.PMA.CNTL(REPROCMO) GENERATED
 CAMAT.PMA.CNTL(REPROCPP) GENERATED
 CAMAT.PMA.CNTL(REPROCST) GENERATED
 CAMAT.PMA.CNTL(REPRODIC) GENERATED
 CAMAT.PMA.CNTL(REPROEXC) GENERATED
 CAMAT.PMA.CNTL(REPROIMO) GENERATED
 CAMAT.PMA.CNTL(REPROIMS) GENERATED
 CAMAT.PMA.CNTL(REPROIPP) GENERATED
 CAMAT.PMA.CNTL(REPROJOB) GENERATED
 CAMAT.PMA.CNTL(REPROLMO) GENERATED
 CAMAT.PMA.CNTL(REPROPRO) GENERATED
 CAMAT.PMA.CNTL(REPROSQL) GENERATED
 ***

When all CNTL members are generated, press Enter to display the CUSTJT08 job to create the data cluster.

//JOBNAME JOB(ACCOUNT),'PMA',CLASS=A,
//             MSGLEVEL=(1,1),MSGCLASS=H,NOTIFY=&SYSUID,REGION=0M
//*
//*
//*
//********************************************************************
//* CUSTJT08:   CREATE PMA DATA CLUSTER                              *
//* =========                                                        *
//*                                                                  *
//* COPYRIGHT (C) 2012 CA. ALL RIGHTS RESERVED.                      *
//* COPYRIGHT (C) TRILOG AG.                                         *
//*                                                                  *
//********************************************************************
//*                                                                  *
//********************************************************************
//*    CREATE TEMP FILES
//********************************************************************
//CREATE   EXEC  PGM=APCBAB24
//STEPLIB  DD DISP=SHR,
//            DSN=CAMAT.PMA.CEETLOAD
//BLANK24  DD DSN=&&BLANK24,DISP=(NEW,PASS),
//            UNIT=SYSDA,
//            VOL=SER=VOL001,
//            SPACE=(TRK,(1,1))
//*
//********************************************************************
//*    CREATE PMA ALERT CLUSTER
//********************************************************************
//APCALT  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=SHR,DSN=CAMAT.PMA.CEETSAMP(CUSTNULL)
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINALT)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROALT)
//*
//********************************************************************
//*    CREATE PMA BATCH PROFILE MANAGEMENT CLUSTER
//********************************************************************
//APCBPM  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=SHR,DSN=CAMAT.PMA.CEETSAMP(CUSTNULL)
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINBPM)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROBPM)
//*

//********************************************************************
//*    CREATE PMA SQL STATEMENT CLUSTER
//********************************************************************
//APCSQL  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=SHR,DSN=CAMAT.PMA.CEETSAMP(CUSTNULL)
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINSQL)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROSQL)
//*
//********************************************************************
//*    CREATE PMA CICS MEASUREMENT DATA CLUSTER
//********************************************************************
//APCCIC  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=SHR,DSN=CAMAT.PMA.CEETSAMP(CUSTNULL)
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINCIC)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROCIC)
//*
//********************************************************************
//*    CREATE PMA CICS MEASUREMENT LISTING CLUSTER
//********************************************************************
//APCCPP  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINCPP)
//*
//********************************************************************
//*    CREATE PMA SCOPE DEFINITION CLUSTER (IN/EXCLUSIONS)
//********************************************************************
//APCEXC  EXEC PGM=IDCAMS
//SYSPRINT DD  SYSOUT=*
//TEMP     DD DISP=SHR,DSN=CAMAT.PMA.CEETSAMP(CUSTINEX)
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINEXC)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROEXC)
//*
//********************************************************************
//*    CREATE PMA IMS MEASUREMENT LISTING CLUSTER
//********************************************************************
//APCIMS  EXEC PGM=IDCAMS
//SYSPRINT DD  SYSOUT=*
//TEMP     DD DISP=SHR,DSN=CAMAT.PMA.CEETSAMP(CUSTNULL)
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINIMS)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROIMS)
//*

//********************************************************************
//*    CREATE PMA IMS MEASUREMENT LISTING CLUSTER
//********************************************************************
//APCIPP  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINIPP)
//*
//********************************************************************
//*    CREATE PMA JOB INFORMATION CLUSTER
//********************************************************************
//APCJOB  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=SHR,DSN=CAMAT.PMA.CEETSAMP(CUSTBLAN)
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINJOB)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROJOB)
//*
//********************************************************************
//*    CREATE PMA LOAD MODULE INFORMATION CLUSTER
//********************************************************************
//APCLMO  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=(OLD,PASS),DSN=&&BLANK24
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINLMO)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROLMO)
//*
//********************************************************************
//*    CREATE PMA CICS LOAD MODULE INFORMATION CLUSTER
//********************************************************************
//APCCMO  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=(OLD,PASS),DSN=&&BLANK24
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINCMO)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROCMO)
//*
//********************************************************************
//*    CREATE PMA IMS LOAD MODULE INFORMATION CLUSTER
//********************************************************************
//APCIMO  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=(OLD,PASS),DSN=&&BLANK24
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINIMO)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROIMO)
//*

//********************************************************************
//*    CREATE PMA BATCH MEASUREMENT EXTRACT CLUSTER
//********************************************************************
//APCPRO  EXEC PGM=IDCAMS
//SYSPRINT DD  SYSOUT=*
//TEMP     DD DISP=SHR,DSN=CAMAT.PMA.CEETSAMP(CUSTNULL)
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINPRO)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROPRO)
//*
//********************************************************************
//*    CREATE PMA CICS SMF/IMS INFO DICTIONARY CLUSTER
//********************************************************************
//APCDIC  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=SHR,DSN=CAMAT.PMA.CEETSAMP(CUSTNULL)
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINDIC)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPRODIC)
//*
//********************************************************************
//*    CREATE PMA CICS SMF/IMS INFO DATA CLUSTER
//********************************************************************
//APCCST  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=SHR,DSN=CAMAT.PMA.CEETSAMP(CUSTNULL)
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINCST)
//         DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROCST)
//*
//********************************************************************
//*    CREATE PMA SERVER CROSS COMMUNICATION CLUSTER
//********************************************************************
//APCCSC  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEFINCSC)
//*
//*-----------------------------------------------------------------*
//*  LOAD FIRST REC IN PMA       C I C S    P R O F I L E   P O O L *
//*-----------------------------------------------------------------*
//INIT1    EXEC  PGM=APCXAVI0
//STEPLIB  DD DISP=SHR,
//            DSN=CAMAT.PMA.CEETLOAD
//APCBIPP1 DD DISP=SHR,
//            DSN=CAMAT.PMA.RRDSCPP
//APCEREP  DD SYSOUT=*
//*

//*-----------------------------------------------------------------*
//*  LOAD FIRST REC IN PMA       I M S    P R O F I L E   P O O L   *
//*-----------------------------------------------------------------*
//INIT2    EXEC  PGM=APCXAVI0
//STEPLIB  DD DISP=SHR,
//            DSN=CAMAT.PMA.CEETLOAD
//APCBIPP1 DD DISP=SHR,
//            DSN=CAMAT.PMA.RRDSIPP
//APCEREP  DD SYSOUT=*
//*
//*-----------------------------------------------------------------*
//*  LOAD FIRST REC IN PMA       C S C    PMA-SERVER COMPONENT FILE *
//*-----------------------------------------------------------------*
//INIT3A   EXEC PGM=IEBDG
//SYSPRINT DD  SYSOUT=*
//SEQOUT   DD  DSNAME=&&REPIN,UNIT=SYSDA,DISP=(,PASS),
//             DCB=(RECFM=FB,LRECL=108,BLKSIZE=1080),
//             SPACE=(TRK,(1))
//SYSIN    DD  DATA
   DSD OUTPUT=(SEQOUT)
   CREATE QUANTITY=1,FILL=X'FF'
   END
/*
//INIT3B   EXEC PGM=IDCAMS
//SYSPRINT DD  SYSOUT=*
//IN       DD  DSN=&REPIN,DISP=(OLD,DELETE)
//OUT      DD  DSN=CAMAT.PMA.KSDSCSC,
//             DISP=OLD
//SYSIN    DD  *
 REPRO INFILE(IN) OUTFILE(OUT)
/*
//*
//********************************************************************
//*    WRITE PMA CUSTOMIZATION NOTIFICATION MESSAGE
//********************************************************************
//*
//NOTIFY   EXEC PGM=IEBGENER,COND=(0,NE)
//SYSUT1   DD DISP=SHR,
//            DSN=CAMAT.PMA.CUST(CUST$JOB)
//         DD *
2011/02/22 07:35  #8 CUSTJT08   CREATE PMA DATA CLUSTER - SUCCESSFUL
//SYSUT2   DD DISP=SHR,
//            DSN=CAMAT.PMA.CUST(CUST$JOB)
//SYSIN    DD DUMMY
//SYSPRINT DD SYSOUT=*

Review the JCL in the CUSTJT08 job.
Choose one of the following actions:
- Submit the job to start the creation of the data cluster. After the job has finished, press Enter to leave the job display.
  After the succesful execution of job CUSTJT08, Step 8 is marked as COMPLETED, as shown following, and you can continue with Step 9.
```
 CUSTPT00 ------------------- PMA V90 Customization Dialog ---------------
 COMMAND ===> 9

      Step                                                Status
      ===============================================================
       8 Create PMA Data Cluster                          COMPLETED
```
- Specify CANCEL to go back to the Customization Main Menu without saving any entered value.
The status of Step 8 stays NOT COMPLETED.