You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
Describe the bug
VALUE clause cannot be specified for:
A REDEFINES item or an item having a parent which is a REDEFINES.
An item having a parent with a VALUE clause.
To Reproduce
(Type)Cobol code that cause the bug :
01 group0.
05 group1.
10 var1 PIC XVALUE'Y'.
* Error1: item is a REDEFINES10 var-redef REDEFINES var1 PIC XVALUE'O'.
05 group2 REDEFINES group1.
* Error1: item's parent is a REDEFINES10 var2 PIC XVALUE'N'.
05 group3 VALUE'P'.
10 group31.
* Error2: item has a parent with a VALUE clause15 var3 PIC XVALUE'I'.
Expected behavior
Message from IBM for error1:
A"VALUE"clause was specified for an item that contained, or was subordinate to an item that contained, a"REDEFINES"clause. The"VALUE"clause was discarded.
Message from IBM for error2:
A"VALUE"clause was previously specified for a group containing this item. The"VALUE"clause was discarded for this item.
Technical
Should be done in CrossChecker
How to test automatically
Standard unit tests.
The text was updated successfully, but these errors were encountered:
efr15
changed the title
VALUE clause cannot be specified in conjunction with REDEFINES
VALUE clause cannot be specified in conjunction with REDEFINES and for an item having a parent with a VALUE clause
May 23, 2024
Describe the bug
VALUE clause cannot be specified for:
To Reproduce
(Type)Cobol code that cause the bug :
Expected behavior
Message from IBM for error1:
A"VALUE"clause was specified for an item that contained, or was subordinate to an item that contained, a"REDEFINES"clause. The"VALUE"clause was discarded.
Message from IBM for error2:
A"VALUE"clause was previously specified for a group containing this item. The"VALUE"clause was discarded for this item.
Technical
Should be done in
CrossChecker
How to test automatically
Standard unit tests.
The text was updated successfully, but these errors were encountered: