Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

WER486A Error while joining two files

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
kalyan.v

New User


Joined: 04 Feb 2008
Posts: 65
Location: Hyd

PostPosted: Fri Aug 28, 2009 1:30 pm    Post subject: WER486A Error while joining two files
Reply with quote

Hi,

I am trying the below sort card to retrieve the FILE1 records only when they have matched key in FILE2.
Code:

//******************************************************************
//STEP060  EXEC PGM=SYNCSORT,PARM='SIZE(MAX)'                       
//******************************************************************
//SYSOUT   DD SYSOUT=*                                             
//SORTWK01 DD UNIT=WORK,SPACE=(CYL,(20,10))                         
//SORTWK02 DD UNIT=WORK,SPACE=(CYL,(20,10))                         
//SORTWK03 DD UNIT=WORK,SPACE=(CYL,(20,10))                         
//SORTWK04 DD UNIT=WORK,SPACE=(CYL,(20,10))                         
//SORTWK05 DD UNIT=WORK,SPACE=(CYL,(20,10))                         
//SORTJNF1 DD DSN=FILE1,DISP=SHR -------------LRECL=900,RECFM=FB 
//SORTJNF2 DD DSN=FILE2,DISP=SHR -------------LRECL=205,RECFM=FB     
//SORTOUT  DD DSN=FILE3,                   
//            DISP=(NEW,CATLG,DELETE),DCB=(MODEL.DSCB),             
//            UNIT=SYSDA,SPACE=(CYL,(10,10),RLSE)                   
//SYSIN    DD *
  JOINKEYS FILE=F1,FIELDS=(38,5,A)        ------->  PIC S9(9) COMP-3     
  JOINKEYS FILE=F2,FIELDS=(01,5,A)        -------->  PIC S9(9) COMP-3
  REFORMAT FIELDS=(F1:1,900)             
  SORT FIELDS=COPY                                 
/*


But i am getting below error.
Code:

WER164B  19,624K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,         
WER164B     0 BYTES RESERVE REQUESTED, 1,021,704 BYTES USED                 
WER146B  12K BYTES OF EMERGENCY SPACE ALLOCATED                             
WER481I  JOINKEYS REFORMAT RECORD LENGTH=  900, TYPE = F                     
WER110I  SORTOUT  : RECFM=FB   ; LRECL=   900; BLKSIZE= 27900               
WER211B  SYNCSMF  CALLED BY SYNCSORT; RC=0000                               
WER486A  ERROR IN BOTH JNF1 AND JNF2 PROCESSING                             
WER482I  JNF1 STATISTICS                                                     
WER483B  14,736K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,         
WER483B     0 BYTES RESERVE REQUESTED, 13,960K BYTES USED                   
WER108I  SORTJNF1 : RECFM=FB   ; LRECL=   900; BLKSIZE= 27900               
WER483B  13,704K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,   
WER483B     0 BYTES RESERVE REQUESTED, 13,704K BYTES USED                   
WER483B  G=4622,B=62                                                         
WER483B  0 PREALLOCATED SORTWORK TRACKS, 0 DYNAMICALLY ALLOCATED,           
WER483B     0 ACQUIRED IN SECONDARY EXTENTS, 0 RELEASED, TOTAL OF 0 TRACKS US
WER046A  SORT CAPACITY EXCEEDED                                             
WER066A  APROX RCD CNT              62                                       
WER482I  JNF2 STATISTICS                                                     
WER483B  4,260K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,           
WER483B     0 BYTES RESERVE REQUESTED, 3,484K BYTES USED                     
WER108I  SORTJNF2 : RECFM=FB   ; LRECL=   205; BLKSIZE= 27880               
WER483B  3,228K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,     
WER483B     0 BYTES RESERVE REQUESTED, 3,228K BYTES USED                     
WER483B  G=2956,B=276                                                       
WER483B  0 PREALLOCATED SORTWORK TRACKS, 0 DYNAMICALLY ALLOCATED,           
WER483B     0 ACQUIRED IN SECONDARY EXTENTS, 0 RELEASED, TOTAL OF 0 TRACKS US
WER046A  SORT CAPACITY EXCEEDED                                             
WER066A  APROX RCD CNT             276                                       



ERROR IN BOTH JNF1 AND JNF2 PROCESSING -- I am unable to find what is the error while joining.

Please help me to solve this.

Thanks,
Kalyan V
Back to top
View user's profile Send private message

ramsri

Active User


Joined: 18 Oct 2008
Posts: 380
Location: India

PostPosted: Fri Aug 28, 2009 3:02 pm    Post subject: Reply to: WER486A Error while joining two files
Reply with quote

Code:

WER046A  SORT CAPACITY EXCEEDED                                             
WER066A  APROX RCD CNT              62


The above messages are the real cause !

HTH.
Back to top
View user's profile Send private message
ramsri

Active User


Joined: 18 Oct 2008
Posts: 380
Location: India

PostPosted: Fri Aug 28, 2009 3:04 pm    Post subject: Try this
Reply with quote

You may want to try the ACTION suggested here....

Code:

WER046A SORT CAPACITY EXCEEDED
EXPLANATION: All available intermediate storage is exhausted,
including any secondary allocation allowed in this job set. Sort processing
cannot continue.
ACTION: Supply more intermediate storage (see the SORTWK calculation
formula) or use the MAXSORT technique.


HTH.
Back to top
View user's profile Send private message
kalyan.v

New User


Joined: 04 Feb 2008
Posts: 65
Location: Hyd

PostPosted: Fri Aug 28, 2009 3:36 pm    Post subject:
Reply with quote

Hi Ramsri,

I tried the sort by increasing the intermediate storage.But it is giving the same error.

Thanks,
Kalyan V
Back to top
View user's profile Send private message
Ketan Varhade

Active User


Joined: 29 Jun 2009
Posts: 197
Location: Mumbai

PostPosted: Fri Aug 28, 2009 3:37 pm    Post subject:
Reply with quote

Can you paste the new JCL which you have coded ?
Back to top
View user's profile Send private message
kalyan.v

New User


Joined: 04 Feb 2008
Posts: 65
Location: Hyd

PostPosted: Fri Aug 28, 2009 4:17 pm    Post subject:
Reply with quote

Here is my new jcl.

Code:

//*****************************************************************
//STEP060  EXEC PGM=SYNCSORT,PARM='SIZE(MAX)'                     
//*****************************************************************
//*****************************************************************
//SYSOUT   DD SYSOUT=*                                             
//SORTWK01 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK02 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK03 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK04 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK05 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK06 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK07 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK08 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK09 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK10 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK11 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK12 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK13 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK14 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTWK15 DD UNIT=WORK,SPACE=(CYL,(50,20))                       
//SORTJNF1 DD DSN=FILE1,DISP=SHR 
//SORTJNF2 DD DSN=FILE2,DISP=SHR     
//SORTOUT  DD DSN=FILE3,                   
//            DISP=(NEW,CATLG,DELETE),DCB=(MODEL.DSCB),           
//            UNIT=SYSDA,SPACE=(CYL,(10,10),RLSE)                 
//SYSIN    DD *
  JOINKEYS FILE=F1,FIELDS=(38,5,A)       
  JOINKEYS FILE=F2,FIELDS=(01,5,A)       
  REFORMAT FIELDS=(F1:1,900)             
  SORT FIELDS=COPY                                 
/*
           


Thanks,
Kalyan V
Back to top
View user's profile Send private message
Ketan Varhade

Active User


Joined: 29 Jun 2009
Posts: 197
Location: Mumbai

PostPosted: Fri Aug 28, 2009 4:25 pm    Post subject:
Reply with quote

Hi , Can you try once again with the increase the space parameter of the SORTOUT file

Code:

SPACE=(CYL,(625,125),RLSE)


Please let me know if the problem still prevails
Back to top
View user's profile Send private message
kalyan.v

New User


Joined: 04 Feb 2008
Posts: 65
Location: Hyd

PostPosted: Fri Aug 28, 2009 6:20 pm    Post subject:
Reply with quote

Hi Ketan,

I tried by changing the space parameter as mentioned by you.
Still i am getting the same error.

Thanks,
Kalyan V
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Fri Aug 28, 2009 7:37 pm    Post subject:
Reply with quote

Per this message from the SYSOUT you post:
Code:
WER483B  0 PREALLOCATED SORTWORK TRACKS, 0 DYNAMICALLY ALLOCATED,           
WER483B     0 ACQUIRED IN SECONDARY EXTENTS, 0 RELEASED, TOTAL OF 0 TRACKS US
It seems there is a problem with the UNIT you are using for SORTWORK files.

May be you are tying to use an unusable UNIT parameter and you have ZERO tracks available for sorting. Correct that and try again.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IDC2902I Error tzeche ABENDS & Debugging 2 Tue Mar 28, 2017 11:39 am
No new posts Need help with below DB2 error ashek15 DB2 3 Sat Mar 18, 2017 5:56 am
No new posts Append data from two files into a sin... Praveen04 DFSORT/ICETOOL 5 Thu Mar 16, 2017 7:29 pm
No new posts FINDREP Syntax Error seahawk789 DFSORT/ICETOOL 4 Thu Mar 09, 2017 10:11 pm
No new posts INVOKE WEBSERVICE error danik56 CICS 11 Thu Mar 09, 2017 11:52 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us