|
|
| |
|
VSAM File Tuning, ICF/VSAM Catalog Reporting, VTOC
Display and Modification |
|
CBLVCAT Examples Menu
Continuing from the previous example, your IDCAMS DEFINE decks and job control can be ready and
waiting before the new system arrives, simply by adding the DEFINE parameter.
Equally simple is the addition of a 2nd extra parameter (to set CBLVCSW6) which will generate
Backup and Restore JCL, using SELCOPY (CBL's main product), around the IDCAMS define deck.
The CBLVCAT output file below shows MVS job control. Equivalent VSE job control is produced when
TUNE=VSE is used.
|
//CBLDEF01 JOB
//JOBCAT DD DSN=CBL111.USER.PROD.CATALOG,DISP=SHR
//STEP2 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
*** WARN 015 *** LARGE AVLRECL CHANGE
*** WARN 019 *** SKELETON DECK ONLY - ATTENTION REQUIRED
/* DEL FILE.TO.MODEL - */
/* CLUSTER - */
/* PURGE - */
/* CATALOG (CBL111.USER.PROD.CATALOG) */
DEF CLUSTER (NAME (FILE.TO.MODEL) /**/ -
INDEXED /* KSDS */ -
BUFFERSPACE ( 40960) -
/* BUFFERSPACE ( 32768) */ -
RECORDSIZE ( 188, 617) -
/* RECORDSIZE ( 617, 617) */ -
SPEED -
TO ( 99366) -
NOWRITECHECK -
NONSPANNED -
FREESPACE ( 0, 1) -
KEYS ( 26, 0) -
NOIMBED -
NOREPLICATE -
SHAREOPTIONS (2,3) -
NOERASE -
UNORDERED -
NOREUSE -
USECLASS (0 P) -
SUBALLOCATION -
NODESTAGEWAIT -
STAGE -
) -
DATA (NAME (FILE.TO.MODEL.DATA) -
VOLUMES ('CBL111' -
'CBL475' -
) -
CISZ (18432) -
/* CISZ (14336) */ -
CYLINDERS ( 106, 14) -
/* CYLINDERS ( 120, 10) */ -
) -
INDEX (NAME (FILE.TO.MODEL.INDEX) -
VOLUMES ('CBL111' -
'CBL475' -
) -
CISZ ( 1024) -
) -
CATALOG (CBL111.USER.PROD.CATALOG)
/*
|
|
|
Notes:
This SYSPUNCH/IJSYSPH output is obtained by the addition of the parameter
DEFINE to the control cards for the previous example and contains the
IDCAMS DEFINE deck necessary to implement the Modelling recommendations made.
The original values are shown in comment form, allowing the user to easily
identify any changes that have been made.
The DEFINE parameter, used without the TUNE parameter, allows the user to
retrieve up to date definitions directly from the catalog, eliminating the
possibilty of re-introducing back level attributes.
For brevity, the Alternate Index has been excluded from this example (by
coding TYPE=K to restrict output to KSDS).
|
|
|
|
|
|
