Clipper/FiveWin - Salir de lista de impresoras,(From User) sin error

Que tal :

Tengo un reporte utilizando "FROM USER" , solo que estando en la lista de impresoras, si doy "cancelar" me da un error, ¿hay algo que devuelva "From user" en caso de no querer imprimir, para condicionar los CMSAY's?

Gracias

Ola,
quando utilizando a clausula FROM USER, devolve a impressora selecionada.
Faça a verificação com IF( EMPTY(...), RETURN .F. , .T. )

Se nao funcionar, coloque o pedaço de codigo do seu programa, e informe qual a mensagem que da, quando o usuario cancela.

Abraços, e Boas Festas,

Nelson Nunes de Araujo
Brasil, 31/12/2005

Hola Edson:
Te agradezco el interes en responder, creo que con la condicion que me dijste debe quedar listo, solo que ¿dónde la coloco?

Este es mi codigo:

PRINT oPrn TITLE "fondo" PREVIEW MODAL FROM USER
DEFINE FONT oFont1 NAME "Courier" SIZE 0, -10 OF oPrn
DEFINE FONT oFont2 NAME "Courier" SIZE 0, -08 OF oPrn
nInc := 0.400

PageBegin()
nLin += ( nInc * 2 )
oPrn:CmSay( nLin, 03,cEmpresa,oFont1)
nLin += ( nInc * 2 ) ....etc,etc.
pageEND()
ENDPRINT

de todas maneras te envio el mensaje de error, es el siguiente:

Error description: Error BASE/1082 Error de argumento: -
Args:
[ 1] = N 0
[ 2] = U

Stack Calls
===========
Called from TPRINTER:CMTR2PIX(593)
Called from (b)TPRINTER(122)
Called from TPRINTER:CMSAY(0)
Called from IMPRIME(263)
Called from (b)CONSULTAFON(127)
Called from TBUTTON:CLICK(161)
Called from TBUTTON:HANDLEEVENT(1225)
Called from _FWH(2990)
Called from SENDMESSAGE(0)
Called from TDIALOG:COMMAND(379)
Called from TWINDOW:HANDLEEVENT(0)
Called from TDIALOG:HANDLEEVENT(743)
Called from DIALOGBOX(0)
Called from TDIALOG:ACTIVATE(248)
Called from CONSULTAFON(137)
Called from (b)CONFONDO(64)
Called from TCONTROL:LDBLCLICK(1683)
Called from TWBROWSE:LDBLCLICK(1030)
Called from TWINDOW:HANDLEEVENT(0)
Called from TWBROWSE:HANDLEEVENT(1252)
Called from _FWH(2990)
Called from WINRUN(0)
Called from TMDIFRAME:ACTIVATE(856)
Called from NOMI(152)

Bueno, no es por meterme, pero consultando tu código, he notado que al principio pones:

nInc := 0.400 <------------- VARIABLE NLNC

y más adelante:

oPrn:CmSay( nLin, 03,cEmpresa,oFont1) <------ VARIABLE NLIN

A lo mejor tiene eso algo que ver con el error CmSay(...

Un saludo