Clipper/FiveWin - Impresión en diferentes puertos

Tengo un sistema en donde dirijo la salida a un puerto lpt y me marca un error, se sale del sistema sin decirme nada y me envia un mensaje el windows (95, 98, 2000) informandome: que el programa a efectuado una operacion no valida y va a terminar. Yo tengo el programa de esta manera:

dbselectarea('impresora')
xpuerto=alltrim(puerto) // Puerto tiene almacenado LPT1
set console off
set print to &xpuerto
set device to printer

Reporte

P.D. En otros sistemas tengo exactamente lo mismo y me funciona correctamente. De antemano gracias...

A mi ese error me ha pasado muchas veces, sin explicacion ni solucion. En unos ordenadores pasa y en otros no. Yo desde entonces cambie mis programas y nunca imprimo directamente en el puerto, sino que lo hago en un archivo y luego imprimo el archivo y asi funciona siempre.

Ejemplo.

set console off
set printer to archivo.txt
set device to print
....
....
....
set device to screen
set printer to
set console on
RUN TYPE miarchivo.txt > lpt1

Saludos.-