MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

ICE010A-No Sort or Merge Control statement error

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
manoj nayak
Banned


Joined: 12 Apr 2007
Posts: 15
Topics: 8
Location: Ind
PostPosted: Wed Jun 06, 2007 6:49 am    Post subject: ICE010A-No Sort or Merge Control statement error Reply with quote
Code:

//SORTTEST EXEC PGM=SORT                         
//SYSOUT DD SYSOUT=*                             
//SORTIN DD DSN=V5C.TEST.EPRG1,DISP=SHR         
//SORTOUT DD DSN=V5C.TEST.SORT1RES,             
//           DISP=(NEW,CATLG,DELETE),           
//           UNIT=SYSDA,                         
//           SPACE=(TRK,(10,10),RLSE),           
//           DCB=(RECFM=FB,LRECL=50,BLKSIZE=500)
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(20))       
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(20))       
//SYSIN DD *                                     
//*   SORT FORMAT=BI,FIELDS=(1,20,A)             
//*   SUM FIELDS=NONE                           
      SORT FIELDS=(1,20,BI,A)                   
      INCLUDE COND=(1,20,BI,EQ,C'XXXXXX')       
/*         


The above is my code and the error is
Code:

0 NO SORT OR MERGE CONTROL STATEMENT
0 C5-K21008 C6-K90007 E7-K11698     
3 END OF DFSORT                     

error code is
Code:

 07.48.02 JOB04362 $HASP165 MANOJV5C ENDED AT PNBQUAL - ABENDED S000 U0010 CN(IN
TERNAL)           

Please help me out
Back to top
View user's profile Send private message
CICS Guy
Intermediate


Joined: 30 Apr 2007
Posts: 292
Topics: 3
PostPosted: Wed Jun 06, 2007 6:52 am    Post subject: Re: sort Reply with quote
Move the
//* SORT FORMAT=BI,FIELDS=(1,20,A)
and
//* SUM FIELDS=NONE
to after the
/*
Back to top
View user's profile Send private message
manoj nayak
Banned


Joined: 12 Apr 2007
Posts: 15
Topics: 8
Location: Ind
PostPosted: Wed Jun 06, 2007 6:59 am    Post subject: Reply with quote
Thanks for the quick reply
CICS Guy
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
PostPosted: Wed Jun 06, 2007 7:17 am    Post subject: Reply with quote
manoj nayak,

Please follow the forum rules.

1. Use meaningful topics (don't use the Forum name for the topic). Use a descriptive Title to explain your problem. Post detailed information on what you're trying to accomplish. Do not make people guess what you mean. This will give you a much better chance of getting a good answer to your question.

2. Post your questions in the right forum

3. Use BB code tags for readable and to ensure that leading blanks are not removed.

http://www.mvsforums.com/helpboards/viewtopic.php?p=19031#19031


Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
manoj nayak
Banned


Joined: 12 Apr 2007
Posts: 15
Topics: 8
Location: Ind
PostPosted: Wed Jun 06, 2007 8:30 am    Post subject: Commented Reply with quote
I didnt get one thing if that is commented that while compilation why it being considered.Please reply soon.
Back to top
View user's profile Send private message
Mervyn
Moderator


Joined: 02 Dec 2002
Posts: 415
Topics: 6
Location: Hove, England
PostPosted: Wed Jun 06, 2007 8:35 am    Post subject: Reply with quote
If you want to comment out a SORT control statement, you need to put an asterisk in column 1.

//* is a JCL comment, so your SYSIN is considered to be empty. Did you get an additional message indicating that //SYSIN had been defaulted in front of your intended control statements?
_________________
The day you stop learning the dinosaur becomes extinct
Back to top
View user's profile Send private message
Bill Dennis
Advanced


Joined: 03 Dec 2002
Posts: 579
Topics: 1
Location: Iowa, USA
PostPosted: Wed Jun 06, 2007 10:27 am    Post subject: Re: Commented Reply with quote
manoj nayak wrote:
I didnt get one thing if that is commented that while compilation why it being considered.Please reply soon.

The //SYSIN DD * is terminated by the first JCL-type card, even a //* comment card, or a /*.
_________________
Regards,
Bill Dennis

Disclaimer: My comments on this foorum are my own and do not represent the opinions or suggestions of any other person or business entity.
Back to top
View user's profile Send private message
Frank Yaeger
Sort Forum Moderator
Sort Forum Moderator


Joined: 02 Dec 2002
Posts: 1618
Topics: 31
Location: San Jose
PostPosted: Wed Jun 06, 2007 10:33 am    Post subject: Reply with quote
Manoj,

You have:

Code:

//SYSIN DD *                                     
//*   SORT FORMAT=BI,FIELDS=(1,20,A)             
//*   SUM FIELDS=NONE                           
      SORT FIELDS=(1,20,BI,A)                   
      INCLUDE COND=(1,20,BI,EQ,C'XXXXXX')       
/*         


You should have:

Code:

//SYSIN DD *                                     
*     SORT FORMAT=BI,FIELDS=(1,20,A)             
*     SUM FIELDS=NONE                           
      SORT FIELDS=(1,20,BI,A)                   
      INCLUDE COND=(1,20,BI,EQ,C'XXXXXX')       
/*     

_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Phantom
Data Mgmt Moderator
Data Mgmt Moderator


Joined: 07 Jan 2003
Posts: 1056
Topics: 91
Location: The Blue Planet
PostPosted: Wed Jun 06, 2007 10:37 am    Post subject: Reply with quote
Major_Nayak wrote:
Quote:

I didnt get one thing if that is commented that while compilation why it being considered


What do you mean my compilation ???? Sort is not a high-level program to compile. Please be clear in your queries and please don't force others to reply soon/immediately. Every member of this forum work in some shop for their own living. They can't dedicate all of their time to you.

Thanks,
Phantom
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group