RE: [open-cobol-list] Non-Standard Level numbers

[Bill Klein]

Have you tried to compile this on an IBM mainframe?  It would not surprise
me if: 

 01 A.
     05 B.
          10 C PIC X.
    04 D.
          05 E PIC X.

actually receives a compiler error on an IBM mainframe, as it would (maybe)
treat "D" as a group item at the 05-level with no subordinate elementary
items below it, before the next 05-level.

I have NOT tried this, but I think this might cause an error on the
mainframe.

> -----Original Message-----
> From: Sergey Kashyrin [mailto:address@hidden 
> Sent: Wednesday, January 18, 2006 6:44 PM
> To: Bill Klein; address@hidden
> Subject: Re: [open-cobol-list] Non-Standard Level numbers
> 
> Bill,
> 
> Thanks for the reference. Unfortunately I don't feel that it 
> is correct explanation of the reality.
> I've implemented that in a little bit different way in OC but 
> I think it's valid.
> I'm inserting a fake FILLER instead of pushing the level for 
> a variable.
> i.e.
> 01 A.
>     05 B.
>          10 C PIC X.
>    04 D.
>          05 E PIC X.
> 
> will be converted to
> 01 A.
>    04 FILLER.
>     05 B.
>          10 C PIC X.
>    04 D.
>          05 E PIC X.
> 
> IBM explanation is that D will go to the same level as B. But 
> they've left out of discussion what will happen to E in this case.
> 
> Regards,
> Sergey
> 
> ----- Original Message ----- 
> From: "Bill Klein" <address@hidden>
> To: <address@hidden>
> Sent: Wednesday, January 18, 2006 7:24 PM
> Subject: [open-cobol-list] Non-Standard Level numbers
> 
> 
> > For documentation on how IBM handles "non-Standard" level 
> numbers, see:
> > 
> > 
> http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy
> 3lr30/5.1.6.2
> > 
> > 
> > and look at the section beginning,
> > 
> > "You can also define groups with subordinate items that 
> have different
> > level-numbers for the same level in the hierarchy."
> > 
> > 
> > 
> > 
> > -------------------------------------------------------
> > This SF.net email is sponsored by: Splunk Inc. Do you grep 
> through log files
> > for problems?  Stop!  Download the new AJAX search engine that makes
> > searching your log files as easy as surfing the  web.  
> DOWNLOAD SPLUNK!
> > 
> http://sel.as-us.falkag.net/sel?cmd=lnk&kid=103432&bid=230486&;
> dat=121642
> > _______________________________________________
> > open-cobol-list mailing list
> > address@hidden
> > https://lists.sourceforge.net/lists/listinfo/open-cobol-list
>