DO or END is not valid with Factor 1 or Factor 2 containing a numeric with decimal digits specified.
20
Cause . . . . . : A DO or END operation is specified with a Factor 1 entry (positions 12 - 25), or a Factor 2 entry (positions 36 - 49) having a float literal, or a numeric literal value with decimal positions specified. Entry defaults to blanks,
Recovery . . . : Specify a Factor 1 entry (positions 12 - 25) or a Factor 2 entry (positions 36 - 49) with zero decimal positions. Compile again.
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.