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

Statement Definer Error while executing ICETOOL
IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
Sheetal Ravi

New User


Joined: 28 Dec 2007
Posts: 4
Location: Bangalore
PostPosted: Fri Jun 20, 2008 4:47 pm
 Reply with quote
I'm trying to run the following ICETOOL job;
This job combines records from four different files to create a single output record. The following is the JCL which I have taken from the IBM programmer guide for SPLICE

Code:

//TOOLIN   DD *                                           
COPY FROM(FILE1) TO(T1) USING(CTL1)                       
COPY FROM(FILE2) TO(T1) USING(CTL2)                       
COPY FROM(FILE3) TO(T1) USING(CTL3)                       
COPY FROM(FILE4) TO(T1) USING(CTL4)                       
SPLICE FROM(T1) TO(COMBINE) ON(871,8,PD) WITHEACH -       
  WITH(301,400) WITH(701,150) WITH(851,20) -               
  USING(CTL5)                                               
/*                                                       
//CTL1CNTL DD *                                           
  OUTREC FIELDS=(1,300,871:SEQNUM,8,PD)                     
/*                                                       
//CTL2CNTL DD *                                           
  OUTREC FIELDS=(301:1,400,871:SEQNUM,8,PD)                 
/*                                                       
//CTL3CNTL DD *                                           
  OUTREC FIELDS=(701:1,150,871:SEQNUM,8,PD)                 
/*                                                       
//CTL4CNTL DD *                                           
  OUTREC FIELDS=(851:1,20,871:SEQNUM,8,PD)                 
/*                                                       
//CTL5CNTL DD *                                           
  OUTFIL FNAMES=ALLRCDS,OUTREC=(1,870)                     
/*         


But I'm getting the following error;
Code:

ICE200I 0 IDENTIFIER FROM CALLING PROGRAM IS 0001
ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED
ICE000I 0 - CONTROL STATEMENTS FOR 5740-SM1, DFSORT REL 14.0 - 16:29 ON
          OUTFIL FNAMES=T1,BUILD=(1,300,871:SEQNUM,8,PD)             
                 $                                                   
ICE005A 0 STATEMENT DEFINER ERROR                                   
ICE146I 0 END OF STATEMENTS FROM CTL1CNTL - PARAMETER LIST STATEMENTS
          DEBUG NOABEND,ESTAE                                       
          OPTION MSGDDN=DFSMSG,LIST,MSGPRT=ALL,RESINV=0,SORTDD=CTL1,S
                         SORTOUT=T1,DYNALLOC                         
          SORT FIELDS=COPY                                           
ICE052I 3 END OF DFSORT                                             


After refering to the previous posts regarding the sort version DFSORT R14 PTF UK90006 (April, 2006) I requested our system programmer to install it. After it was installed I'm able to successfully execute ICEMAN with advanced features like PARSE,BUILD etc. But am unsuccessful in executing ICETOOL.

Is it necesarry to install z/OS DFSORT V1R5 PTF UK90007 to execute ICETOOL and its features or am I wrong somewhere in the syntax.

Thanks for your time.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
PostPosted: Fri Jun 20, 2008 7:49 pm
 Reply with quote
Hello,

The error in your post is for a control statement that is not in the TOOLIN you posted icon_confused.gif

It may help if you include the jcl as well as the control statements.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
PostPosted: Fri Jun 20, 2008 8:49 pm
 Reply with quote
Code:

OUTFIL FNAMES=T1,BUILD=(1,300,871:SEQNUM,8,PD) 


It appears you do not have a blank before OUTFIL. OUTFIL must be preceded by one or more blanks, e.g.

Code:

  OUTFIL FNAMES=T1,BUILD=(1,300,871:SEQNUM,8,PD) 
Back to top
View user's profile Send private message
Sheetal Ravi

New User


Joined: 28 Dec 2007
Posts: 4
Location: Bangalore
PostPosted: Mon Jun 23, 2008 3:53 pm
 Reply with quote
Hi Frank
I modified the jcl as per your suggestion and it worked fine.Thanks a lot for your help. icon_smile.gif
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 Error to read log with rexx CLIST & REXX 11
No new posts Error when install DB2 DB2 2
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
No new posts Shift left VB record without x00 endi... DFSORT/ICETOOL 11
No new posts how to calculate SUM value for VB fil... DFSORT/ICETOOL 1
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us