View previous topic :: View next topic |
Author |
Message |
yadav2005 Intermediate
Joined: 10 Jan 2005 Posts: 348 Topics: 144
|
Posted: Mon Oct 12, 2009 10:34 am Post subject: unable to load data into VSAM KSDS from a tape |
|
|
I am trying to load records to a newly created VSAM file with REUSE option using IDCAMS and my Input file is a Tape dataset.I have tried to copy the records by IEBGENER , SYNCSORT and File Aid Batch and all have ended in error but my input file RECFM=U.
Can somebody help me:
Code: |
IDCAMS SYSTEM SERVICES TIME: 11:25:46
REPRO INFILE(IN) OUTFILE(OUT)
IDC3302I ACTION ERROR ON ABC.TEST.DATA
IDC3351I ** VSAM I/O RETURN CODE IS 108 - RPLFDBWD = X'8408006C'
IDC31467I MAXIMUM ERROR LIMIT REACHED.
IDC0005I NUMBER OF RECORDS PROCESSED WAS 1
IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 12
|
|
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12359 Topics: 75 Location: San Jose
|
|
Back to top |
|
|
jsharon1248 Intermediate
Joined: 08 Aug 2007 Posts: 291 Topics: 2 Location: Chicago
|
Posted: Mon Oct 12, 2009 11:43 am Post subject: |
|
|
This has nothing to do with tape. You might want to look at the input file with RECFM=U as the source of your problem. For what it's worth, here's the explanation for the I/O RC=108:
Code: | The RECLEN specified was larger than the maximum allowed, equal to 0, or smaller than the sum of the length and the displacement of the key field of the base cluster or related alternate index (AIX). The RECLEN was not equal to the slot size specified for a relative record data set. |
|
|
Back to top |
|
|
yadav2005 Intermediate
Joined: 10 Jan 2005 Posts: 348 Topics: 144
|
Posted: Mon Oct 12, 2009 12:16 pm Post subject: |
|
|
Kolusu,
Thank for your help and I am trying my best to get this fix done.
I have a Production VSAM dataset whose properties I want to use for my test VSAM dataset to which I will copy records from the tape dataset , I am not able to make out from my end what changes I should make to fix the problem.Hence I am pasting the information of the Production VSAM dataset LISTCAT information as well the test VSAM which I have created using Model parameter and also Input Tape dataset. Finally I want the data to be in test VSAM dataset.
Code: |
IDCAMS SYSTEM SERVICES TIME: 12:53:46
LISTCAT ENT('ABC.PROD.DATA') ALL
CLUSTER ------- ABC.PROD.DATA
IN-CAT --- ICFCAT.VVSMP03
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.241
RELEASE----------------2 EXPIRATION------0000.000
BWO STATUS--------(NULL) BWO TIMESTAMP-----(NULL)
BWO---------------(NULL)
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
DATA-----ABC.PROD.DATA.DATA
INDEX----ABC.PROD.DATA.INDEX
DATA ------- ABC.PROD.DATA.DATA
IN-CAT --- ICFCAT.VVSMP03
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.241
RELEASE----------------2 EXPIRATION------0000.000
ACCOUNT-INFO-----------------------------------(NULL)
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
CLUSTER--ABC.PROD.DATA
ATTRIBUTES
KEYLEN----------------10 AVGLRECL------------1250 BUFSPACE-------
RKP--------------------0 MAXLRECL------------5000 EXCPEXIT-------
SHROPTNS(2,3) RECOVERY UNIQUE NOERASE INDEXED N
UNORDERED NOREUSE NONSPANNED
STATISTICS
REC-TOTAL----------60804 SPLITS-CI-------------48 EXCPS----------
REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS--------
REC-INSERTED-----------0 FREESPACE-%CI---------10 SYSTEM-TIMESTAM
REC-UPDATED-------131020 FREESPACE-%CA---------10 X'C4EAEAD5
REC-RETRIEVED---21851034 FREESPC---------33810432
ALLOCATION
SPACE-TYPE------CYLINDER HI-A-RBA-------221184000
SPACE-PRI------------300 HI-U-RBA-------207912960
SPACE-SEC-------------30
VOLUME
VOLSER------------VSMP03 PHYREC-SIZE---------6144 HI-A-RBA-------
DEVTYPE------X'3010200F' PHYRECS/TRK------------8 HI-U-RBA-------
VOLFLAG------------PRIME TRACKS/CA-------------15
EXTENTS:
LOW-CCHH-----X'00380000' LOW-RBA----------------0 TRACKS---------
HIGH-CCHH----X'0163000E' HIGH-RBA-------221183999
INDEX ------ ABC.PROD.DATA.INDEX
IN-CAT --- ICFCAT.VVSMP03
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.241
IDCAMS SYSTEM SERVICES TIME: 12:53:46
RELEASE----------------2 EXPIRATION------0000.000
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
CLUSTER--ABC.PROD.DATA
ATTRIBUTES
KEYLEN----------------10 AVGLRECL---------------0 BUFSPACE-------
RKP--------------------0 MAXLRECL------------1017 EXCPEXIT-------
SHROPTNS(2,3) RECOVERY UNIQUE NOERASE NOWRITECHK
NOREUSE
STATISTICS
REC-TOTAL------------286 SPLITS-CI--------------0 EXCPS----------
REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS--------
REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAM
REC-UPDATED-----------48 FREESPACE-%CA----------0 X'C4EAEAD5
REC-RETRIEVED----------0 FREESPC------------11264
ALLOCATION
SPACE-TYPE---------TRACK HI-A-RBA----------304128
SPACE-PRI--------------5 HI-U-RBA----------292864
SPACE-SEC--------------2
VOLUME
VOLSER------------VSMP03 PHYREC-SIZE---------1024 HI-A-RBA-------
DEVTYPE------X'3010200F' PHYRECS/TRK-----------33 HI-U-RBA-------
VOLFLAG------------PRIME TRACKS/CA--------------1
EXTENTS:
LOW-CCHH-----X'001C0002' LOW-RBA----------------0 TRACKS---------
HIGH-CCHH----X'001C0006' HIGH-RBA----------168959
LOW-CCHH-----X'001C0007' LOW-RBA-----------168960 TRACKS---------
HIGH-CCHH----X'001C0008' HIGH-RBA----------236543
LOW-CCHH-----X'001C0009' LOW-RBA-----------236544 TRACKS---------
HIGH-CCHH----X'001C000A' HIGH-RBA----------304127
IDCAMS SYSTEM SERVICES TIME: 12:53:46
THE NUMBER OF ENTRIES PROCESSED WAS:
AIX -------------------0
ALIAS -----------------0
CLUSTER ---------------1
DATA ------------------1
GDG -------------------0
INDEX -----------------1
NONVSAM ---------------0
PAGESPACE -------------0
PATH ------------------0
SPACE -----------------0
USERCATALOG -----------0
TAPELIBRARY -----------0
TAPEVOLUME ------------0
TOTAL -----------------3
THE NUMBER OF PROTECTED ENTRIES SUPPRESSED WAS 0
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 0
Test VSAM LISTCAT information
-------------------------------------------------------------------------------------------------------------------------
IDCAMS SYSTEM SERVICES TIME: 13:04:04
LISTCAT ENT('ABC.TEST.DATA') ALL
CLUSTER ------- ABC.TEST.DATA
IN-CAT --- ICFCAT.VTEST01
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.285
RELEASE----------------2 EXPIRATION------0000.000
SMSDATA
STORAGECLASS ---SCPMLD00 MANAGEMENTCLASS-MCPMLT00
DATACLASS --------(NULL) LBACKUP ---0000.000.0000
BWO STATUS------00000000 BWO TIMESTAMP---00000 00:00:00.0
BWO---------------(NULL)
RLSDATA
LOG ----------------(NULL) RECOVERY REQUIRED --(NO) FRLOG ---------
VSAM QUIESCED -------(NO) RLS IN USE ---------(NO)
LOGSTREAMID-----------------------------(NULL)
RECOVERY TIMESTAMP LOCAL-----X'0000000000000000'
RECOVERY TIMESTAMP GMT-------X'0000000000000000'
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
DATA-----ABC.TEST.DATA.DATA
INDEX----ABC.TEST.DATA.INDEX
DATA ------- ABC.TEST.DATA.DATA
IN-CAT --- ICFCAT.VTEST01
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.285
RELEASE----------------2 EXPIRATION------0000.000
ACCOUNT-INFO-----------------------------------(NULL)
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
CLUSTER--ABC.TEST.DATA
ATTRIBUTES
KEYLEN----------------10 AVGLRECL------------1250 BUFSPACE-------
RKP--------------------0 MAXLRECL------------5000 EXCPEXIT-------
SHROPTNS(2,3) RECOVERY UNIQUE NOERASE INDEXED N
UNORDERED NOREUSE NONSPANNED
STATISTICS
REC-TOTAL--------------0 SPLITS-CI--------------0 EXCPS----------
REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS--------
REC-INSERTED-----------0 FREESPACE-%CI---------10 SYSTEM-TIMESTAM
REC-UPDATED------------0 FREESPACE-%CA---------10 X'00000000
REC-RETRIEVED----------0 FREESPC--------221184000
ALLOCATION
SPACE-TYPE------CYLINDER HI-A-RBA-------221184000
SPACE-PRI------------300 HI-U-RBA---------------0
SPACE-SEC-------------30
VOLUME
VOLSER------------TEST71 PHYREC-SIZE---------6144 HI-A-RBA-------
IDCAMS SYSTEM SERVICES TIME: 13:04:04
DEVTYPE------X'3010200F' PHYRECS/TRK------------8 HI-U-RBA-------
VOLFLAG------------PRIME TRACKS/CA-------------15
EXTENTS:
LOW-CCHH-----X'09F30000' LOW-RBA----------------0 TRACKS---------
HIGH-CCHH----X'0B1E000E' HIGH-RBA-------221183999
INDEX ------ ABC.TEST.DATA.INDEX
IN-CAT --- ICFCAT.VTEST01
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.285
RELEASE----------------2 EXPIRATION------0000.000
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
CLUSTER--ABC.TEST.DATA
ATTRIBUTES
KEYLEN----------------10 AVGLRECL---------------0 BUFSPACE-------
RKP--------------------0 MAXLRECL------------1017 EXCPEXIT-------
SHROPTNS(2,3) RECOVERY UNIQUE NOERASE NOWRITECHK
NOREUSE
STATISTICS
REC-TOTAL--------------0 SPLITS-CI--------------0 EXCPS----------
REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS--------
REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAM
REC-UPDATED------------0 FREESPACE-%CA----------0 X'00000000
REC-RETRIEVED----------0 FREESPC-----------168960
ALLOCATION
SPACE-TYPE---------TRACK HI-A-RBA----------168960
SPACE-PRI--------------5 HI-U-RBA---------------0
SPACE-SEC--------------2
VOLUME
VOLSER------------TEST71 PHYREC-SIZE---------1024 HI-A-RBA-------
DEVTYPE------X'3010200F' PHYRECS/TRK-----------33 HI-U-RBA-------
VOLFLAG------------PRIME TRACKS/CA--------------1
EXTENTS:
LOW-CCHH-----X'000D0007' LOW-RBA----------------0 TRACKS---------
HIGH-CCHH----X'000D000B' HIGH-RBA----------168959
IDCAMS SYSTEM SERVICES TIME: 13:04:04
THE NUMBER OF ENTRIES PROCESSED WAS:
AIX -------------------0
ALIAS -----------------0
CLUSTER ---------------1
DATA ------------------1
GDG -------------------0
INDEX -----------------1
NONVSAM ---------------0
PAGESPACE -------------0
PATH ------------------0
SPACE -----------------0
USERCATALOG -----------0
TAPELIBRARY -----------0
TAPEVOLUME ------------0
TOTAL -----------------3
THE NUMBER OF PROTECTED ENTRIES SUPPRESSED WAS 0
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 0
Listcat information for the Input Tape Dataset
-----------------------------------------------
IDCAMS SYSTEM SERVICES TIME: 13:07:50
LISTCAT ENT('ABC.PROD.VSAM') ALL
GDG BASE ------ ABC.PROD.VSAM
IN-CAT --- ICFCAT.VMAIN04
HISTORY
DATASET-OWNER-----(NULL) CREATION--------1988.354
RELEASE----------------2 LAST ALTER------2009.273
ATTRIBUTES
LIMIT------------------5 SCRATCH NOEMPTY
ASSOCIATIONS
NONVSAM--ABC.PROD.VSAM.G0247V00
NONVSAM--ABC.PROD.VSAM.G0248V00
NONVSAM--ABC.PROD.VSAM.G0249V00
NONVSAM--ABC.PROD.VSAM.G0250V00
NONVSAM--ABC.PROD.VSAM.G0251V00
NONVSAM ---- ABC.PROD.VSAM.G0247V00
IN-CAT --- ICFCAT.VMAIN04
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.149
RELEASE----------------2 EXPIRATION------0000.000
VOLUMES
VOLSER------------P20865 DEVTYPE------X'78048081' FSEQN----------
ASSOCIATIONS
GDG------ABC.PROD.VSAM
ATTRIBUTES
NONVSAM ---- ABC.PROD.VSAM.G0248V00
IN-CAT --- ICFCAT.VMAIN04
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.182
RELEASE----------------2 EXPIRATION------0000.000
VOLUMES
VOLSER------------P23455 DEVTYPE------X'78048081' FSEQN----------
ASSOCIATIONS
GDG------ABC.PROD.VSAM
ATTRIBUTES
NONVSAM ---- ABC.PROD.VSAM.G0249V00
IN-CAT --- ICFCAT.VMAIN04
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.213
RELEASE----------------2 EXPIRATION------0000.000
VOLUMES
VOLSER------------P32488 DEVTYPE------X'78048081' FSEQN----------
ASSOCIATIONS
GDG------ABC.PROD.VSAM
ATTRIBUTES
NONVSAM ---- ABC.PROD.VSAM.G0250V00
IDCAMS SYSTEM SERVICES TIME: 13:07:50
IN-CAT --- ICFCAT.VMAIN04
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.244
RELEASE----------------2 EXPIRATION------0000.000
VOLUMES
VOLSER------------P36030 DEVTYPE------X'78048081' FSEQN----------
ASSOCIATIONS
GDG------ABC.PROD.VSAM
ATTRIBUTES
NONVSAM ---- ABC.PROD.VSAM.G0251V00
IN-CAT --- ICFCAT.VMAIN04
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2009.273
RELEASE----------------2 EXPIRATION------0000.000
VOLUMES
VOLSER------------P37936 DEVTYPE------X'78048081' FSEQN----------
ASSOCIATIONS
GDG------ABC.PROD.VSAM
ATTRIBUTES
IDCAMS SYSTEM SERVICES TIME: 13:07:50
THE NUMBER OF ENTRIES PROCESSED WAS:
AIX -------------------0
ALIAS -----------------0
CLUSTER ---------------0
DATA ------------------0
GDG -------------------1
INDEX -----------------0
NONVSAM ---------------5
PAGESPACE -------------0
PATH ------------------0
SPACE -----------------0
USERCATALOG -----------0
TAPELIBRARY -----------0
TAPEVOLUME ------------0
TOTAL -----------------6
THE NUMBER OF PROTECTED ENTRIES SUPPRESSED WAS 0
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 0
|
Based on the error defination I am not able to make up what I should do and I have tried many times.
108
The RECLEN specified was larger than the maximum allowed, equal to 0, or smaller than the sum of the length and the displacement of the key field of the base cluster or related alternate index (AIX). The RECLEN was not equal to the slot size specified for a relative record data set. |
|
Back to top |
|
|
Nic Clouston Advanced
Joined: 01 Feb 2007 Posts: 1075 Topics: 7 Location: At Home
|
Posted: Mon Oct 12, 2009 1:02 pm Post subject: |
|
|
Is the tape dataset a repro of the VSAM dataset? If not, then repro will not work? and that is basically the only option of copying to a vsam file that I am aware of.
Check the record structure of the records on the tape (look at the program that creates the tape) and compare it to the record structure of the records in the VSAM file. Do they match? If not, you will have to write a program to load the data in the correct format. _________________ Utility and Program control cards are NOT, repeat NOT, JCL. |
|
Back to top |
|
|
dbzTHEdinosauer Supermod
Joined: 20 Oct 2006 Posts: 1411 Topics: 26 Location: germany
|
Posted: Mon Oct 12, 2009 1:15 pm Post subject: |
|
|
Maybe the tape was not created with IDCAMS.
Maybe a different type of backup process;
in which case, you need to restore the vsam from tape with the same utility that created the tape. _________________ Dick Brenholtz
American living in Varel, Germany |
|
Back to top |
|
|
yadav2005 Intermediate
Joined: 10 Jan 2005 Posts: 348 Topics: 144
|
Posted: Mon Oct 12, 2009 1:22 pm Post subject: |
|
|
That tape dataset is not a repro of a VSAM dataset and the tape dataset is created by executing FDRDSF utility by compressing . I am stuck up in copying the records from the tape dataset to VSAM and I am trying different ways to get it done.The Rec Fmt is U and Lrecl = 0 for the Input tape dataset.
Can you tell me how I can proceed ahead , first of all I am not able to see the records of the tape dataset , if I see the data then I think of doing something else.Any suggestions.
dbzTHEdinosauer - you are correct it is created with a different type of compress. Can you post me the JCL by which I can restore with the same utility . |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12359 Topics: 75 Location: San Jose
|
Posted: Mon Oct 12, 2009 1:34 pm Post subject: |
|
|
yadav2005 wrote: | That tape dataset is not a repro of a VSAM dataset and the tape dataset is created by executing FDRDSF utility by compressing . I am stuck up in copying the records from the tape dataset to VSAM and I am trying different ways to get it done.The Rec Fmt is U and Lrecl = 0 for the Input tape dataset.
|
Why cant you use the same FDRDSF utility to restore? look at the example 2 to restore
Example 1: The following JCL dumps the dataset called CC.TEST.FILE to a tape backup called CC.TEST.BACKUP.FILE.
Code: |
//CCBACKUP JOB (CC,00),CC,MSGCLASS=A,CLASS=N
/*ROUTE PRINT CC
//STEP1 EXEC PGM=FDRDSF
//SYSPRINT DD SYSOUT=A
//SYSUDUMP DD SYSOUT=A
//DISK1 DD UNIT=DISK,DISP=SHR,VOL=SER=DISK99
//TAPE1 DD DSN=CC.TEST.BACKUP.FILE,UNIT=TAPE,
// DISP=(,CATLG,DELETE)
//DD1 DD DSN=CC.TEST.FILE,DISP=OLD
//SYSIN DD *
DUMP DD=DD1
/* |
The DISK1 DD statement must specify the volume serial # of the disk volume containing the dataset to be dumped. The TAPE1 DD statement must specify the output dataset. The DD1 DD statement specifies the dataset to be dumped.
Example 2: The following JCL will restore the dataset called CC.TEST.FILE from the tape
backup called CC.TEST.BACKUP.FILE.
Code: |
//CCRESTOR JOB (CC,00),MSGCLASS=A,CLASS=N
/*ROUTE PRINT CC
//STEP1 EXEC PGM=FDRDSF
//SYSPRINT DD SYSOUT=A
//SYSUDUMP DD SYSOUT=A
//DISK1 DD UNIT=DISK,DISP=SHR,VOL=SER=DISK99
//TAPE1 DD DSN=CC.TEST.BACKUP.FILE,DISP=OLD
//DD1 DD DSN=CC.TEST.FILE,UNIT=DISK,VOL=SER=DISK99,
// DISP=(,CATLG,DELETE),SPACE=(TRK,(10,2))
//SYSIN DD *
RESTORE DD=DD1
/*
|
|
|
Back to top |
|
|
yadav2005 Intermediate
Joined: 10 Jan 2005 Posts: 348 Topics: 144
|
Posted: Mon Oct 12, 2009 2:51 pm Post subject: |
|
|
Thank you all Kolusu , dbzTHEdinosauer , Nic Clouston and jsharon1248 with all you help and expertise I was able to complete my task.
Kolusu your code worked fine and I have learned some basics of the utilitiy FDRDSF and it helped me to know new things. |
|
Back to top |
|
|
|
|