HP DDL D40 Reference Manual page 378

DDL Messages
***ERROR*** COMP item found within VALUE
Cause. You have defined a computational item within a group defined with a VALUE
clause. For example, the following definition is invalid:
Def a.
02 b value zeros.
03 c pic 9 comp.
End
An initial value at the group level must be alphanumeric.
Effect. DDL rejects the object.
Recovery. Change the data type of the computational item, or remove the VALUE
clause from the group.
***ERROR*** COMP item must be binary or of the form PIC
[S]9(n) [V9(n)]
Cause. The data type of an item described with a USAGE IS COMP clause is not a
computational data type.
Effect. DDL rejects the object.
Recovery. Correct the error and recompile. For more information about computational
items, see USAGE Clause
***ERROR*** COMP specified with reference item which is not
COMP- element_name
Cause. The data type of the referenced item identified by element_name is
described with a USAGE IS COMP clause but is not a computational data type.
Effect. DDL rejects the object.
Recovery. Correct the error and recompile. For more information about computational
items, see USAGE Clause
***ERROR*** COMP-3 data item must be of the form PIC
[S]9(n)[V9(n)]
Cause. The data type of an item described with a USAGE IS COMP-3,
COMPUTATIONAL-3, or PACKED-DECIMAL clause is not PACKED-DECIMAL.
Effect. DDL rejects the object. For example:
!def emp pic x PACKED-DECIMAL.
Data Definition Language (DDL) Reference Manual—426798-002
on page 6-74.
on page 6-74.
^
A- 8
DDL Error and Warning Messages