This process reorganizes the database by executing the reorganization process of CA IDMS/DB Reorg as one VSE/ESA job step.
* SAMPLE JCL TO REORGANIZE A DATABASE USING NEW AREAS * * LIBRARY DEFINITIONS * // DLBL DBMS,'your.loadlib' // EXTENT ,volser // DLBL IDMS,'idms.loadlib' // EXTENT ,volser // LIBDEF *,SEARCH=(DBMS.sublib,IDMS.sublib) * * SORT WORK FILES * * THERE ARE SIX SEPARATE SORTS IN THIS PORTION OF DB/REORG. IF * YOU ELECT TO ASSIGN THE SORTWKNN FILES TO DISK, ADJUST THE * SPACE REQUIREMENTS TO ACCOMMODATE THE LARGEST OF THESE SORT * INPUT FILES. THE REORG STEPS AND SORT INPUTS ARE AS FOLLOWS: * // DLBL SORTWK1,'SORT.WORK1',0,SD // EXTENT SYS001,,,reltrk,amount // ASSGN SYS001,DISK,VOL=volser,SHR // DLBL SORTWK2,'SORT.WORK2',0,SD // EXTENT SYS002,,,reltrk,amount // ASSGN SYS002,DISK,VOL=volser,SHR // DLBL SORTWK3,'SORT.WORK3',0,SD // EXTENT SYS003,,,reltrk,amount // ASSGN SYS003,DISK,VOL=volser,SHR // DLBL SORTWK4,'SORT.WORK4',0,SD // EXTENT SYS004,,,reltrk,amount // ASSGN SYS004,DISK,VOL=volser,SHR * * USER DATABASE FILES * // DLBL DBFIL01,'user.dbfile01',0,SD // EXTENT SYSnnn // ASSGN SYSnnn,DISK,VOL=volser,SHR
&invellip.
// DLBL DBFILNN,'user.dbfilenn',0,SD
// EXTENT SYSnnn
// ASSGN SYSnnn,DISK,VOL=volser,SHR * * VSAM WORK FILE *
// DLBL PAGUTIL,'vsam.work.space,0,SD
// EXTENT SYS014
// ASSGN SYS014,DISK,VOL=volser,SHR
*
* DB/REORG WORK FILES
*
* THERE ARE A NUMBER OF WORK FILES THAT ARE USED BY DB/REORG.
* THESE FILES VARY IN SIZE SO IT IS SUGGESTED THAT THE USER
* GUIDE OPERATION SECTION ON WORK FILES BE CONSULTED IF THE
* USER WISHES TO ASSIGN THE FILES TO DISK.
*
* A REMINDER:
* THE FOLLOWING FILES ARE SEQUENTIAL AND SO TAPE MAY PROVE A
* BETTER CHOICE IF DISK SPACE IS PROBLEMATIC. ALSO, STANDARD
* DCB PARAMATERS LIKE RECFM, LRECL AND BLKSIZE ARE HANDLED
* INTERNALLY BY THE UTILITY AND SHOULD NOT BE CODED ON THE JCL.
*
// DLBL dbmsnms,'work.files.dbmsnms',0,SD
// EXTENT SYSnnn
// ASSGN SYSnnn,DISK,VOL=volser,SHR
* * PARAMETER INPUT TO DB/REORG
*
// DLBL DBMSNMS,'WORK.FILES.dbmsnms',0,SD
// EXTENT SYSnnn
// ASSGN SYSnnn,DISK,VOL=volser,SHR
*
* CA INTERNAL FILES
*
// ASSGN SYS012,SYSLST
// ASSGN SYS013,SYSLST
*
* PARAMETER INPUT TO DB/REORG
*
// DLBL SYSIDMS,'#SYSIPT',0,SD
// EXEC USRDRVR,SIZE=(USRDRVR,#k)
*
* SYSIDMS PARAMETERS
* INCLUDE DMCL=newdmcl
/* PROCESS, OLDSUB=subschema-name,
NEWSUB=subschema-name,
OLDDMCL=dmcl-name,
NEWDMCL=dmcl-name,
OLDDBN=db-name,
NEWDBN=db-name, RESTART=NEXT
/*
/*
* $$ EOJ
Key for Sample JCL to Reorganize a Database:
|
Parameter |
Description |
|---|---|
|
your.loadlib |
The data set name of the core image library into which you downloaded CA IDMS/DB Reorg. |
|
idms.loadlib |
The data set name of the core image library in which your DMCL and subschema reside. |
|
volser |
The volume serial number or generic assignment of the disk volume on which the file, specified in the previous statement, resides. |
|
dbms.sublib /idms.sublib. |
The sublibrary name of the VSE/ESA library specified in the previous file name. |
|
reltrk |
The relative track or relative block number: the starting position on the DASD for storage of the work file specified in the previous statement. |
|
amount |
The space allocation you need to store the file specified in the previous statement. |
|
user.dbfile01 /user.dbfilenn |
The file ID of each of the database files to be accessed. |
|
dbmsnms |
The file names required by the CA IDMS/DB Reorg utility described earlier in this chapter. |
|
work.files.dbmsnms |
The file ID assigned to the work files used by the CA IDMS/DB Reorg utility. |
|
SYSnnn |
The programmer logical units of the database files to be accessed. |
|
#k |
The number of kilobytes of storage to be made available to the sort phase. |
|
newdmcl |
DMCL describing the database after the reorganization. |
|
subschema-name |
Two subschema names are required. The first subschema name (OLDSUB=) describes the database before reorganization. The second subschema name (NEWSUB=) describes the database after reorganization. |
|
dmcl-name |
Two DMCL names are required. The first DMCL name (OLDDMCL=) describes the database before reorganization. The second DMCL name (NEWDMCL=) describes the database after reorganization. |
|
area-name |
The name of an area to be reorganized by CA IDMS/DB Reorg. (You must include a COPY parameter statement for each area that is to be reorganized.) |
|
Copyright © 2014 CA.
All rights reserved.
|
|