Where is the sample JCL to run Block Size Alter 24x7 (BA24). What are the steps to run a BA24?
Release : 15.1
Component : DATACOM/DB
The Block Size Alter (BA24) feature runs entirely in the MUF, it moves all rows in an area to a new target area.
The BA24 process is started by running a DDUPDATE 1000 ALTER transaction so there is no specific sample JCL for it.
Here is a summary of the steps to perform a Block Size Alter (BA24):
//PREINI14 JOB . . .
//*-----------------------------------------------------------------**
//JOBLIB . . .
//*-----------------------------------------------------------------**
//* ********************************************
//* ALLOCATE THE TARGET DATA AREA
//* ********************************************
//ALLOC EXEC PGM=IEFBR14
//DEM001T DD DSN=DCMQA.QAMUF4.DEM001.ASOF0604,DISP=(NEW,CATLG),
// SPACE=(TRK,(0001,01)),UNIT=(WORK)
//*
//* ********************************************
//* PREINIT THE TARGET DATA AREA
//* ********************************************
//PREINIT EXEC PGM=DBUTLTY
//DEM001 DD DSN=DCMQA.QAMUF4.DEM001.ASOF0604,DISP=(SHR)
//SYSIN DD *
PREINIT DBID=001,AREA=DEM,BLKSIZE=4096
/*
//* ********************************************
//* ALLOCATE THE TARGET INDEX AREA
//* ********************************************
//ALLOC EXEC PGM=IEFBR14
//IXX001T DD DSN=DCMQA.QAMUF4.IXX001.ASOF0606,DISP=(NEW,CATLG),
// SPACE=(TRK,(0001,01)),UNIT=(WORK)
//*
//* ********************************************
//* PREINIT THE TARGET INDEX AREA
//* ********************************************
//PREINIT EXEC PGM=DBUTLTY
//IXX001 DD DSN=DCMQA.QAMUF4.IXX001.ASOF0606,DISP=(SHR)
//SYSIN DD *
PREINIT DBID=001,AREA=IXX,IXXAREA=IXX
/*
//SYSIN DD *Where nnnn is the new block size and must be the same block size used in the PREINIT.
-UPD AREA,areaname(PROD)
1000 ALTER
1500 BLOCKSIZE,nnnn
-END
/*
For full documentation see section Performing a Block Size Alter 24x7