xfrom=ALLTRIM(UPPER(xfrom))
xto=ALLTRIM(UPPER(xto))
IF !EMPTY(xfrom) OR !EMPTY(xto) && Probably should be AND instead?
ENDIF

Regards,

Mike

"We try to solve the problem by rushing through the design process so that enough time is left at the end to uncover the errors that were made because we rushed through the design process."
- Glenford Myers

If you're going through hell, keep going. - Walt Disney