Clipper/FiveWin - Por favor miren esta nota

Gracias.
Mi duda es la siguiente. Cuando dirijo un listado a la impresora y mientras se imprime apago la impresora o se atasca el papel...
¿Como hago para controlar el error y no me salga la tipica ventanita
roja QUIT / RETRY?
Muchas gracias por su ayuda.

Hola:
Se me ocurre lo siguiente:
Este es tu programa de impresion
Do while mitabla->( !eof() ) .and. .t.
Aqui insertar la siguiente linea
IF !ISPRINTER()
set device to screen
nAccion := Alert('Error de impresora',{'Continuar','Cancelar')
if naccion = 2
exit
endif
endif
@ x, y say mitabla->texto

Enddo
dbcloseall()
return

Pon tu rutina de impresion dentro de un BEGUIN SECUENCE y coloca en el recover la accion a ejecutar al presentarse el error.- Cualquier duda, refierete a las NG, lee la instruccion y tambien como opera el objeto error