IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Copy FLAT File to VSAM


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
kanak

Moderator


Joined: 12 Mar 2005
Posts: 252
Location: India

PostPosted: Fri Apr 29, 2005 3:58 pm
Reply with quote

while i tried to copy one flat file to one VSAM file, the only few of the record get copied not all, giviing error

IDC3302I ACTION ERROR ON <VASAM FILE NAME>
IDC3314I **RECORD OUT OF SEQUENCE - KEY FOLLOWS:
000000 1919456C 03

whe i tried with fileaid copy then also it is copying only few record.JCL i have submitted is

//JOB1 JOB (T,B0,SUB),'KANAK',CLASS=M,MSGCLASS=0,
// REGION=0M
//PS010 EXEC PGM=IDCAMS
//SYSUDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//DDIN DD DSN=INPUT.FILE,DISP=SHR
//DDOUT DD DSN=VSAM.OUT.FILE,
// DISP=OLD
//SYSIN DD *
REPRO INFILE (DDIN) OUTFILE (DDOUT)
//*
//*-------------------------------------------------------------------*

I have defined the property of VSAM in other JCL, AND I AM USING THE SAME HERE HENCE I HAVE GIVEN DISPOSITION FOR THAT VSAM AS OLD.

Total number of record in input file is 90,000 where as while copying it is copying only 71 record, through this jcl giving above mentioend error.Even when i tried with filed it said logical erro and copied only 71 records.
thanks in advance
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Fri Apr 29, 2005 4:08 pm
Reply with quote

Sounds to me like the VSAM dataset is KSDS and the sequential QSAM dataset has not been properly sorted in ascending order by key.
Back to top
View user's profile Send private message
squid_rocks

New User


Joined: 21 Mar 2005
Posts: 15
Location: Pune, INDIA

PostPosted: Fri Apr 29, 2005 6:58 pm
Reply with quote

Hi,
I guess it is because a record from flat file is already present in VSAM file.
I had got a smiliar error once.
Hope it helps.
Back to top
View user's profile Send private message
somasundaran_k

Active User


Joined: 03 Jun 2003
Posts: 134

PostPosted: Fri Apr 29, 2005 7:37 pm
Reply with quote

Hi
If this is because of the duplicate records ,then you have to increase the error limit in the IDCAMS. The default is 4. So when it encounter 4 duplicates IDCAMS aborts.

Try to change your REPRO to something like

REPRO INFILE(DDIN) OUTFILE(DDOUT) NOREPLACE ERRORLIMIT(1000)

So this will abort only when it encounter 1000 duplicates.


hth
-Som
Back to top
View user's profile Send private message
somasundaran_k

Active User


Joined: 03 Jun 2003
Posts: 134

PostPosted: Sat Apr 30, 2005 9:38 pm
Reply with quote

To add up ERRORLIMIT will capture the out of sequence erros and other errors too..(like the records are not in the sorted order etc..). So I think specifying this option will solve your problem. You can increase/decrease the value in the ERRORLIMIT(nnnnn) to your needs.


hth
-Som
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Unable to interpret a hex value to De... COBOL Programming 4
No new posts Copy only TEXT or String from a record SYNCSORT 4
No new posts how to eliminate null indicator value... DB2 7
No new posts Use Copy Utility DB2 7
No new posts VSAM LISTCAT INFORMATION JCL & VSAM 2
Search our Forums:

Back to Top