Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
S001 abend during sort

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL
Author Message
akpannur
Currently Banned
New User


Joined: 17 May 2008
Posts: 10
Location: Hyderabad
PostPosted: Wed Sep 17, 2008 4:02 am    Post subject: S001 abend during sort
 Reply with quote
Hi
I am getting S001 abend during sort
Please help
Code:

000013 //STEP010 EXEC PGM=SARBCH                           
000014 //*                                                 
000015 //SYSOUT    DD SYSOUT=*                             
000016 //SYSPRINT  DD SYSOUT=*                             
000017 //*                                                 
000018 //SARRPT1   DD DSN=VENEPU.CP000000.GLOB.FFB.SYSOUT, 
000019 //          DISP=(MOD,CATLG,DELETE),                 
//          DCB=(DSORG=PS,LRECL=133,RECFM=FB),             
//          UNIT=SYSDA,                                     
//          SPACE=(CYL,(1,1),RLSE)                         
//*                                                         
//SYSIN     DD DSN=VENEPU.VINOD.CTC(SARCTC),DISP=SHR       
//*                                                         
//STEP11   EXEC PGM=SORT                                   
//SYSOUT   DD *                                             
//SYSPRINT DD SYSOUT=*                                     
//SORTIN   DD DSN=VENEPU.CP000000.GLOB.FFB.SYSOUT,         
//            DISP=(MOD,CATLG,DELETE)                       
//SORTOUT  DD DSN=VENEPU.TSOXC.JOBS,                       
//            DISP=(NEW,CATLG,DELETE),                     
//            DCB=(LRECL=100,RECFM=FB),                     
//            UNIT=SYSDA,                                   
//            SPACE=(CYL,(1,1),RLSE)                       
//SYSIN    DD *                                             
              SORT FIELDS=COPY                             
              INCLUDE COND=(86,10,CH,EQ,C'09/16/2008')     
/*                                                         

This is the jcl i am using
I am getting an error message as
IEC020I EROPT IS 'ABE' OR NOT SPECIFIED
WER999A SARBAT02,STEP11 , - UNSUCCESSFUL SORT 001 S
IEC020I 001-1,SARBAT02,STEP11 ,SYSOUT ,JES
Code:
Back to top
View user's profile Send private message
References
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 654
PostPosted: Wed Sep 17, 2008 4:25 am    Post subject:
Reply with quote
Hi,

your problem is this statement
Code:
//SYSOUT   DD *   



it shoud be
Code:
//SYSOUT   DD SYSOUT=*




Gerry
Back to top
View user's profile Send private message
akpannur
Currently Banned
New User


Joined: 17 May 2008
Posts: 10
Location: Hyderabad
PostPosted: Wed Sep 17, 2008 4:45 am    Post subject:
Reply with quote
Hi

Thank u very much : icon_surprised.gif
Thanks for helping
Back to top
View user's profile Send private message
Moved: Wed Sep 17, 2008 7:03 am by dick scherrer From DFSORT/ICETOOL to JCL
dick scherrer

Global Moderator


Joined: 23 Nov 2006
Posts: 8652
Location: 221 B Baker St
PostPosted: Wed Sep 17, 2008 7:08 am    Post subject:
Reply with quote
Hello,

Your system uses Syncsort rather than DFSORT - the topic has been moved to JCL where Syncsort topics are discussed.

Code:
//SORTIN   DD DSN=VENEPU.CP000000.GLOB.FFB.SYSOUT,         
//            DISP=(MOD,CATLG,DELETE)   
I believe changing the disp to OLD would be better. You should not issue CATLG more than once for a dataset.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL All times are GMT + 6 Hours
Page 1 of 1