Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Query regarding variable length cobol table

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
bipinpeter

Active User


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

PostPosted: Mon Feb 22, 2010 4:53 pm    Post subject: Query regarding variable length cobol table
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: 7997
Location: Bellevue, IA

PostPosted: Mon Feb 22, 2010 6:21 pm    Post subject:
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    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Data replication from multiple Db2 ta... kishpra DB2 1 Mon Mar 27, 2017 9:58 pm
No new posts Count the length of the record & ... sreekusr DFSORT/ICETOOL 4 Thu Mar 23, 2017 7:52 pm
No new posts JCL to Set Return code based on DB2 S... vinu78 DB2 17 Mon Mar 13, 2017 9:47 pm
No new posts Writing on to GSAM variable length rohanthengal JCL & VSAM 6 Fri Mar 03, 2017 7:46 pm
No new posts how to send just 10 rows in a CICS sc... Megha Gupta CICS 5 Thu Feb 23, 2017 6:57 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us