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.