GRS6125

When *DAY, *MONTH, *YEAR, UDAY, UMONTH or UYEAR is specified as the field-name entry (positions 32-37 of an output specification), edit-code Y is not valid (position 38). The Edit-Code entry (position 38) is not valid when a character literal or named constant is specified in the Constant entry (positions 45-70). The Edit-Code entry defaults to blanks.

Remove the Y edit code. Compile again. entry (positions 32-37). Compile again.