HP DDL D40 Reference Manual page 253

DDL Compiler Commands
TYPE COMPLEX
TYPE LOGICAL
A TYPE BINARY 64 declaration cannot specify a scale factor of -18 (or less);
the range is restricted to -17 to 18.
A data item must not have the same name as a group or record that could be
used to qualify the data item.
No more than 3 levels of nested OCCURS can be in a COBOL data-
description entry.
An item specified as a key in a RECORD statement must be alphanumeric. To
use a numeric field as a key, enclose it within a group and specify the group as
the key; a group's data type is assumed to be alphanumeric regardless of the
data types of its member fields.
COBCHECK Command Example
The following listing shows the error messages generated by the COBOL syntax check
on a single RECORD statement:
?COBCHECK
RECORD customer.
FILE IS "$data.sales.customer" KEY-SEQUENCED.
02 custnum PIC S9(4) KEYTAG 0.
02 custname PIC X(18) KEYTAG "cn".
02 custaddr TYPE addr.
END
Record CUSTOMER size is 70 bytes.
*** WARNING *** COBOL OUTPUT DIAGNOSTICS:
*** ERROR *** Non-alphanumeric key element - CUSTNUM
?NOCOBCHECK
When COBCHECK is in effect, DDL issues the following message for each DDL object
statement that passes the syntax check:
COBOL CHECK completed for name
Data Definition Language (DDL) Reference Manual—426798-002
Start syntax check
Turn off syntax check
VST904.vsd
9- 23
COBCHECK Command