Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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 ICETOOL - RESIZE DYNAMICALLY kranthikumarb DFSORT/ICETOOL 0 Tue Nov 21, 2017 5:30 pm
No new posts -502 Error - Cursor already open anand jeyapaul DB2 7 Sun Oct 29, 2017 4:22 am
No new posts IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts FTP Skip or ignore error and process ... AJAYREDDY All Other Mainframe Topics 3 Wed Sep 27, 2017 8:12 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us