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;
/*