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

reagarding the abend S40D


IBM Mainframe Forums -> ABENDS & Debugging
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
krishna_mf

New User


Joined: 31 Jan 2007
Posts: 56
Location: banglore

PostPosted: Thu Jul 08, 2010 9:48 pm
Reply with quote

Hi,

This is again reagarding the abend S40D. Need help in understanding some system concepts.
i have added one initlization statment to existing progam and this is causing the progam to abend with S40D.
I am not sure whether adding a single statment has resulted in increase in porgam size and resulted in space issue.
Is ther any memory map built up for a program and when we make some changes in program does this overwrite the map and result in storage abend?
program load size of previous version is 372CA8 and new version is 372F70
Thanks
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Thu Jul 08, 2010 10:17 pm
Reply with quote

Explanation: When the recovery termination manager (RTM) was ending a task, recursive errors occurred. RTM ends the address space. This abend code is in the ASCBMCC field in the address space control block (ASCB) for the ended address space and in message IEF402I.
Not enough info and it doesn't look like a 'storage abend'......
Back to top
View user's profile Send private message
krishna_mf

New User


Joined: 31 Jan 2007
Posts: 56
Location: banglore

PostPosted: Mon Jul 19, 2010 7:27 pm
Reply with quote

I have the following code added to already existing code that si causing problem

IF status_code = ' ' then
do;
put skip list('item no:', item_no);
process='0'b;
end;

this is causing the job to abend with S878-10 in slip dump and in spool it is showing S40D and SF09 sometimes.

But inorder to check for which item is is abending i removed the statment process='0'b from the above if condition and coded as below

IF status_code = ' ' then
put skip list('item no:', item_no);

then the job ran fine and not resulted in S40D abend and nothing is printed in output for item_no and
when i revert back the code and inculed the process='0'b; in IF it abends with S40D again

I am not sure why the system is behaving like this.

Please advise.

Thanks
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


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

PostPosted: Mon Jul 19, 2010 7:43 pm
Reply with quote

How much memory is being used by the program when it runs?
Back to top
View user's profile Send private message
krishna_mf

New User


Joined: 31 Jan 2007
Posts: 56
Location: banglore

PostPosted: Mon Jul 19, 2010 8:16 pm
Reply with quote

Please let me know how to check the memeory used by the program

Thanks
Back to top
View user's profile Send private message
krishna_mf

New User


Joined: 31 Jan 2007
Posts: 56
Location: banglore

PostPosted: Mon Jul 19, 2010 10:16 pm
Reply with quote

Below is the inofrmation that i can find from syslog
IEA705I ERROR DURING GETMAIN SYS CODE = 878-10 Jobname ST020 PC020 00
IEA705I 00F43300 008A3500 008A3500 00E61200 000002D0

IEA705I ERROR DURING GETMAIN SYS CODE = 878-10 jobname ST020 PC020 00
IEA705I 00F43300 008A3500 008A3500 00E61200 000000E8

Thanks
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


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

PostPosted: Mon Jul 19, 2010 10:39 pm
Reply with quote

I usually look at the IEF374I message in the output of the job. This message is issued by SMF and has the format
Code:
IEF374I STEP/TMP     /STOP  2010200.1006 CPU    0MIN 00.23SEC SRB    0MIN 00.00SEC VIRT   256K SYS   340K EXT    2080K SYS   11584K
where VIRT gives memory used below the line and EXT gives memory used above the line by your program.

If you have REGION=X (where X is a value in K, M, or G) coded on your job card or EXEC statement, and VIRT is close to X, you may need to increase X.
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 -> ABENDS & Debugging

 


Similar Topics
Topic Forum Replies
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts Abend S0C4 11 (Page Translation Excep... PL/I & Assembler 16
No new posts WER999A - UNSUCCESSFUL SORT 8ED U Ab... SYNCSORT 5
No new posts the system or user abend SF0F R=NULL COBOL Programming 0
No new posts Need to get an DLI abend like U0200 IMS DB/DC 2
Search our Forums:

Back to Top