My requiremtn is : I need to convert a VSAM file of key length 23 (which consists if two keys one 15 and one 8 ) to VSAM file of key length 15.
I copied teh Input VSAM to flat file an then created a new VSAM file say second with teh follwoing code:
DEFINE CLUSTER (NAME(SECOND.FILE.MINDEX) -
INDEXED -
KEYS(15 1) -
SPEED -
SHR(3 3) -
VOL(SYSDA) -
RECORDSIZE(74 74)) -
DATA (NAME(SECOND.FILE.MINDEX.DATA) -
CYL(796 198) -
CISZ(4096)) -
INDEX (NAME(SECOND.FILE.MINDEX.INDEX) -
TRK(67 17) -
CISZ(1024))
INDEXED -
KEYS(15 1) -
SPEED -
SHR(3 3) -
VOL(SYSDA) -
RECORDSIZE(74 74)) -
DATA (NAME(SECOND.FILE.MINDEX.DATA) -
CYL(796 198) -
CISZ(4096)) -
INDEX (NAME(SECOND.FILE.MINDEX.INDEX) -
TRK(67 17) -
CISZ(1024))
after that i used the reproduce command to copy the flat file contents to the VSAM file created...
I could see that teh follwoing are happening:
IDC3314I **RECORD OUT OF SEQUENCE - KEY FOLLOWS:
000000 F7F0F0F0 F0F0F240 40404040 4040F2
IDC31467I MAXIMUM ERROR LIMIT REACHED.
IDC0005I NUMBER OF RECORDS PROCESSED WAS 172886
IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12
Also...i could see that key is not copying correctly :
Input file sample data:
----+----1----+----2----+----
*****************************
00941284 20081002065659
00941285 20081002070023
010109 00000000000000
01390480 19990321104002
01390481 19990321104326
01390484 19990321113952
01390485 19990321114045
But in ouput VSAm file: i could see that
----+----1----+----2----+---
****************************
0941284 20081002065659
0941285 20081002070023
10109 00000000000000
1390480 19990321104002
1390481 19990321104326
1390484 19990321113952
1390485 19990321114045
1390489 19990321114159
1692290 19990402164900
****************************
0941284 20081002065659
0941285 20081002070023
10109 00000000000000
1390480 19990321104002
1390481 19990321104326
1390484 19990321113952
1390485 19990321114045
1390489 19990321114159
1692290 19990402164900
The zeroes that are present at the start of the key in flat file are not getting copied to the VSAM output file.
Am not sure why the records got copied till 172886 and stopped..
Can anyone let me know how i can copy the exact key and what is the exact issue is with the job abending after particular no of records copied to teh vsam file...?
Thanks in Advance