Erro ao tentar gerar e enviar aquivo

[Miriane Rogério]

Estava funcionando normal, isto aconteceu depois que atualizei o ACBr.

Desde já agradeço pela ajuda.

Obrigada.

 

[Isaque Pinheiro]

Verifique se após vc ter atualizado, vc tb atualizou seus Schemas da sua aplicação, pode ser que tenha havido alterações.

[Miriane Rogério]

Já fiz isto e o problema continua.

Aparentemente o problema é no CNPJ mas já tentei de tudo e nada da certo.

[Italo Giurizzato Junior]

Boa tarde Miriane,

Faz quanto tempo que você não atualiza os seus fontes?

Pois faz um bom tempo que ocorreu alterações nos fontes e agora é preciso incluir na rotina de configuração meia-duzia de linhas para configurar os dados do emitente.

Para saber quais são essas 6 linhas vide o programa exemplo, procure as linhas de configurações onde aparece a palavra "Emitente".

[Miriane Rogério]

Ítalo, deu certo.

Aproveitando a oportunidade queria saber se existe a possibilidade de executar o processo normal porem não visualizar e nem imprimir automaticamente as notas ou seja só gerar o PDF.

Muito obrigada.

[Agnaldo Prates]

Já tentou desse modo?
 

 ACBrNFSe1.Gerar(StrToInt(vNumRPS));
 sNomeArq := ACBrNFSe1.NotasFiscais.Items[0].NomeArq;

 ACBrNFSe1.NotasFiscais.Clear;
 ACBrNFSe1.NotasFiscais.LoadFromFile(sNomeArq);
 ACBrNFSe1.NotasFiscais.ImprimirPDF;
Aqui envia e não imprime, apenas salva o PDF. 

De repente isso pode lhe ajudar.

[Miriane Rogério]

Agnaldo, obrigada pela atenção.

Tentei utilizar sua rotina acima mas deu erro desconhecido.

[Italo Giurizzato Junior]

Bom dia Miriane,

No seu caso o provedor é o Ginfes, correto?

Esse provedor se utiliza do método Enviar, e este possui 2 parâmetros: numero do lote e Imprimir.

O segundo parâmetro por padrão vale True, isso diz ao componente para imprimir o DANFSE no papel.

Se o DANFSE esta sendo apresentado na tela é por que a propriedade de visualização (MostrarPreview) esta com o valor True.

Faça o seguinte:

 ACBrNFSe1.Enviar(vNumLote, False); // Envia o lote para o provedor, mas não imprime automaticamente o DANFSE

 ACBrNFSe1.DANFSe.MostrarPreview := False; // Não apresenta o DANFSE na tela.
 ACBrNFSe1.DANFSe.PathPDF := sPathPDF; // Define a pasta onde os PDFs serão gravados.

 ACBrNFSe1.NotasFiscais.Imprimir; // Imprime o DANFSE no papel
 ACBrNFSe1.NotasFiscais.ImprimirPDF; // Gera o DANFSE em PDF e salva em disco na pasta definida na propriedade PathPDF

[Miriane Rogério]

Ítalo, com esta explicação tudo funcionou certinho.

Muito obrigada.