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
 

 

HELP with ICETOOL ERROR msg

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
srj1957

New User


Joined: 15 Dec 2005
Posts: 72
Location: RALEIGH NC, USA

PostPosted: Fri Nov 17, 2006 1:25 am    Post subject: HELP with ICETOOL ERROR msg
Reply with quote

I get this error when running ICETOOL

Code:
SPLICE FROM(T1) TO(OUT) -                                             
            ON(12,30,CH) -                                           
             WITH(82,1) -                                             
             USING(CTL3) -                                           
             KEEPNODUPS                                               
DFSORT CALL 0003 FOR SORT FROM T1  TO OUT USING CTL3CNTL TERMINATED
OPERATION RETURN CODE:  16         


here is my JCL
Code:
//IN1      DD DISP=SHR,DSN=ISD.SRJ.FDA1PRN.NODUPS       
//IN2      DD DISP=SHR,DSN=ISD.SRJ.UNLD.TFDBDRUG.D111606
//OUT      DD DSN=ISD.SRJ.OUT,                           
//         UNIT=DISK,DISP=SHR,VOL=SER=NCM208,           
//         SPACE=(CYL,(50,25),RLSE),                     
//         DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000)         
//T1       DD DSN=ISD.SRJ.T1,                           
//         UNIT=DISK,DISP=SHR,VOL=SER=NCM208,           
//         SPACE=(CYL,(50,25),RLSE),                     
//         DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000)         
//TOOLIN    DD *                                         
COPY FROM(IN1) TO(T1) USING(CTL1)                       
COPY FROM(IN2) TO(T1) USING(CTL2)                       
SPLICE FROM(T1) TO(OUT) -                               
            ON(12,30,CH) -                               
             WITH(82,1) -                               
             USING(CTL3) -                               
             KEEPNODUPS                                 



IBM Manuals give this...
If nn is 16, match the identifier in message ICE606I or ICE627I for this operation to the same identifier in DFSORT message ICE200I (in the DFSMSG data set) to find the set of DFSORT messages for this operation. Correct the error indicated in the DFSORT error message.

I'm sorry but I'm not sure where further to look
Back to top
View user's profile Send private message

srj1957

New User


Joined: 15 Dec 2005
Posts: 72
Location: RALEIGH NC, USA

PostPosted: Fri Nov 17, 2006 1:27 am    Post subject: Re: HELP with ICETOOL ERROR msg
Reply with quote

SORRY, forgot to give CNTL to previuous post

Code:
/*                                                         
//CTL1CNTL  DD *                                           
  OUTREC FIELDS=(1,80,81:C'11')                           
/*                                                         
//CTL2CNTL  DD *                                           
  OUTREC FIELDS=(1,80,81:C'22')                           
/*                                                         
//CTL3CNTL DD *                                           
  OUTFIL FNAMES=OUT,                                       
        INCLUDE=(81,2,CH,EQ,C'11'),                       
        OUTREC=(1,80)                                     
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Fri Nov 17, 2006 1:59 am    Post subject:
Reply with quote

As the message description says, you would look "in the DFSMSG data set". That's where the DFSORT messages appear.

When I tried the equivalent of your job, I got this message in DFSMSG:

ICE027A 9 END OF OUT FIELD BEYOND MAXIMUM RECORD LENGTH

The reason is that you have LRECL=80 for the T1 data set. Since you're adding the 2-byte id at 81-82, the T1 data set must have LRECL=82. If you hadn't specified LRECL=80, DFSORT would have automatically set LRECL=82 and the job would have worked. But because you set LRECL=80 for T1, you forced LRECL=80. So your INCLUDE=(81,2,CH,EQ,C'11') tries to go beyond the end of the 80-byte records in T1 and you get the ICE027A message.

It's best NOT to specify DCB parameters for DFSORT output data sets unless you really need to override what DFSORT sets automatically.
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm
No new posts S922 Error yuvan ABENDS & Debugging 3 Fri Dec 02, 2016 6:58 pm
No new posts Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 pm
No new posts How to delete second instance from Fl... Gunapala CN DFSORT/ICETOOL 6 Tue Oct 18, 2016 11:42 pm
No new posts Error during restore rename archanamuthukrishnan All Other Mainframe Topics 2 Fri Oct 14, 2016 3:30 pm


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