>

>xproblema=0
>correcto='N'
>
>Do While correcto=='N' .And. xproblema<2
>	Try
>		Select CPRESUP
>		Go Top
>		Report Form FEE_F500 Noconsole To Printer
>		correcto=ALERT('Imprimió correctamente?','SN?')
>		XPROBLEMA=0
>	Catch
>		xproblema=xproblema+1
>	Endtry
>Enddo
>

>
>If you can't beat them, join them... I probably won't be able to sleep tonight thinking why this error appears but the problem is solved as you see above
>
>Perhaps any of you could light the darkness of my ignorance.

I do love TRY / CATCH / ENDTRY