SalReportPrintO Call SalPrtSetDefault( sImpNotaDef, sImpNotaDriverDef, sImpNotaPortaDef ) tem que vir antes do SalReportPrint
 
Carlos Roberto Zazula
Analista de Sistemas
Esfera Inform�tica - www.esfera.com.br
[EMAIL PROTECTED]
Icq : 24758898
Em momentos de crise, s� a imagina��o
� mais  importante que o  conhecimento.
----- Original Message -----
Sent: Wednesday, July 18, 2001 4:41 PM
Subject: [sqlwin] Direcionar Impressao

Saudacoes...
 
Como faco para em tempo de execucao direcionar a impressao para uma determinada impressora (Centura 1.5.1) ?
Tentei o seguinte e nao funcionou. Passei como parametros de impressora - "HP 640C DESENV"(creio que esteja correto), porta -"\\Des-06\hp_desenv"(creio que esteja correto) e driver - "winspool"(nao sei se esta correto, coloquei o mesmo que retornou no  SalPrtGetDefault  :
 

- Call SalGetProfileString ( 'NOTA FISCAL', 'IMPRESSORA', '', sImpNota, 'SGN_LOCAL.INI' )
- Call SalGetProfileString ( 'NOTA FISCAL', 'PORTA IMPRESSORA', '', sImpNotaPorta, 'SGN_LOCAL.INI' )
- Call SalGetProfileString ( 'NOTA FISCAL', 'DRIVE IMPRESSORA', '', sImpNotaDriver, 'SGN_LOCAL.INI' )
- Call SalPrtGetDefault( sImpNotaDef, sImpNotaDriverDef, sImpNotaPortaDef )
- Call SalPrtSetDefault( sImpNota, sImpNotaDriver, sImpNotaPorta )
- Set frmTelaRelNotaFiscal.hWndRelatorio2 = SalReportPrint( hWndRelatorio, frmTelaRelNotaFiscal.sQrp,  frmTelaRelNotaFiscal.sBind, frmTelaRelNotaFiscal.sInput, 1, RPT_PrintAll, 0, 0, nErro )
- Call SalPrtSetDefault( sImpNotaDef, sImpNotaDriverDef, sImpNotaPortaDef )

 
 
Grato desde ja e aguardando,
 
Adhemar Fontes
IPT Tecnologia Ltda.
[EMAIL PROTECTED]
Salvador - Bahia - Brasil

Responder a