MVSFORUMS.com

Martin · Beginner Joined: 20 Mar 2006 Posts: 133 Topics: 58

Hi,

I have this complex array in a cobol program:

kolusu · Posted: Mon May 11, 2009 2:42 pm Post subject:

Martin,

simple search ?

http://www.mvsforums.com/helpboards/viewtopic.php?t=4327&highlight=array

Kolusu

Martin · Beginner Joined: 20 Mar 2006 Posts: 133 Topics: 58

dbzTHEdinosauer · Posted: Mon May 11, 2009 3:04 pm Post subject:

Martin,
how about looking up the INITIALIZE function in the COBOL Manual.

or you could generate 800 X 300 data entry items with value clauses, then redefine them with the table definition, then everything would be initialized at load time.

IF you are soooo concerned with CPU time, then use a counter and only initialize those items you use, as you populate them.

If you are going to be doing SEARCHes (serial, obviously) you will save time by having a counter.
_________________
Dick Brenholtz
American living in Varel, Germany

dbzTHEdinosauer · Posted: Mon May 11, 2009 3:06 pm Post subject:

kolusu · Posted: Mon May 11, 2009 3:35 pm Post subject:

Terry_Heinze · Posted: Mon May 11, 2009 4:07 pm Post subject:

Another way to initialize a COBOL table (array) is to assign values to the elementary fields. No PROCEDURE DIVISION statements are then necessary. This won't work if the table needs to be initialized more than once during the program of course. Check the Programming Guide for this method.
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3PG30/1.4.4.3.3?SHELF=&DT=20050628164603
_________________
....Terry