Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Program is abending with S337 code

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging
View previous topic :: :: View next topic  
Author Message
samedesh
Currently Banned

New User


Joined: 22 May 2007
Posts: 46
Location: India

PostPosted: Fri Mar 07, 2008 11:01 am    Post subject: Program is abending with S337 code
Reply with quote

Can anybody help me in solving abend S337. I'm using GDG and trying to update the file when restart occurs. By searching on net I found that S337 comes when "error occured when end of file reached".
Please help icon_sad.gif
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Fri Mar 07, 2008 11:04 am    Post subject: Reply to: Program is abending with S337 code
Reply with quote

The error description for S337 should point you to look at the error message (like IEC something). What did it say?
Back to top
View user's profile Send private message
samedesh
Currently Banned

New User


Joined: 22 May 2007
Posts: 46
Location: India

PostPosted: Fri Mar 07, 2008 11:16 am    Post subject: Reply to: Program is abending with S337 code
Reply with quote

It is giving me "BSAM ABEND IN SSAM PROCESSING"
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Fri Mar 07, 2008 11:25 am    Post subject: Reply to: Program is abending with S337 code
Reply with quote

What are you using for the system message lookup reference?

I get z/OS V1R7.0 MVS System Codes:

Quote:

337

Explanation: The error occurred when the end of a data set was reached. This system completion code is accompanied by message IEC024I. Refer to the explanation of message IEC024I for complete information about the task that was ended and for an explanation of the return code (rc in the message text) in register 15.

Application Programmer Response: Respond as indicated for message IEC024I.

System Programmer Response: If the error recurs and the program is not in error, look at the messages in the job log for more information. Search problem reporting data bases for a fix for the problem. If no fix exists, contact the IBM Support Center. Provide the JCL, the program listing, and the compiler output for the job.

Source: DFSMSdfp


Quote:

| IEC024I 337-rc,mod, jjj,sss,ddname[-#], dev,ser,dsname( member)

Explanation: The error occurred when the end of a data set was reached.
In the message text:

rc
Associates this message with system completion code 337 and with the return code.

jjj
Job name.

sss
Step name.

ddname[-#]
DDname (followed by a concatenation number if it is part of a physical sequential concatenated data set and not the first DD statement in the concatenation).

dev
Device number.

ser
Volume serial number.

mod
The name of the module in which the error occurred.

| dsname(member)
Data set name. Member name if specified.

The explanation of the hex return code is as follows:

Return Code Explanation

04
The end of a data set was reached, but no end- of-data-set routine (EODAD) was specified in the DCB.

08
No EODAD specified in the DCB for DD DUMMY data set.


System Action: The task is ended.

Operator Response: Start a generalized trace facility (GTF) trace, and re-create the problem. Reply to message AHL100A with:

TRACE=SYS,USR,SLIP

On the DD statement for the data set in error, specify:

DCB=DIAGNS=TRACE

Application Programmer Response: Probable user error. Correct the errors causing the abnormal end as indicated by the return code in the message text. Then rerun the job.

System Programmer Response: If the error recurs and the program is not in error, look at the messages in the job log for more information. Search problem reporting data bases for a fix for the problem. If no fix exists, contact the IBM Support Center. Provide the SYSOUT output for the job.

Source: DFSMSdfp

Detecting Module: IFG0552X

Routing Code: 11

Descriptor Code: 6
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 -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts JCL to Set Return code based on DB2 S... vinu78 DB2 17 Mon Mar 13, 2017 9:47 pm
No new posts IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm
No new posts CA Workload Automation event code help vinu78 CA Products 10 Wed Mar 01, 2017 10:05 am
No new posts SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts MAX-RC 88 and Return code 606 in DFH0... lind sh CICS 2 Tue Jan 24, 2017 1:23 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us