z/OS DFSMS OAM Planning, Installation, and Storage Administration Guide for Object Support
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


CBRSMR1B

z/OS DFSMS OAM Planning, Installation, and Storage Administration Guide for Object Support
SC23-6866-00

The CBRSMR1B job, as shown here, adds three new columns, ODSTATF, ODRETDT and ODINSTID to the DB2 table.

//CBRSMR1B  JOB MSGLEVEL=(1,1),MSGCLASS=A
//*********************************************************************
//*
//*  $SEG(SMR1B) COMP(DBM) PROD(OAM):
//*
//*  OAM DB2 Database Migration Job (for the Object Storage
//*  Databases).
//*
//*  ---------------------------------------------------------------
//*  ---------------------------------------------------------------
//*
//*  SMR1B
//*
//*  This job will perform the migration from the z/OS V1 R10
//*  version of the Object Storage Database to the z/OS V1 R11
//*  version which supports DB2 large objects.
//*
//*  This job will:
//*   1. add new columns ODSTATF, ODRETDT and ODINSTID to the
//*      existing object directory table.
//*
//*  It is recommended that you create a DB2 image copy of the
//*  existing hlq.OSM_OBJ_DIR table prior to executing this
//*  migration job for recovery purposes.
//*
//*  Before running this job, you must change the following:
//*
//*    1.Change the name in the DSN SYSTEM(DB2) statement to
//*      the name of the DB2 Subsystem in your installation.
//*
//*    2.Change the PLAN name (DSNTIA91) in the RUN statement to
//*      match your current DB2 version and release level.
//*
//*    3.Change the data set name in the RUN statement
//*      LIB('DB2MINI.V9R1M0.RUNLIB.LOAD') phrase to the data set name
//*      used in your installation for the DB2 RUNLIB.LOAD data set.
//*
//*    4.Change the high level qualifier (hlq) in the ALTER
//*       statements of the table 'hlq.OSM_OBJ_DIR' to
//*       match the database name the table lives in.
//*
//*    5.Change the high level qualifier (hlq) in the DROP and CREATE
//*      VIEW statements for 'hlq.V_OSM_OBJ_DIR' and 'hlq.OSM_OBJ_DIR'
//*      to match the database name the table lives in.
//*
//*    6. Add a new ALTER, LABEL, DROP and CREATE statement for every
//*       object storage database.
//*
//*
//*  CHANGE ACTIVITY:
//*    $L0=HDZ1A11  R1B 080410 TUCBLC: Initial Release
//*    $P0=K1B0208  R1B 080806 TUCBLC: Default date to '0001-01-01'
//*    $P1=K1B0452  R1B 081002 TUCBLC: Prolog changes
//*
//*********************************************************************
//*********************************************************************
//*  Alter the hlq.OSM_OBJ_DIR table to add the
//*  ODSTATF, ODRETDT and ODINSTID column definitions.
//*********************************************************************
//ALTERTAB EXEC PGM=IKJEFT01,DYNAMNBR=20,COND=(4,LT)
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD *
 DSN SYSTEM(DB2)
 RUN  PROGRAM(DSNTIAD) PLAN(DSNTIA91) -
      LIB('DB2MINI.V9R1M0.RUNLIB.LOAD')
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN    DD *

 ALTER TABLE hlq.OSM_OBJ_DIR ADD ODSTATF
             SMALLINT NOT NULL WITH DEFAULT;
 ALTER TABLE hlq.OSM_OBJ_DIR ADD ODRETDT
             DATE NOT NULL WITH DEFAULT '0001-01-01';
 ALTER TABLE hlq.OSM_OBJ_DIR ADD ODINSTID
             INTEGER NOT NULL WITH DEFAULT;

 COMMIT;
/*
//*********************************************************************
//*  DROP and CREATE the hlq.V_OSM_OBJ_DIR table view
//*********************************************************************
//REFRESHV EXEC PGM=IKJEFT01,DYNAMNBR=20,COND=(4,LT)
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD *
 DSN SYSTEM(DB2)
 RUN  PROGRAM(DSNTIAD) PLAN(DSNTIA91) -
      LIB('DB2MINI.V9R1M0.RUNLIB.LOAD')
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN    DD *
  DROP VIEW hlq.V_OSM_OBJ_DIR;

  CREATE VIEW
         hlq.V_OSM_OBJ_DIR
       AS SELECT ALL * FROM
         hlq.OSM_OBJ_DIR;
  COMMIT;
/*

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014