Template:VSE M204CATP: Difference between revisions
(Automatically generated page update) |
(Automatically generated page update) |
||
| (2 intermediate revisions by the same user not shown) | |||
| Line 3: | Line 3: | ||
You've been warned.--> | You've been warned.--> | ||
<p class="code"><nowiki>// JOB M204CATP | <p class="code"><nowiki>// JOB M204CATP | ||
/* M204CATP allocates VSAM managed space for the Model 204 | /* M204CATP allocates VSAM managed space for the Model 204 | ||
/* library, defines the sublibraries and catalogs | /* library, defines the sublibraries and catalogs | ||
| Line 16: | Line 12: | ||
/* user.cat - user catalog | /* user.cat - user catalog | ||
/* volume - volume serial of dataset | /* volume - volume serial of dataset | ||
/* | |||
/* (-- For Rocket Support only: filename=M204CATP 7.7 2016/11/14 --) | |||
/* | /* | ||
// OPTION NODUMP | // OPTION NODUMP | ||
// DLBL IJSYSUC,'user.cat',,VSAM | // DLBL IJSYSUC,'user.cat',,VSAM | ||
// DLBL M204LIB,'M204LIB. | // DLBL M204LIB,'M204LIB.V770.LIBRARY',,VSAM | ||
// EXEC IDCAMS,SIZE=AUTO | // EXEC IDCAMS,SIZE=AUTO | ||
DEFINE CLUSTER ( - | DEFINE CLUSTER ( - | ||
NAME (M204LIB. | NAME (M204LIB.V770.LIBRARY ) - | ||
TRACKS ( | TRACKS (1200 100 ) - | ||
SHAREOPTIONS (3) - | SHAREOPTIONS (3) - | ||
RECORDFORMAT (NOCIFORMAT ) - | RECORDFORMAT (NOCIFORMAT ) - | ||
| Line 30: | Line 28: | ||
NONINDEXED - | NONINDEXED - | ||
TO (99366)) - | TO (99366)) - | ||
DATA (NAME (M204LIB. | DATA (NAME (M204LIB.V770.LIBRARY.@D@ ) ) | ||
LISTC ENT (M204LIB. | LISTC ENT (M204LIB.V770.LIBRARY ) ALL | ||
/* | /* | ||
// EXEC LIBR | // EXEC LIBR | ||
DEFINE LIB=M204LIB /* REPLACE=YES */ | DEFINE LIB=M204LIB /* REPLACE=YES */ | ||
DEFINE SUBLIB=M204LIB. | DEFINE SUBLIB=M204LIB.V770 REUSE=IMMEDIATE | ||
DEFINE SUBLIB=M204LIB. | DEFINE SUBLIB=M204LIB.J770 REUSE=IMMEDIATE | ||
ACCESS S=IJSYSRS.SYSLIB | ACCESS S=IJSYSRS.SYSLIB | ||
| Line 43: | Line 41: | ||
* M204JCL PROC: ACCESS THE M204 JCL SUBLIB | * M204JCL PROC: ACCESS THE M204 JCL SUBLIB | ||
// DLBL IJSYSUC,'user.cat',,VSAM | // DLBL IJSYSUC,'user.cat',,VSAM | ||
// DLBL M204LIB,'M204LIB. | // DLBL M204LIB,'M204LIB.V770.LIBRARY',,VSAM,CAT=IJSYSUC | ||
/+ | /+ | ||
ACCESS S=M204LIB. | ACCESS S=M204LIB.V770 | ||
CATALOG | CATALOG M204V770.PROC REPLACE=YES | ||
* | * M204V770 PROC: ACCESS THE M204 SUBLIBS | ||
// DLBL M204LIB,'M204LIB. | // DLBL M204LIB,'M204LIB.V770.LIBRARY',,VSAM | ||
/+ | /+ | ||
/* | /* | ||
/& | /& | ||
</nowiki></p> | </nowiki></p> | ||
Latest revision as of 21:29, 14 November 2016
// JOB M204CATP /* M204CATP allocates VSAM managed space for the Model 204 /* library, defines the sublibraries and catalogs /* the two Model 204 procedures. /* /* To adapt this procedure to your installation: /* 1. Modify JOB statement /* 2. Modify the following in the job stream: /* user.cat - user catalog /* volume - volume serial of dataset /* /* (-- For Rocket Support only: filename=M204CATP 7.7 2016/11/14 --) /* // OPTION NODUMP // DLBL IJSYSUC,'user.cat',,VSAM // DLBL M204LIB,'M204LIB.V770.LIBRARY',,VSAM // EXEC IDCAMS,SIZE=AUTO DEFINE CLUSTER ( - NAME (M204LIB.V770.LIBRARY ) - TRACKS (1200 100 ) - SHAREOPTIONS (3) - RECORDFORMAT (NOCIFORMAT ) - VOLUMES (volume) - NOREUSE - NONINDEXED - TO (99366)) - DATA (NAME (M204LIB.V770.LIBRARY.@D@ ) ) LISTC ENT (M204LIB.V770.LIBRARY ) ALL /* // EXEC LIBR DEFINE LIB=M204LIB /* REPLACE=YES */ DEFINE SUBLIB=M204LIB.V770 REUSE=IMMEDIATE DEFINE SUBLIB=M204LIB.J770 REUSE=IMMEDIATE ACCESS S=IJSYSRS.SYSLIB CATALOG M204JCL.PROC REPLACE=YES * M204JCL PROC: ACCESS THE M204 JCL SUBLIB // DLBL IJSYSUC,'user.cat',,VSAM // DLBL M204LIB,'M204LIB.V770.LIBRARY',,VSAM,CAT=IJSYSUC /+ ACCESS S=M204LIB.V770 CATALOG M204V770.PROC REPLACE=YES * M204V770 PROC: ACCESS THE M204 SUBLIBS // DLBL M204LIB,'M204LIB.V770.LIBRARY',,VSAM /+ /* /&