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

Query regarding variable length cobol table


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
bipinpeter

Active User


Joined: 18 Jun 2007
Posts: 213
Location: Cochin/Kerala/India

PostPosted: Mon Feb 22, 2010 4:53 pm
Reply with quote

Hi All,
I have a query regarding the Cobol array.
I am defining a two dimensional array in Cobol and the second dimension is variable length length.

Sample of code is like below,

Code:
05 WS-ARRAY1  OCCURS 10 TIMES.
     10 WS-A     PIC X(02).
     10 WS-B     PIC 9(04).
     10 WS-ARRAY2  OCCURS 0 TO 10 TIMES DEPENDING ON WS-LIMIT.
          15 WS-C   PIC X(04).
          15 WS-D   PIC 9(07).


Can any one give an idea how the memmory allocation will happen for this?.

Suppose initially if WS-LIMIT is zeroes, it will allocate the memmory for first dimesion only. What will happen if we increment the values in WS-LIMIT.??

Can you suggest any doc for this?
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 Feb 22, 2010 6:21 pm
Reply with quote

Assuming this is a WORKING-STORAGE variable, COBOL allocates memory for all elements of the array since the actual count will not be known at compile time. For the WS-ARRAY1 variable, 1160 bytes will be allocated. You can verify this with the data map at the end of the compile listing (assuming you're getting one generated).
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Store the data for fixed length COBOL Programming 1
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts PARSE Syntax for not fix length word ... JCL & VSAM 7
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
Search our Forums:

Back to Top