hi,
i have a vsam file that i want to duplicate with 2 bytes longer.
i copied it to a sam file, added the two bytes and now, want something similar to the first one.
i use this jcl, but for some reason, i have a
this message "INSUFFICIENT SUBALLOCATION DATA SPACE
** VSAM CATALOG RETURN CODE IS 156 - REASON CODE IS IGG0CLAU-0"
a copied the jcl i am using from the jcl that created the first file, changing the size of the record.
thanks for the help.
claudeb
my jcl for the second file is as follow:
-----------------------------
* $$ JOB JNM=DELDEF,DISP=D,CLASS=M,XDEST=NETALT,USER=CLAUDE
* $$ LST CLASS=B,FNO=F502,DEST=(NETALT,MALIKA),JSEP=1
// JOB DELDEF
// EXEC IDCAMS,SIZE=AUTO
. DEL (ING532.SP.CFHI4Y) -
. CL PRG -
. CAT(INGENIUM.VSAM.CAT.TEST INGTST ) -
. ;
. DEF CL(NAME(ING532.SP.CFHI4Y) -
. TO(99365) BUFSP(010752) -
. NRUS -
. ) -
. IX(NAME(ING532.SP.CFHI4Y.INDEX) -
. TRK(00000005 00000001) USCL(0 ) -
. CISZ(02560 ) SHR(3 3) -
. ) -
. DATA(NAME(ING532.SP.CFHI4Y.DATA) -
. SPEED FSPC(020 010)KEYS(037 00000) -
. CYL(00001000 00000100) USCL(0 ) -
. CISZ(04096 ) SHR(3 3) RECSZ(00302 00515) -
. ) -
. CAT(INGENIUM.VSAM.CAT.TEST INGTST ) -
. ;
.
/*
/&
* $$ EOJ
-------------------------------
FIRST FILE
------------------------------
DATA Allocation ASMWK1 3390 TRKS
Prim/Secnd Alloc 15002/1508
Active Extents 1
Control Interval 4096
Avge/Max RECSZ 300/513
Records Total 450827
Deleted 0
Inserted 0
Updated 0
Accessed 5538905
Data EXCPS 102654
CI/CA Freespace 20/10
CI-splits/ % inserts 0/0
CA-splits/ % inserts 0/0
---------
INDEX Allocation DOSRES 3390 TRKS
Prim/Secnd Alloc 5/1
Active Extents 25
Control Interval 2560
KEY Length/Posn 37/0
Total records 545
Index levels 3
Index EXCPS 11533
Option NOIMBED
Option NOREPLICATE
Shareoption (3 3)
High-used-RBA 327.3M
High-alloc RBA 703.3M
-----
i have a vsam file that i want to duplicate with 2 bytes longer.
i copied it to a sam file, added the two bytes and now, want something similar to the first one.
i use this jcl, but for some reason, i have a
this message "INSUFFICIENT SUBALLOCATION DATA SPACE
** VSAM CATALOG RETURN CODE IS 156 - REASON CODE IS IGG0CLAU-0"
a copied the jcl i am using from the jcl that created the first file, changing the size of the record.
thanks for the help.
claudeb
my jcl for the second file is as follow:
-----------------------------
* $$ JOB JNM=DELDEF,DISP=D,CLASS=M,XDEST=NETALT,USER=CLAUDE
* $$ LST CLASS=B,FNO=F502,DEST=(NETALT,MALIKA),JSEP=1
// JOB DELDEF
// EXEC IDCAMS,SIZE=AUTO
. DEL (ING532.SP.CFHI4Y) -
. CL PRG -
. CAT(INGENIUM.VSAM.CAT.TEST INGTST ) -
. ;
. DEF CL(NAME(ING532.SP.CFHI4Y) -
. TO(99365) BUFSP(010752) -
. NRUS -
. ) -
. IX(NAME(ING532.SP.CFHI4Y.INDEX) -
. TRK(00000005 00000001) USCL(0 ) -
. CISZ(02560 ) SHR(3 3) -
. ) -
. DATA(NAME(ING532.SP.CFHI4Y.DATA) -
. SPEED FSPC(020 010)KEYS(037 00000) -
. CYL(00001000 00000100) USCL(0 ) -
. CISZ(04096 ) SHR(3 3) RECSZ(00302 00515) -
. ) -
. CAT(INGENIUM.VSAM.CAT.TEST INGTST ) -
. ;
.
/*
/&
* $$ EOJ
-------------------------------
FIRST FILE
------------------------------
DATA Allocation ASMWK1 3390 TRKS
Prim/Secnd Alloc 15002/1508
Active Extents 1
Control Interval 4096
Avge/Max RECSZ 300/513
Records Total 450827
Deleted 0
Inserted 0
Updated 0
Accessed 5538905
Data EXCPS 102654
CI/CA Freespace 20/10
CI-splits/ % inserts 0/0
CA-splits/ % inserts 0/0
---------
INDEX Allocation DOSRES 3390 TRKS
Prim/Secnd Alloc 5/1
Active Extents 25
Control Interval 2560
KEY Length/Posn 37/0
Total records 545
Index levels 3
Index EXCPS 11533
Option NOIMBED
Option NOREPLICATE
Shareoption (3 3)
High-used-RBA 327.3M
High-alloc RBA 703.3M
-----