Customization › Customization Steps › Step 12 – Upgrade › Upgrade from Version 4.6

Upgrade from Version 4.6

If you enter version 46, the JCL of job CUSTJ46 is displayed.

JOBCARD
//*
//*
//*
//********************************************************************
//* CUSTJ46:    COPY/CONVERT APC VSAM CLUSTER                        *
//* =========   FROM VERSION 4.6   TO VERSION 9.0                    *
//*                                                                  *
//* ACTION: REPLACE ALL  YOUR.APC46.ENV                              *
//* ======= WITH THE PREFIX OF YOUR APC 4.6   ENVIRONMENT            *
//*                                                                  *
//*------------------------------------------------------------------*
//* COPYRIGHT (C) 2012 CA. ALL RIGHTS RESERVED.                      *
//* COPYRIGHT (C) TRILOG AG.                                         *
//********************************************************************
//*
//********************************************************************
//*    CREATE REPRO FILES
//********************************************************************
//CRE1     EXEC PGM=IEFBR14
//TEMPKSDS DD DSN=CAMAT.PMA.REPKSDS,
//            DISP=(NEW,CATLG),
//            DCB=(LRECL=8189,RECFM=VB,BLKSIZE=8193),
//            SPACE=(CYL,(150,300)),
//            UNIT=SYSDA,
//            VOL=SER=VOL001
//TEMPRRDS DD DSN=CAMAT.PMA.REPRRDS,
//            DISP=(NEW,CATLG),
//            DCB=(LRECL=8160,RECFM=FB,BLKSIZE=8160),
//            SPACE=(CYL,(150,300)),
//            UNIT=SYSDA,
//            VOL=SER=VOL001
//*

//********************************************************************
//*  COPY EXCLUSION CLUSTER -KSDSEXC-
//********************************************************************
//EXC1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//IN       DD  DSN=YOUR.APC46.ENV.KSDSEXC,DISP=OLD
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//EXC2     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(DEDEFEXC),DISP=SHR
//*
//EXC4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(REPROEXC),DISP=SHR
//*
//********************************************************************
//*  COPY LOAD MODULE INFORMATION CLUSTER -KSDSLMO-
//********************************************************************
//LMO1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//IN       DD  DSN=YOUR.APC46.ENV.KSDSLMO,DISP=OLD
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//LMO2     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(DEDEFLMO),DISP=SHR
//*
//LMO4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(REPROLMO),DISP=SHR
//*
//********************************************************************
//*  COPY CICS LOAD MODULE INFORMATION CLUSTER -KSDSCMO-
//********************************************************************
//CMO1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//IN       DD  DSN=YOUR.APC46.ENV.KSDSCMO,DISP=OLD
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//CMO2     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(DEDEFCMO),DISP=SHR
//*
//CMO4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(REPROCMO),DISP=SHR
//*

//********************************************************************
//*  COPY IMS LOAD MODULE INFORMATION CLUSTER -KSDSIMO-
//********************************************************************
//IMO1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//IN       DD  DSN=YOUR.APC46.ENV.KSDSIMO,DISP=OLD
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//IMO2     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(DEDEFIMO),DISP=SHR
//*
//IMO4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(REPROIMO),DISP=SHR
//*
//********************************************************************
//*  COPY ALERT CLUSTER -KSDSALT-
//********************************************************************
//ALT1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//IN       DD  DSN=YOUR.APC46.ENV.KSDSALT,DISP=OLD
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//ALT2     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(DEDEFALT),DISP=SHR
//*
//ALT4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(REPROALT),DISP=SHR
//*
//********************************************************************
//*  COPY BATCH MEASUREMENT DATA CLUSTER -KSDSPRO-
//********************************************************************
//PRO1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//IN       DD  DSN=YOUR.APC46.ENV.KSDSPRO,DISP=OLD
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//PRO2     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(DEDEFPRO),DISP=SHR
//*
//PRO4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(REPROPRO),DISP=SHR
//*

//********************************************************************
//*  COPY BATCH MEASUREMENT INFO CLUSTER -KSDSBPM-
//********************************************************************
//BPM1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//IN       DD  DSN=YOUR.APC46.ENV.KSDSBPM,DISP=OLD
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//BPM2     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(DEDEFBPM),DISP=SHR
//*
//BPM4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD  DSN=CAMAT.PMA.REPKSDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(REPROBPM),DISP=SHR
//*
//********************************************************************
//*  COPY JOB CLUSTER -KSDSJOB-
//********************************************************************
//JOB1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//IN       DD DSN=YOUR.APC46.ENV.KSDSJOB,DISP=OLD
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//JOB2     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEDEFJOB)
//*
//JOB4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROJOB)
//*
//********************************************************************
//*  COPY CICS MEASUREMENT LIST CLUSTER -RRDSCPP-
//********************************************************************
//CICPRO1  EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//IN       DD  DSN=YOUR.APC46.ENV.RRDSCPP,DISP=OLD
//TEMP     DD  DSN=CAMAT.PMA.REPRRDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR

/*
//CICPRO2  EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(DEDEFCPP),DISP=SHR
//*
//CICPRO4  EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//IN       DD  DSN=CAMAT.PMA.REPRRDS,DISP=OLD
//TEMP     DD  DSN=CAMAT.PMA.RRDSCPP,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*

//********************************************************************
//*  COPY CICS MEASUREMENT DATA CLUSTER -KSDSCIC-
//********************************************************************
//CICS1    EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//IN       DD DISP=OLD,DSN=YOUR.APC46.ENV.KSDSCIC
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//CICS2    EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEDEFCIC)
//*
//CICS4    EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROCIC)
//*
//********************************************************************
//*  COPY IMS MEASUREMENT LIST CLUSTER -RRDSIPP-
//********************************************************************
//IMSPRO1  EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//IN       DD  DSN=YOUR.APC46.ENV.RRDSIPP,DISP=OLD

//TEMP     DD  DSN=CAMAT.PMA.REPRRDS,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//IMSPRO2  EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(DEDEFIPP),DISP=SHR
//*
//IMSPRO4  EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//IN       DD  DSN=CAMAT.PMA.REPRRDS,DISP=OLD
//TEMP     DD  DSN=CAMAT.PMA.RRDSIPP,DISP=OLD
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//********************************************************************
//*  COPY IMS  MEASUREMENT DATA CLUSTER -KSDSIMS-
//********************************************************************
//IMS1     EXEC PGM=IDCAMS,COND=(0,NE)

//IN       DD DISP=OLD,DSN=YOUR.APC46.ENV.KSDSIMS
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//IMS2     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*

//*
//IMS4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROIMS)
//

//********************************************************************
//*  COPY SQL STATEMENT CLUSTER -KSDSSQL-
//********************************************************************
//SQL1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//IN       DD DISP=OLD,DSN=YOUR.APC46.ENV.KSDSSQL
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//SQL2     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSIN DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEDEFSQL)
//*
//SQL4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROSQL)
//*
//********************************************************************
//* CONVERT CICS SMF DICTIONARY CLUSTER -KSDSDIC-                    *
//********************************************************************
//DIC1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//IN       DD DISP=OLD,DSN=YOUR.APC46.ENV.KSDSDIC
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//DIC2    EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEDEFDIC)
//*
//DIC4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPRODIC)
//*
//********************************************************************
//* CONVERT CICS SMF DATA CLUSTER -KSDSCST-                          *
//********************************************************************
//CST1     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//IN       DD DISP=OLD,DSN=YOUR.APC46.ENV.KSDSCST
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD  DSN=CAMAT.PMA.CNTL(APCXCREP),DISP=SHR
//*
//CST2    EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(DEDEFCST)
//*
//CST4     EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//TEMP     DD DISP=OLD,DSN=CAMAT.PMA.REPKSDS
//SYSIN    DD DISP=SHR,DSN=CAMAT.PMA.CNTL(REPROCST)
//*

//********************************************************************
//*    DELETE REPRO FILES
//********************************************************************
//DEL1     EXEC PGM=IEFBR14
//DELKSDS  DD DSN=CAMAT.PMA.REPKSDS,
//            DISP=(MOD,DELETE),
//            DCB=(LRECL=8189,RECFM=VB,BLKSIZE=8193),
//            SPACE=(CYL,(150,150)),
//            UNIT=SYSDA,
//            VOL=SER=VOL001
//DELRRDS  DD DSN=CAMAT.PMA.REPRRDS,
//            DISP=(MOD,DELETE),
//            DCB=(LRECL=8160,RECFM=FB,BLKSIZE=8160),
//            SPACE=(CYL,(150,150)),
//            UNIT=SYSDA,
//            VOL=SER=VOL001
//*
//********************************************************************
//*    WRITE CONVERT NOTIFY MESSAGES TO INSTALLATION LOG
//********************************************************************
//*
//NOTIFY   EXEC PGM=IEBGENER,COND=(0,NE)
//SYSUT1   DD DISP=SHR,DSN=CAMAT.PMA.CUST(CUST$JOB)
//         DD *
2010/10/29 07:11  #8 CUSTJ46    CONVERT UPGRADED DATA    - EXECUTED
//SYSUT2   DD DISP=SHR,DSN=CAMAT.PMA.CUST(CUST$JOB)
//SYSIN    DD DUMMY
//SYSPRINT DD SYSOUT=* 

1. Adjust the data set names of the VSAM clusters of the previous 4.6 version.
2. Submit the job.

   After the successful execution of the upgrade job, Step 12 is marked as COMPLETED, as shown following.

    CUSTPT00 ------------------- PMA V90 Customization Dialog ---------------
    COMMAND ===>
   
         Step                                                Status
         ===============================================================
         12 Upgrade                                          COMPLETED