Ir para conteúdo
  • Cadastre-se

dev botao

ACBrNFe não gera PDF


Ver Solução Respondido por BigWings,
  • Este tópico foi criado há 1862 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado (editado)

Caros amigos desenvolvedores,

Meu programa gera o XML em TXT e a o DANF-e em PDF.
Porém, depois que atualizei o ACBr (dia 11/09/2019) só gera o TXT.
Segue o algoritmo para avaliação.

Obrigado.

 

            if Trim(vXMLArqContab) <> '' then
              begin
                if Qry_NFslan_nfe_ambiente_gerado.AsString = 'H' then
                  Frm_Memory_Estoque.ACBrNFe1.Configuracoes.WebServices.Ambiente := taHomologacao
                else
                  Frm_Memory_Estoque.ACBrNFe1.Configuracoes.WebServices.Ambiente := taProducao;

                if Qry_NFslan_cancelada.AsString = 'S' then
                  Frm_Memory_Estoque.ACBrNFeDANFEFR1.MarcaDaguaMSG := 'NF-e CANCELADA'
                else
                  Frm_Memory_Estoque.ACBrNFeDANFEFR1.MarcaDaguaMSG := '';

                Frm_Memory_Estoque.ACBrNFe1.DANFE.PathPDF := vDir;
                if not DirectoryExists(Frm_Memory_Estoque.ACBrNFe1.DANFE.PathPDF) then
                  begin
                    ForceDirectories(Frm_Memory_Estoque.ACBrNFe1.DANFE.PathPDF);
                    Sleep(3000);
                  end;

                vXml := TStringStream.Create(vXMLArqContab);
                Frm_Memory_Estoque.ACBrNFe1.NotasFiscais.LoadFromStream(vXml);
                vXml.SaveToFile(vDir + '\' + Frm_Memory_Estoque.ACBrNFe1.
                  NotasFiscais.Items[0].NFe.procNFe.chNFe + '.xml');
                FreeAndNil(vXml);

                Frm_Memory_Estoque.ACBrNFeDANFEFR1.MostraPreview := False;
                Frm_Memory_Estoque.ACBrNFe1.NotasFiscais.ImprimirPDF;

              if not vGravouLog then
                  GravarLOG(FVarDANFe.vLogTela, '', 0, 0, 0, 'CLICOU NO BOTAO VISUALIZAR',
                    'CLICOU NO BOTAO VISUALIZAR E GEROU NF-E EM FORMATO PDF');
                vGravouLog := True;
              end;

Editado por anderson.mendonca
  • Moderadores
  • Solution
Postado
17 horas atrás, anderson.mendonca disse:

Agora esta acontecendo o seguinte: eu configuro pra salvar o PDF na pasta C:\TESTE, e ele salva em C:\.
O que estou fazendo de errado?

Obrigado.

 

Tente informar:

C:\TESTE\

Com a barra no final.

  • Curtir 1
Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

  • Administradores
Postado

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

  • Este tópico foi criado há 1862 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.