gnucobol-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RE: [open-cobol-list] Re: Redefines question


From: Roger While
Subject: RE: [open-cobol-list] Re: Redefines question
Date: Sat May 7 06:20:07 2005

Now thoroughly confused.
Here's 13.16.42.3 on page 337 - point 1 :
1) Storage association for the subject of the entry starts at the first bit of the data item referenced by data-name-2 and continues over an area sufficient to contain the number of bits required by the data item referenced by the subject of the entry. If the subject of the entry requires more bits than the data item referenced by data-name-2, the storage area allocated for the data item referenced by data-name-2 and the subject of the entry is the number of bits required by the data item referenced by the subject of the entry. The size used for references
to the data item referenced by data-name-2 is not changed.

Hmmm.
Clarification ?

Roger


OK,
  I have now found the actual '02 Standard rule.

Page 336, SR(9),

"9) The storage area required for the subject of the entry shall not be
larger than the storage area required for the data item referenced by
data-name-2, unless the data item referenced by data-name-2 has been
specified with level number 1 and without the EXTERNAL clause."

In other words, you can do a redefines of a smaller by a larger - but ONLY
when they are 01-levels (not EXTERNAL). In other words, you need to figure out the "maximum" storage allowed for all 01-levels; allocate that; and then
do the redefines.

  ***

My other notes were thinking about subordinate items - where this is (was)
non-conforming.




reply via email to

[Prev in Thread] Current Thread [Next in Thread]