Clipper/FiveWin - Problema al imprimir

Hola compañeros:
Tengo un problema y es bastante raro:
Mi aplicación (compilada en 32bit) tiene la opción de imprimir recibos y para ello le cambio el tamaño del papel mediante "oprn:setsize(X,Y)". He detectado que cuando entro por primera vez en el EXE e imprimo un recibo, me lo imprime con una letra descomunal (arial 90 aprox.), sin embargo a partir del 2º me lo hace bien. El problema está cuando salgo y vuelvo a entrar en el EXE:
El codigo fuente es el siguiente:
......
print oprn name 'IMPRESIÓN DE PAGARÉS A PROVEEDORES'
DEFINE font let name 'Arial' size 0,((confpaga->tamletra)*-1) of oprn
DEFINE font let1 name 'Arial' size 0,((confpaga->tamletra1)*-1) of oprn BOLD
oprn:setup()
oprn:setportrait()
oprn:setsize(confpaga->tamanox*100,confpaga->tamanoy*100)
page
......
.......
endpage
endprint
oprn:setsize(2900,2080) //para restaurar el tamaño del papel ¿Es correcto ?
endprint
let:end()
let1:end()

MIL GRACIAS POR TODO