FIXED

FIXED is an arithmetic data type attribute that defines a fixed-point arithmetic variable. Its format is:

FIXED[(p[,q])]

The precision p,q (q is optional and represents fractional digits) may be supplied with this attribute or with the BINARY or DECIMAL attribute, but it cannot be specified twice. The precision p and the scale q (if specified) must be positive integers. If a precision or scale is not specified, a default is assumed. If FIXED is specified without BINARY or DECIMAL, DECIMAL is assumed. For details on precisions, see your Open PL/I User's Guide and the section DEFAULT in the chapter Statements.

When used with BINARY, FIXED specifies integer arithmetic values that contain at least p bits. In this case, q must not be specified.

When used with DECIMAL, FIXED specifies fixed-point arithmetic values that contain at least p decimal digits. If q is specified, p minus q digits are integral digits and q digits are fractional digits. If q is omitted, q = 0 is assumed. These values are integers containing at least p decimal digits.

Note: FIXED DECIMAL fractions with a precision less than the scale are not supported.
declare fd fixed decimal (1,2) init (2)  /* not supported. */