QRG4188

The unused positions (09-20 or 59-74) of a Data-Structure-Subfield specification with a literal initialization value must be blank. Defaults to blanks.

Specify blanks in positions 9-20 and 59-74. Compile again.