PERGUNTAS E RESPOSTAS
 
Bem Vindo, Visitante  Todos os Fórums
  ADVPL
Enviar para a impressoraImprimir  Enviar e-mail para um amigoEnviar Para um Amigo
Precisa estar Logado

Subject Assunto:
FWMsPrinter Preview
Versão:
12.1.7
Plataforma:
Linux
Complemento:
DB:
Oracle
Complemento:
LinkedIn
Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário CASSIOLORE CASSIOLORE em 08/09/2017, 12:01 h
Local: RS  Registro: 11/05/2016  Postagens: 7
Bom dia galera. Estava com problemas para visualizar a NF quando mandava para impressão, onde o sistema não estava respeitando o parâmetro MV_PAR07 para visualizar antes de imprimir e imprimia DIRETO. Para resolver o problema temporariamente alterei o fonte DANFEII.

alteração:
1 - antes da chamada dos comandos de configuração da impressão
oDanfe:SetResolution(78) //Tamanho estipulado para a Danfe
oDanfe:SetPortrait()
oDanfe:SetPaperSize(DMPAPER_A4)
oDanfe:SetMargin(60,60,60,60)
oDanfe:lServer := oSetup:GetProperty(PD_DESTINATION)==AMB_SERVER

colocar os seguintes comandos

Pergunte("NFSIGW",.F.)//chama as perguntas para ficar na memoria

2 - dentro da clausula If lExistNfe colocar mais uma validação para gerar a visualização e não imprimir diretamente.
exemplo de como vai ficar.

If lExistNfe
     if MV_PAR07 == 1
          oDanfe:nDevice := IMP_PDF
     endif
     oDanfe:Preview()//Visualiza antes de imprimir
Else
     If !lIsLoja
          Aviso("DANFE","Nenhuma NF-e a ser impressa nos parametros utilizados.",{"OK"},3)
     EndIf
EndIf

OBS: a visualização será gerada no navegador padrão do sistema operacional. caso não existe pode abrir no programa padrão para abrir PDF. ex: foxit reader


A principio corrigi o problema desta forma. se tiver outra solução serei grato tnm kkkk.


Para postar no Fórum você precisa efetuar o seu login ou se registrar

 Mudar para Fórum

 

 

 
 
   
Pagina Principal Shopping PROTHEUS Tire suas duvidas Vagas Microsiga em todo Brasil Aprofunde seus conhecimentos Noticias Online Fale Conosco Pagina Principal