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

Insufficient storage while running a cobol program


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

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Fri Jul 11, 2008 6:23 pm
Reply with quote

I had not noticed that the program had rmode 24...
i still think that the only way is to coordinate with the support group
Back to top
View user's profile Send private message
kedianirmal

New User


Joined: 08 Feb 2008
Posts: 82
Location: Bangalore, India

PostPosted: Fri Jul 11, 2008 6:42 pm
Reply with quote

Thanks all,

I am in touch with the support group but not getting any update since last two days, hopefully they will come back with some solution.

Enrico,
could you tell me what's the significance of RMODE=24.

Regards,
Nirmal
Back to top
View user's profile Send private message
kedianirmal

New User


Joined: 08 Feb 2008
Posts: 82
Location: Bangalore, India

PostPosted: Fri Jul 11, 2008 6:47 pm
Reply with quote

Robert,

Quote:
change the program to run in 31-bit mode


Do you mean we need the whole mainframe to be upgraded to 31 bit and now we are using 24 bit mainframe?

Regards,
Nirmal
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: Fri Jul 11, 2008 6:54 pm
Reply with quote

No, all IBM computers for quite a few years support 31-bit addressing. The latest generations support 64-bit addressing, even. However, your program is specifically coded to use 24-bit addressing. The COBOL option DATA(31) along with specifying AMODE(31),RMODE(ANY) in your linkage step will convert your program to 31-bit addressing. However, if there are subroutines that require 24-bit addressing, doing this can cause them to generate S0C4 abends since you may pass an address to the subroutine that it cannot access.
Back to top
View user's profile Send private message
Bill Dennis

Active Member


Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA

PostPosted: Fri Jul 11, 2008 7:08 pm
Reply with quote

kedianirmal wrote:
could you tell me what's the significance of RMODE=24
Using 24 bit addressing, your progam MUST reside within the first 16MB of the memory range. A lot of that range is used for system code usually leaving only 9 to 10MB free for user programs. You have exceeded that limit.

You;ll need to investigate using 31-bit addressing or reduce the array sizes.
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: Fri Jul 11, 2008 9:29 pm
Reply with quote

Hello,

Your module doubled in size. . . Why?

Quote:
I have increased three arrays in the program from 2000 to 4000 which is declared as PIC X.

Possibly, i misunderstood, but i read that you added only a few k bytes. Did something else change?

Depending on just why this size increased, the approach to the solution may need to change. . . Even if you find a way to run "this" version, there may well come a time when you make it large enough that it cannot run.
Back to top
View user's profile Send private message
kedianirmal

New User


Joined: 08 Feb 2008
Posts: 82
Location: Bangalore, India

PostPosted: Tue Jul 15, 2008 5:43 pm
Reply with quote

Hi,

Previousely Robert Sample has mentioned that
Quote:

No, all IBM computers for quite a few years support 31-bit addressing. The latest generations support 64-bit addressing, even. However, your program is specifically coded to use 24-bit addressing. The COBOL option DATA(31) along with specifying AMODE(31),RMODE(ANY) in your linkage step will convert your program to 31-bit addressing. However, if there are subroutines that require 24-bit addressing, doing this can cause them to generate S0C4 abends since you may pass an address to the subroutine that it cannot access.


What can be considered as a subroutine. Perfrom section can be considered as a subroutine in a program? The section is defined in the program itself.

Regards,
Nirmal
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Tue Jul 15, 2008 6:04 pm
Reply with quote

'Pounding sand' is a phrase that comes to mind.
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 Jul 15, 2008 6:07 pm
Reply with quote

In this context, a subroutine is a separately compiled piece of code that is called by your program. PERFORM sections in a single COBOL program would not qualify as subroutine in this context. CALL 'ABC' USING ... would be a case of a subroutine. Basically, if the binder (linkage editor) requires an INCLUDE statement for the program name, it's a subroutine in this context.
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 Jul 15, 2008 9:11 pm
Reply with quote

Hello,

To repeat:
Quote:
Your module doubled in size. . . Why?


If you resolve this, your problem should go away. . .

If this cannot be resolved, you may need to look at a different approach.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Tue Jul 15, 2008 9:21 pm
Reply with quote

maybe, after all, the three arrays that were doubled in size were not PIC X icon_biggrin.gif
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 Goto page 1, 2  Next

 


Similar Topics
Topic Forum Replies
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts Using API Gateway from CICS program CICS 0
No new posts Running REXX through JOB CLIST & REXX 13
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
Search our Forums:

Back to Top