This has already been brilliantly explained by Frank Swarbrick;
the new COBOL compiler version has a new INITIALIZE statement
which is able to INITIALIZE variables of the LINKAGE SECTION,
so that the VALUEs coded there are not comments any more,
but instead the have a meaning !!
In the past, when they were comments, there was a warning,
regardless if they were coded right or wrong.
Now, when they are no comments any more, they may be coded right:
RC = 0
or wrong:
RC = 12
as in your case
This is, IMO, a "hidden syntax error", which was not visible in the past,
because the old compiler treated the VALUE clause as a comment in
the linkage section; now it is visible, and you have to change your
sources due to this compiler release change. Perfectly normal.
Kind regards
Bernd
Am 21.07.2017 um 17:20 schrieb Cameron Conacher:
Here is a snippet from someone else's observations:
Hi
Just wondering has anyone confronted this compile issue stated for COBOL 6.1?
Version 6.1
COBOL source code differences in Enterprise COBOL Version 6
In Enterprise COBOL V5 and earlier versions, a non-88 level VALUE clause in the
LINKAGE SECTION or FILE SECTION was treated as a comment. However,
starting in Enterprise COBOL V6.1, the VALUE clause for LINKAGE SECTION and
FILE SECTION items is now syntax checked and has meaning. This means that a
program that is compiled with RC=0 with COBOL V5 could get RC=12 with
COBOL V6.
For example, with Enterprise COBOL V5 and earlier versions:
000224 LINKAGE SECTION.
000225 01 ALPH-ITEM PIC X(4) VALUE 1234.
==000225==> IGYDS1158-I A non-level-88 "VALUE" clause was found in the
"FILE SECTION" or "LINKAGE SECTION". The "VALUE" clause was treated as comments.
With Enterprise COBOL V6:
000224 LINKAGE SECTION.
000225 01 ALPH-ITEM PIC X(4) VALUE 1234.
==000225==> IGYGR1080-S A "VALUE" clause literal was not compatible with the data
category of the subject data item. The "VALUE" clause was discarded.
Hope that helps
Sent from my iPhone
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
