Thanks for the suggestions.

The first did not work because it separates day by day, instead of period by period.

The second did work when I applied it to both year and month.

ToText (
Year(
{QI62A History Headers.Date}),0
)&' '&
(if (
Month ({QI62A History Headers.Date})
)<=9 then ' 0'&
ToText (
Month ({QI62A History Headers.Date}),0
) else ''&
ToText (Month ({QI62A History Headers.Date}),0 ) )

When I tried it without using ToText for the month, the result was 2,005 01.00

Although I could hide the trailing decimals by shortening the field, that comma in the year looked mighty strange. I had to change the format for number fields to eliminate the comma.