The FORMAT bif isn't normalizing correctly for:
say format(y) /*correctly formatted, shows 8.0.*/
say format(y,,,,0) /*shows 8*/
The IBM (CMS) documentation says the number is normalized, just as though the
operation "number+0" had been carried out.
Regina's documentation says the number if normalized according to NUMERIC (sic).
_______________________________________ Gerard Schildberger