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
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: 8697
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 Previous  1, 2

 


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