[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[open-cobol-list] Re: Initialize
From: |
Guenter . Sandner |
Subject: |
[open-cobol-list] Re: Initialize |
Date: |
Mon Jun 6 05:22:20 2005 |
Hello Hans-Martin Rasch, Roger While, Bill Klein
Thank you for the reply.
I have tested the proposed changes. The INITIALIZE works fine now, except
that the FILLER will be initialized too.
(same behaviour initializing a non "redefine" item with the original cobc).
Kind regards
Guenter Sandner
Roger While <address@hidden> on 05.06.2005 08:48:44
To: address@hidden
cc: address@hidden
Subject: Re: Initialize
The code is valid Cobol syntax and should do what
one expects.
I will have a look at this.
Note that the only time when a "redefines" should be initialized
is when it is the direct object of an INITIALIZE verb.
So eg.
01 XYZ PIC X(8).
01 XYZ-RED REDEFINES XYZ.
03 AB1 PIC X(4).
03 AB1-RED REDEFINES AB1 PIC 9(8) COMP.
03 FILLER PIC X(4).
INITIALIZE XYZ-RED.
This will/should put spaces into the area.
Roger