DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
23
doestax.prod.appl.parmlib/DTSDWWGH
Normal file
23
doestax.prod.appl.parmlib/DTSDWWGH
Normal file
@ -0,0 +1,23 @@
|
||||
DEL-
|
||||
DOESTAX.PROD.VSAM.TAXWGH-
|
||||
NOERASE
|
||||
|
||||
IF LASTCC=8 THEN-
|
||||
SET MAXCC=0
|
||||
|
||||
DEFINE-
|
||||
CLUSTER(-
|
||||
NAME (DOESTAX.PROD.VSAM.TAXWGH)-
|
||||
KEYS (12,0)-
|
||||
RECSZ (23,23)-
|
||||
CYL (300,50)-
|
||||
FREESPACE (10 10)-
|
||||
SHR (2,3)-
|
||||
SPEED-
|
||||
VOL (DES39P,DES39O)-
|
||||
UNQ)-
|
||||
DATA -
|
||||
(NAME(DOESTAX.PROD.VSAM.TAXWGH.DATA))-
|
||||
INDEX -
|
||||
(NAME(DOESTAX.PROD.VSAM.TAXWGH.INDEX)-
|
||||
CISZ(1024))
|
||||
Reference in New Issue
Block a user