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 FUSE - IBM MQ - CICS integration error Kevin Vaz CICS 0 Mon Sep 18, 2017 4:31 pm
No new posts Reply MQ open error Vignesh Sid COBOL Programming 5 Thu Sep 07, 2017 6:02 pm
No new posts Error in SQL-PLIST3 'Above value tru... rikdeb DB2 4 Wed Sep 06, 2017 1:34 pm
No new posts WER268A OUTREC STATEMENT : SYNTAX E... frozenblood87 SYNCSORT 12 Sat Aug 26, 2017 9:45 pm
No new posts Multiple VSAM files single output fil... Mohan Kothakota DFSORT/ICETOOL 11 Wed Aug 09, 2017 7:57 pm

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