DB2 is Down Please issue a start

[madhan_17]

Hi Sysprog,

DB8G is Down after a job Testing. Please start DB2. I do not have Authority to start DB2 . Can u provide mw access to this Command.

[prino]

DB8G is Down after a job Testing. Please start DB2.

And you cannot be bothered to tell us what you did to bring DB2 down?

FWIW, why are you mucking around with DB2 datasets?????

Code: Select all

//N243617  JOB (12345678),N243617,MSGCLASS=H,
//        MSGLEVEL=(1,1),CLASS=A,NOTIFY=&SYSUID
//***************************************************************
//***************JCL CREATED BY MADHAN  *********************
//***************************************************************
//RENAME     EXEC  PGM=IDCAMS
//SYSPRINT   DD    SYSOUT=*
//SYSUDUMP   DD    SYSOUT=*
//SYSIN      DD    *
    ALTER DSN810.BSDS01                        -
      NEWNAME(DSN810.BSDS01.OLD)
    ALTER DSN810.BSDS01.DATA                   -
      NEWNAME(DSN810.BSDS01.DATA.OLD)
    ALTER DSN810.BSDS01.INDEX                  -
      NEWNAME(DSN810.BSDS01.INDEX.OLD)

    ALTER DSN810.BSDS02                        -
      NEWNAME(DSN810.BSDS02.OLD)
    ALTER DSN810.BSDS02.DATA                   -
      NEWNAME(DSN810.BSDS02.DATA.OLD)
    ALTER DSN810.BSDS02.INDEX                  -
      NEWNAME(DSN810.BSDS02.INDEX.OLD)
//ALLOC      EXEC  PGM=IDCAMS,COND=(4,LT)
//SYSPRINT   DD    SYSOUT=*
//SYSUDUMP   DD    SYSOUT=*
//SYSIN      DD    *
           DEFINE CLUSTER                             -
                 ( NAME(DSN810.BSDS01)                -
                   VOLUMES(DBLT18)                    -
                   REUSE                              -
                   SHAREOPTIONS(2 3) )                -
              DATA                                    -
                 ( NAME(DSN810.BSDS01.DATA) -
                   CYLINDERS(15 15)                   -
                   RECORDSIZE(4089 4089)              -
                   CONTROLINTERVALSIZE(4096)          -
                   FREESPACE(0 20)                    -
                   KEYS(4 0) )                        -
                  INDEX                                   -
                   ( NAME(DSN810.BSDS01.INDEX) -
                                CYLINDERS(5 5)                     -
                                 CONTROLINTERVALSIZE(1024) )
                   DEFINE CLUSTER                             -
                            ( NAME(DSN810.BSDS02)                -
                              VOLUMES(DBLT19)                    -
                              REUSE                              -
                              SHAREOPTIONS(2 3) )                -
                         DATA                                    -
                            ( NAME(DSN810.BSDS02.DATA) -
                              CYLINDERS(15 15)                   -
                              RECORDSIZE(4089 4089)              -
                              CONTROLINTERVALSIZE(4096)          -
                              FREESPACE(0 20)                    -
                              KEYS(4 0) )                        -
     INDEX                                   -
               ( NAME(DSN810.BSDS02.INDEX) -
                   CYLINDERS(5 5)                     -
                 CONTROLINTERVALSIZE(1024) )

//REPRO1    EXEC PGM=IDCAMS,COND=(4,LT)
//SYSPRINT  DD  SYSOUT=*
//DD1       DD  DISP=OLD,DSN=DSN810.BSDS01.OLD,DCB=BUFNO=20
//DD2       DD  DISP=OLD,DSN=DSN810.BSDS01,DCB=BUFNO=20
//SYSIN     DD  *
        REPRO INFILE(DD1) OUTFILE(DD2)
//REPRO2    EXEC PGM=IDCAMS,COND=(4,LT)
//SYSPRINT  DD  SYSOUT=*
//DD1       DD  DISP=OLD,DSN=DSN810.BSDS02.OLD,DCB=BUFNO=20
//DD2       DD  DISP=OLD,DSN=DSN810.BSDS02,DCB=BUFNO=20
//SYSIN     DD  *
   REPRO INFILE(DD1) OUTFILE(DD2)
//*-------------------------------------------------------------------*
//CONVRT   EXEC PGM=DSNJCNVB,COND=(4,LT)
//STEPLIB  DD  DISP=SHR,DSN=DSN810.SDSNEXIT
//         DD  DISP=SHR,DSN=DSN810.SDSNLOAD
//SYSUT1   DD  DISP=OLD,DSN=DSN810.BSDS01
//SYSUT2   DD  DISP=OLD,DSN=DSN810.BSDS02
//SYSPRINT DD  SYSOUT=*

I do not have Authority to start DB2 . Can u provide mw access to this Command.

I think sysprog will have to be hospitalized with jaw-dislocation due to excessive laughter if he reads this request...

[madhan_17]

I have to test a job for expanding log datasets for db2.The Changes will take effect only after Db2 is Brought down.So i stopped DB2 and tried to start again but did not have the authority to start. Most of my jobs for DB2 involve stopping DB2 and starting it again. So just wanted to Clarify Whether i can get the Grant permit for the Command.

[madhan_17]

Sorry if had mishandled anything. Just wanted to test the job. Will avoid jobs involving DB2 Datasets.