OK, just for "fun", I have downloaded a lot of the company's COBOL source
to my Linux workstation. I am compiling it with GNU COBOL. The results are
amazing clean. Well, that is, not many errors. However I have run into one
which is really confusing me. It is in a data definition. To boil it down
to a basic level, consider the following, which is accepted by 3.4.1
01 A
10 B
15 C1
15 C2
12 D
15 E1
15 E2
10 F
The GNU COBOL compiler chokes on the "12 D", emitting the error message:
Warning: No previous data item of level 18
This message seem correct to me.
Unfortunately the compile listing on z/OS does not have a DMAP (or whatever
it's called now). But I am thinking that the IBM compiler has inserted a
FILLER type entry to make the above look like:
01 A
10 B
12 FILLER
15 C1
15 C2
12 D
15 E1
15 E2
10 F
Does anybody know, for certain sure, what the IBM compiler is doing with
this. It really seems, to me, that it should be flagging the original code
as being in error, as the GNU compiler does.
--
Schrodinger's backup: The condition of any backup is unknown until a
restore is attempted.
Yoda of Borg, we are. Futile, resistance is, yes. Assimilated, you will be.
He's about as useful as a wax frying pan.
10 to the 12th power microphones = 1 Megaphone
Maranatha! <><
John McKown
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
