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

S106 abend - Increased the region but it is not working


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

New User


Joined: 25 Apr 2006
Posts: 32
Location: India

PostPosted: Mon Nov 02, 2009 7:57 pm
Reply with quote

Hi,

I have compiled a program in Endevor and it got compiled successfully.When ran the job,it is abending with S106.

Message:
IEW4000I FETCH FOR MODULE FSGLNPGM FROM DDNAME JOBLIB FAILED BECAUSE INSUFFICIENT STORAGE WAS AVAILABLE.
CSV031I LIBRARY ACCESS FAILED FOR MODULE FSGLNPGM, RETURN CODE 24, REASON CODE 26080021, DDNAME JOBLIB
CSV028I ABEND106-0C

I am currently using, REGION=0M.I tried ruinning the job by changin the parameters 4M- 16M, but no luck.

Before, i uploaded the component to enedevor from my personal PDS, i have compressed my PDS since it ran out of space.

Please help.

Thanks,
Satya
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1353
Location: Israel

PostPosted: Mon Nov 02, 2009 8:27 pm
Reply with quote

Maybe you've changed the REGION in your JOB card but there is another REGION in your EXEC PGM card ?
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: Mon Nov 02, 2009 8:28 pm
Reply with quote

Is program FSGLNPGM 24-bit or 31-bit? What language is it written in? Is it a new program or one you are modifying? If you modified it, what did you change about the program?

Compressing the PDS has no bearing on this error.

Endevor has no bearing on this error.

If the program doesn't work with REGION=0M, it sure is not going to run with REGION=4M, ... REGION=16M -- 0M is shorthand for asking for all the available memory.

The system is attempting to fetch the program from the JOBLIB and does not have enough memory (either below the line or above the line). If the program is low on below the line memory, you might be able to get it to run by moving it above the line. If the program is running out of above the line memory, you need to contact your site support group to determine if there are system exits limiting the amount of memory your program can get, and if so how to get more memory.
Back to top
View user's profile Send private message
satya12

New User


Joined: 25 Apr 2006
Posts: 32
Location: India

PostPosted: Mon Nov 02, 2009 8:46 pm
Reply with quote

Hi Robert,

When i looked at compilation dump, i see that AMODE and RMODE are unspecified under processing options and under save module attributes AMODE=ANY and RMODE=24.

This program is written in COBOL.My intention was to make some changes to the existing progran but I didn't want to override the exisiting program.So i have cut & paste the code from Endevor into my personal PDS member with a different name and worked on it.

I have added a table for processing and some more changes.Does program changes(Business logic) affect this abend?

How do we know if the program is running above the line/below the line memory?

Thanks,
Satya
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: Mon Nov 02, 2009 9:00 pm
Reply with quote

RMODE 24 means the program is running (at least residing) below the line. Probably the compile option is DATA(31) since you're getting AMODE ANY. Recompile the program with AMODE(31),RMODE(ANY) in the linkage editor (binder) step.

Check the COBOL data map to see how much memory your program is using in WORKING-STORAGE -- while the theoretical limit below the line is 16 megabytes, the practical limit depends upon the site and what data the systems programmer have placed where; typically 9 to 10 megabytes is all you can get below the line. If your data map says you need more than this, you'll have to run above the line.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Mon Nov 02, 2009 9:17 pm
Reply with quote

Hello,

Quote:
I have added a table for processing and some more changes
How big is this table. . .?
Back to top
View user's profile Send private message
satya12

New User


Joined: 25 Apr 2006
Posts: 32
Location: India

PostPosted: Mon Nov 02, 2009 11:33 pm
Reply with quote

Hi,

The table occurs 999 times and has a record of 559 bytes.There is already a table with the same size in the program.

Thanks,
Satya.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Tue Nov 03, 2009 12:51 am
Reply with quote

Hello,

Why are 2 of these tables needed? What if yet another is needed?

Even if you get this running, what happens when the number of entries or the number of tables increase?

Maybe it would be good to review the design and even if it takes a bit of work, use a better inplementation.

I may be reading too mucn into what has been posted (or has not been posted), but it sounds like things are being implemented in the "least programmer effort" way rather than a solid implemtntation.
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Tue Nov 03, 2009 9:02 am
Reply with quote

Quote:
... it sounds like things are being implemented in the "least programmer effort" way rather than a solid implemtntation.
I wish I had a dime for every time I've seen this happen. icon_evil.gif
Back to top
View user's profile Send private message
satya12

New User


Joined: 25 Apr 2006
Posts: 32
Location: India

PostPosted: Tue Nov 03, 2009 5:35 pm
Reply with quote

Hello Dick,

This is an exisiting program which is not written with standards, now the requirement demanding us to nclude the changes.I have lowered no in the occurs clause for new table and the program has executed successfully.

Shouldn't this be caught in compilation itself?It was a long time ago, i ran into size issue in working storage section and if i remember it correctly the program didn't make it through compilation.

I totally agree with your comments.We just not have time/effort at this time to overhaul the program.

Thanks everybody for your inputs.

Satya.
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: Tue Nov 03, 2009 5:50 pm
Reply with quote

Quote:
Shouldn't this be caught in compilation itself?It was a long time ago, i ran into size issue in working storage section and if i remember it correctly the program didn't make it through compilation.
It is possible to compile programs that cannot execute -- for example, you can define a WORKING-STORAGE variable of 16,777,215 bytes, set the compile option to DATA(24), and the program will compile. It cannot execute because there's no way it'll ever get 16,777,215 bytes of memory but it compiles with no errors, no warnings, no problems.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Tue Nov 03, 2009 8:08 pm
Reply with quote

Hello,

Quote:
I totally agree with your comments.We just not have time/effort at this time to overhaul the program.
Often, people get convinced of this. . .

The biggest danger that i see is that it will not be addressed (i.e. no longer a hot requirement) and the next time there is a similar (and more critical than this one) requirement, then some overhaul will have to be done in a panic. . .

fwiw
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 How to 'Ping' a CICS region in JCL CICS 2
No new posts PD not working for unsigned packed JO... DFSORT/ICETOOL 5
No new posts Def PD not working for unsigned packe... JCL & VSAM 3
No new posts Open VSAM File in IMS DC Region - DFS... IMS DB/DC 0
Search our Forums:

Back to Top