RE: [open-cobol-list] Re: Initialize

[Bill Klein]

Just to clarify (and I think you know this) - it should put spaces in the
first 4 bytes - the last 4 bytes (FILLER) remain "unchanged". 

> -----Original Message-----
> From: address@hidden 
> [mailto:address@hidden On 
> Behalf Of Roger While
> Sent: Sunday, June 05, 2005 1:49 AM
> To: address@hidden
> Cc: address@hidden
> Subject: [open-cobol-list] 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
> 
> 
> 
> 
> 
> -------------------------------------------------------
> This SF.Net email is sponsored by: NEC IT Guy Games.  How far 
> can you shotput
> a projector? How fast can you ride your desk chair down the 
> office luge track?
> If you want to score the big prize, get to know the little guy.  
> Play to win an NEC 61" plasma display: http://www.necitguy.com/?r=20
> _______________________________________________
> open-cobol-list mailing list
> address@hidden
> https://lists.sourceforge.net/lists/listinfo/open-cobol-list
>