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

S878/S40D Abend with a PL/I program


IBM Mainframe Forums -> JCL & VSAM
Post new topic   This topic is locked: you cannot edit posts or make replies.
View previous topic :: View next topic  
Author Message
CICS fan

New User


Joined: 03 Apr 2008
Posts: 82
Location: United States

PostPosted: Wed Jul 06, 2011 1:53 am
Reply with quote

Hello,

We have a Pl/1 program which dynamically creates around 240 files. We have been getting S878 abend. Tried using REGION parameter(in jobcard and step), and using VOL=(,,,250), BUFNO=1, but to no avail.

We are sometimes getting S40D when we are reducing the space in DCB for the same job.

Can anybody help on this?
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Wed Jul 06, 2011 2:09 am
Reply with quote

NO!
how do You expect somebody to help with the absolutely nothing You have told us ?

You should at least give evidence that You have looked at the manual for s878 abend...

but you did not ( look at the manual ),
if You had You would have noticed that the s878 abend is associated to some reason code
and You should have shown the good sense of posting also the reason code

but we are expecting too much icon_evil.gif
Back to top
View user's profile Send private message
CICS fan

New User


Joined: 03 Apr 2008
Posts: 82
Location: United States

PostPosted: Wed Jul 06, 2011 2:19 am
Reply with quote

Relax :-)
We have been researching a lot on this and trying a few different things
BTW this is what we got:

Code:
CFFE100 SVCSRECV S878  AT 158982C4 LMOD N/A      CSECT N/A 
CFFE901 NSI: 070C0000 958982C4                             
CFFE902 ILC: 02 INTERRUPT CODE: 78 REASON CODE: 0000000C   
CFFE909 TRANSLATION EXCEPTION ADDRESS 17236000 17236000     
CFFE904 R0 - R3  00005040 00000000 96B9FD0C 17235880       
CFFE905 R4 - R7  9589825C 9589821E 96B9FB7E 172358E0       
CFFE906 R8 - R11 158D62E0 00C6A020 00C76020 15898F18       
CFFE907 R12- R15 95897F18 172358F0 15898E1C 0000FD12       
CFFE001 SVCSRECV DUMP IN PROGRESS                           
CFFE003 SVCSRECV DUMP UNSUCCESSFULLY COMPLETED - RC,X'000000
CF99032 SVC S HAS ABENDED AND AN SDUMP HAS OCCURRED         
@DRTPS01:  NOT ENOUGH SPACE ON VOLUME                         
 ACFFE100 SVCSRECV S878  AT 158982C4 LMOD N/A      CSECT N/A 
 ACFFE901 NSI: 070C0000 958982C4                             
 ACFFE902 ILC: 02 INTERRUPT CODE: 78 REASON CODE: 0000000C   
 ACFFE909 TRANSLATION EXCEPTION ADDRESS 1724A000 1724A000     
 ACFFE904 R0 - R3  00005040 00000000 96B9FD0C 17249880       
 ACFFE905 R4 - R7  9589825C 9589821E 96B9FB7E 172498E0       
 ACFFE906 R8 - R11 158D62E0 00C6A020 00C76020 15898F18       
 ACFFE907 R12- R15 95897F18 172498F0 15898E1C 0000FD12       
*ACFFE001 SVCSRECV DUMP IN PROGRESS                           
 ACFFE003 SVCSRECV DUMP UNSUCCESSFULLY COMPLETED - RC,X'000000
 ACF99032 SVC S HAS ABENDED AND AN SDUMP HAS OCCURRED         
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Wed Jul 06, 2011 2:28 am
Reply with quote

Quote:
Can anybody help on this?
With the little you've provided so far, no we cannot help you. At a minimum, you need to tell us the reason code for the S878 -- as enrico said. You also need to describe the process in a LOT more detail -- are you allocating 240 files one at a time and not releasing or freeing them? Do you expect to be able to allocate 240 files to your program? Is this a program that is brand new, or did it used to work before you changed something?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Wed Jul 06, 2011 2:31 am
Reply with quote

Just out of curiosity, do you not consider this a clue?
Code:
@DRTPS01:  NOT ENOUGH SPACE ON VOLUME
Which raises the question, are you checking the dynamic allocation return code or just assuming it worked?
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies. View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Using API Gateway from CICS program CICS 0
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts DB2 Event passed to the Application P... DB2 1
No new posts How to pass the PARM value to my targ... COBOL Programming 8
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
Search our Forums:

Back to Top