DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
23
doestax.prod.appl.parmlib/CHGDD030
Normal file
23
doestax.prod.appl.parmlib/CHGDD030
Normal file
@ -0,0 +1,23 @@
|
||||
DEL- 00010024
|
||||
DOESTAX.PROD.VSAM.CHGM030- 00020036
|
||||
NOERASE 00030024
|
||||
00040024
|
||||
IF LASTCC=8 THEN- 00050024
|
||||
SET MAXCC=0 00060024
|
||||
00070024
|
||||
DEFINE- 00080024
|
||||
CLUSTER(- 00090024
|
||||
NAME (DOESTAX.PROD.VSAM.CHGM030)- 00100036
|
||||
KEY (16,0)- 00110034
|
||||
RECSZ (22,22)- 00120034
|
||||
CYL (300,75) - 00130038
|
||||
FREESPACE (15 10)- 00140024
|
||||
SHR (2,3)- 00150024
|
||||
SPEED- 00160024
|
||||
VOL (*,*,*,*)- 00170039
|
||||
UNQ) - 00180024
|
||||
DATA - 00190024
|
||||
(NAME(DOESTAX.PROD.VSAM.CHGM030.DATA))- 00200036
|
||||
INDEX - 00210024
|
||||
(NAME(DOESTAX.PROD.VSAM.CHGM030.INDEX)- 00220036
|
||||
CISZ(1024)) 00230024
|
||||
Reference in New Issue
Block a user