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

Job abending with sort control statement error


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Ansr

New User


Joined: 13 Jul 2007
Posts: 4
Location: USA

PostPosted: Sun Nov 09, 2008 12:45 am
Reply with quote

My job is abending with following error:

Code:

                  SORT FIELDS=COPY                           
                         $                                     
ICE005A 0  STATEMENT DEFINER ERROR                   
                 OUTFIL FILES=05,INCLUDE=(18,2,CH,EQ,C'11')
                         $                                   
ICE005A 0  STATEMENT DEFINER ERROR                   
ICE010A 0  NO SORT OR MERGE CONTROL STATEMENT         
ICE751I   0 C5-K26318 C6-K90007 E7-K24705             
ICE052I   3 END OF DFSORT         


The Sort statements I used is given below:

Code:

//SORTOF05 DD  DSN=TT.TMS.INS.FILE(+1),                 
//             DISP=(NEW,CATLG,DELETE),                     
//             DCB=(MODEL.DSCB,BLKSIZE=0,LRECL=300,RECFM=FB),
//             UNIT=SYSDA,SPACE=(CYL,(25,5),RLSE)           
//*                                                         
//SYSIN    DD  *
SORT FIELDS=COPY                               
OUTFIL FILES=05,INCLUDE=(18,2,CH,EQ,C'11')     
//SORTWK05 DD  UNIT=SYSDA,SPACE=(CYL,(100,50),RLSE)
//SYSOUT   DD  SYSOUT=*   
//SYSPRINT DD  SYSOUT=*   
//SYSUDUMP DD  SYSOUT=*   
//*   


Anyone please help me in finding the crrect issue..
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2481
Location: @my desk

PostPosted: Sun Nov 09, 2008 12:50 am
Reply with quote

Ansr,

I think starting your SYSIN control statements at pos-2 or greater should solve your problem.
Back to top
View user's profile Send private message
Ansr

New User


Joined: 13 Jul 2007
Posts: 4
Location: USA

PostPosted: Sun Nov 09, 2008 12:57 am
Reply with quote

Arun,

I used the parm library for the control statements.

Code:
     
//SYSIN    DD  DSN=XP1.APL.PARMLIB(X1XAPCG1),
//             DISP=SHR                     
----+----1----+----2----+----3----+----4----+--
SORT FIELDS=COPY                               
OUTFIL FILES=05,INCLUDE=(18,2,CH,EQ,C'55') 


This is the exact statement. Sorry I am using another system for work and so could not provide exact statements.
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2481
Location: @my desk

PostPosted: Sun Nov 09, 2008 1:10 am
Reply with quote

Ansr,

Leave col-1 as blank and start your control statements from col-2.
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: Sun Nov 09, 2008 1:45 am
Reply with quote

Hello,

Quote:
I used the parm library for the control statements.
The parm library will have to be changed. If you have permission, you can edit the member and make the change Arun mentioned.

If you do not, someone who has permission will need to edit the library.

If you need to run this now and cannot get the library changed now, override the sysin to use instream control statements rather than the library.
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 How to split large record length file... DFSORT/ICETOOL 8
No new posts Error to read log with rexx CLIST & REXX 11
No new posts Error when install DB2 DB2 2
No new posts JCL sort card - get first day and las... JCL & VSAM 9
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
Search our Forums:

Back to Top