[Undeclared identifier: 'teCancelamento']

Não consigo cancelar nfe utilizando o codigo de expelo alguem pod eme ajudar? apresenta erro ao compilar tecancelamento e loadxml.

 

 with DMDADOS.ACBrNFe1.EventoNFe.Evento.New do
    begin
      infEvento.dhEvento := now;
      infEvento.tpEvento := teCancelamento;
      infEvento.detEvento.xJust := vAux;
    end;

   DMDADOS .ACBrNFe1.EnviarEvento(StrToInt(idLote));

    Memo1.Lines.Text := DMDADOS.ACBrNFe1.WebServices.EnvEvento.RetWS;
    memo2.Lines.Text := DMDADOS.ACBrNFe1.WebServices.EnvEvento.RetornoWS;
   LoadXML(DMDADOSACBrNFe1.WebServices.EnvEvento.RetornoWS, WBResposta);

[erro na Unit GZIPUtils]

Em 31/01/2020 at 23:33, Juliomar Marchetti disse:

Há tu tem o synapse instalando separado em seu delphi? ou até mesmo o fonte seu com alguma unit dele dentro

Resolvido ! havia realmente um arquivo GZIPUtils dentro da pasta do projeto e o apagar do acbr não o removia.Obrigado pela ajuda!

[erro na Unit GZIPUtils]

não somente no projeto, ja fiz a reinstalação do acbr marcando a opção de remover versões antigas e também pelo bat que o remove mas mesmo assim continuo com o erro , aconteceu após a atualização. Tem algum outra solução?

[erro na Unit GZIPUtils]

4 horas atrás, Juliomar Marchetti disse:

executa o arquivo apagaracbr.bat e depois roda o instalador

Ja fiz este procedimento 2 vezes mas não teve resultado. 

[erro na Unit GZIPUtils]

Boa tarde! Acabei de atualizar e esta me apresentando o erro :[dcc32 Fatal Error] ACBrCompress.pas(48): F2051 Unit GZIPUtils was compiled with a different version of synacode.UpdateCrc32

já excluir o acbr baixei novamente com todos os procedimentos mas continua o erro.Alguém pode me ajudar?

[Epson TM-T20]

Sim. Pela ferramenta epson está normal, e ja testei em 3 impressoras do mesmo modelo. antes de atualizar o componente estava normal, ja fiz vários testes mas continua.

[Epson TM-T20]

Após atualizar a impressão do nfc-e via posprinter através da impressora Epson o cabeçalho não imprime normalmente esta em negrito com as informações embaralhadas, isso só esta acontecendo coma pson demais impressoras estão normais.Alguém está passando pelo mesmo?

[Vpag duplicando NF-e]

9 minutos atrás, Paulo Tenório disse:

Verifique seu loop de itens. o with pag.Add  pode estar dentro dele ou de algum outro. Certifique-se de que apenas um seja executado, à não ser que haja um loop prevendo diferentes meios de pagamento.

Já efetuei a verificação e não existe nenhum loop ,verifiquei tudo e só existe essa função com o vpag e tpag.Na NFC-e a função está normal somente na NF-e acontece isto.

[Vpag duplicando NF-e]

Boa noite.Estou atualizando para o novo layout 4.0,mas ao tentar enviar a nota mostra rejeição do shema em relação ao campo tpag.Adicionei o tpag e o vpag mas o mesmo esta duplicando.estou implementando desta forma:

with pag.Add DO
begin
tpag:=fpdinheiro;
 vpag:=total.icmstot.vNF;
end;

Segue a baixo como está o xml :

- <ICMSTot>

  <vBC>0.00</vBC>

  <vICMS>0.00</vICMS>

  <vICMSDeson>0.00</vICMSDeson>

  <vFCPUFDest>0.00</vFCPUFDest>

  <vFCP>0.00</vFCP>

  <vBCST>0.00</vBCST>

  <vST>0.00</vST>

  <vFCPST>0.00</vFCPST>

  <vFCPSTRet>0.00</vFCPSTRet>

  <vProd>50.00</vProd>

  <vFrete>0.00</vFrete>

  <vSeg>0.00</vSeg>

  <vDesc>0.00</vDesc>

  <vII>0.00</vII>

  <vIPI>0.00</vIPI>

  <vIPIDevol>0.00</vIPIDevol>

  <vPIS>0.00</vPIS>

  <vCOFINS>0.00</vCOFINS>

  <vOutro>0.00</vOutro>

  <vNF>50.00</vNF>

  <vTotTrib>2.10</vTotTrib>

  </ICMSTot>

  </total>

- <transp>

  <modFrete>9</modFrete>

  </transp>

- <pag>

- <detPag>

  <tPag>01</tPag>

  <vPag>50.00</vPag>

  </detPag>

- <detPag>

  <tPag>01</tPag>

  <vPag>50.00</vPag>

  </detPag>

  </pag>

- <infAdic>

  <infAdFisco>Totais FCP: 0,00 Totais FCPRET: 0,00</infAdFisco>

  <infCpl>troca somente com a embalagem</infCpl>

  </infAdic>

  </infNFe>

  </NFe>

 

no Exemplo do Acbr diz que tpag e vpag são apenas para nfc-e mas a nf-e modelo 55 está solicitando este campo para a validação alguem pode me ajudar?

Agora, Antony Moraes disse:

Boa noite.Estou atualizando para o novo layout 4.0,mas ao tentar enviar a nota mostra rejeição do shema em relação ao campo tpag.Adicionei o tpag e o vpag mas o mesmo esta duplicando.estou implementando desta forma:

with pag.Add DO
begin
tpag:=fpdinheiro;
 vpag:=total.icmstot.vNF;
end;

Segue a baixo como está o xml :

- <ICMSTot>

  <vBC>0.00</vBC>

  <vICMS>0.00</vICMS>

  <vICMSDeson>0.00</vICMSDeson>

  <vFCPUFDest>0.00</vFCPUFDest>

  <vFCP>0.00</vFCP>

  <vBCST>0.00</vBCST>

  <vST>0.00</vST>

  <vFCPST>0.00</vFCPST>

  <vFCPSTRet>0.00</vFCPSTRet>

  <vProd>50.00</vProd>

  <vFrete>0.00</vFrete>

  <vSeg>0.00</vSeg>

  <vDesc>0.00</vDesc>

  <vII>0.00</vII>

  <vIPI>0.00</vIPI>

  <vIPIDevol>0.00</vIPIDevol>

  <vPIS>0.00</vPIS>

  <vCOFINS>0.00</vCOFINS>

  <vOutro>0.00</vOutro>

  <vNF>50.00</vNF>

  <vTotTrib>2.10</vTotTrib>

  </ICMSTot>

  </total>

- <transp>

  <modFrete>9</modFrete>

  </transp>

- <pag>

- <detPag>

  <tPag>01</tPag>

  <vPag>50.00</vPag>

  </detPag>

- <detPag>

  <tPag>01</tPag>

  <vPag>50.00</vPag>

  </detPag>

  </pag>

- <infAdic>

  <infAdFisco>Totais FCP: 0,00 Totais FCPRET: 0,00</infAdFisco>

  <infCpl>troca somente com a embalagem</infCpl>

  </infAdic>

  </infNFe>

  </NFe>

 

no Exemplo do Acbr diz que tpag e vpag são apenas para nfc-e mas a nf-e modelo 55 está solicitando este campo para a validação alguem pode me ajudar?

Isto acontece quando coloco mas de dois itnes se por um só a nota passa.

[Percentual do Fundo de Combate à Pobreza (FCP) na NFC-e]

5 horas atrás, Italo Jurisato Junior disse:

Bom dia Antony,

Te aconselho a verificar as regras de validação que constam na Nota Técnica 2016/002 versão 1.20:

3.2. Regras de Validação (RV) da Nota Fiscal Eletrônica.

Temos várias tabelas sendo que a segunda coluna se refere ao modelo (55 e ou 65) que a regra se aplica.

Dai da para se ter uma ideia se um determinado campo é validado por um outro ou ambos os modelos.

Obrigado pela dica!!

[Percentual do Fundo de Combate à Pobreza (FCP) na NFC-e]

Boa noite, Alguém sabe informar se as mudanças da NT 2016.002 como FCP e vICMSDeson devem ser aplicados também a NFC-e ou apenas na NF-e?

[erro acbrmail enable to send mailto]

Boa tarde.Ao enviar a o xml e pdf pelo acbrmail recebo essa mensagem SMTP erro enable to send mailto,funcionava até a uma semana atrás mas agora memso alterando as configurações apresenta o mesmo erro.

 

segue configuração:

var
 Para : String;
 CC: Tstrings;
begin

    CC:=TstringList.Create;
    try
      CC.Add(email.text); //especifique um email válido

      dmdados.ACBrMail1.Host := dmdados.CDSFTPPASTALOCAL.Text;
      dmdados.ACBrMail1.Port := dmdados.CDSFTPPASTALOCALcli.Text;
      dmdados.ACBrMail1.Username := dmdados.CDSFTParqprod.Text;
       dmdados.ACBrMail1.Password := dmdados.CDSFTParqcliente.Text;
      dmdados.ACBrMail1.From := email.Text;
      dmdados.ACBrMail1.SetSSL := cemail.Checked; // SSL - Conexão Segura
       dmdados.ACBrMail1.SetTLS := cemail.Checked; // Auto TLS

      dmdados.ACBrMail1.ReadingConfirmation := False; //Pede confirmação de leitura do email
       dmdados.ACBrMail1.UseThread := False;           //Aguarda Envio do Email(não usa thread)
       dmdados.ACBrMail1.FromName := 'Pdvlopes Sistema de Gerenciamento Comercial';

      dmdados.ACBrNFe1.NotasFiscais.Items[0].EnviarEmail( Para, Assunto.Text,
                                              texto.Lines
                                               , True  // Enviar PDF junto
                                               , CC    // Lista com emails que serão enviado cópias - TStrings
                                               , nil); // Lista de anexos - TStrings
    finally
      CC.Free;
        SHOWMESSAGE('Email Enviado com Sucesso!!');

    end;
 

1 minuto atrás, Antony Moraes disse:

Boa tarde.Ao enviar a o xml e pdf pelo acbrmail recebo essa mensagem SMTP erro enable to send mailto,funcionava até a uma semana atrás mas agora memso alterando as configurações apresenta o mesmo erro.

 

segue configuração:

var
 Para : String;
 CC: Tstrings;
begin

    CC:=TstringList.Create;
    try
      CC.Add(email.text); //especifique um email válido

      dmdados.ACBrMail1.Host := dmdados.CDSFTPPASTALOCAL.Text;
      dmdados.ACBrMail1.Port := dmdados.CDSFTPPASTALOCALcli.Text;
      dmdados.ACBrMail1.Username := dmdados.CDSFTParqprod.Text;
       dmdados.ACBrMail1.Password := dmdados.CDSFTParqcliente.Text;
      dmdados.ACBrMail1.From := email.Text;
      dmdados.ACBrMail1.SetSSL := cemail.Checked; // SSL - Conexão Segura
       dmdados.ACBrMail1.SetTLS := cemail.Checked; // Auto TLS

      dmdados.ACBrMail1.ReadingConfirmation := False; //Pede confirmação de leitura do email
       dmdados.ACBrMail1.UseThread := False;           //Aguarda Envio do Email(não usa thread)
       dmdados.ACBrMail1.FromName := 'Pdvlopes Sistema de Gerenciamento Comercial';

      dmdados.ACBrNFe1.NotasFiscais.Items[0].EnviarEmail( Para, Assunto.Text,
                                              texto.Lines
                                               , True  // Enviar PDF junto
                                               , CC    // Lista com emails que serão enviado cópias - TStrings
                                               , nil); // Lista de anexos - TStrings
    finally
      CC.Free;
        SHOWMESSAGE('Email Enviado com Sucesso!!');

    end;
 

Esta desta maneira a configuração:

smtp: smtp.gmail.comporta: 465 Username: email do gmailPassword: senah do emailsetSSL: TruesetTLS: True

[danfe em fortes report erro ao atulizar acbr]

7 horas atrás, Juliomar Marchetti disse:

Opa agora com a msg dá  pra ajudar um pouco mais.

seguinte tu tens em seu fonte algum lugar mais que esteja com essa unit separada ou ainda tenha ela compilada.

o erro é mais ou menos assim, tem a unit no acbr tem o compilado e o compilador ainda está achando mais um lugar com essa unit diferente.

Obrigado!!Era exatamente isso!!

[danfe em fortes report erro ao atulizar acbr]

5 horas atrás, Juliomar Marchetti disse:

Bom dia

Importar???

tu atualizou e recompilou os componentes?

Sim compilei os componentes e ao executar a aplicação retorna:[DCC Fatal Error] Udmdados.pas(9): F2051 Unit ACBrNFeDAInutRLRetrato was compiled with a different version of RLReport.TRLCustomReport.SetTitle

[danfe em fortes report erro ao atulizar acbr]

Sim juliomar fiz os procedimentos como de costume removi o componente do delphi apaguei utilizando o apagar acbr da pasta,criei uma nava pasta baixei pelo svn e instalei,fiz esse procedimento varias vezes e somente o AcBrNFeDANFeRLClass apresenta erro ao compilar,outro projeto que não utilizo o danferl funciona perfeitamente.

[danfe em fortes report erro ao atulizar acbr]

Bom dia!!Após a ultima atualização do Acbr apresenta erro ao importar a classe ACBrNFeDANFeRLClass no uses, alguém estápassando pelo mesmo problema?parece ser algo referente ao arquivo ACBrNFeDAInutRLRetrato

 

[Lote em processamento]

Tudo normal agora!!!

[Lote em processamento]

6 minutos atrás, [email protected] disse:

Agora voltou tudo ao normal !!!!

Tudo funcionando como antes !!! 

Podem voltar a emitir NFCe ... 

 

Aqui no Rio vai e volta.

[Lote em processamento]

34 minutos atrás, Abade disse:

Estou com o mesmo problema no meu sistema de PDV mas no sistema de ERP ta indo normal

[RESOLVIDO ]

PRA QUEM TA ENVIANDO O NUMERO DO LOTE ZERADO E SO MANDAR O MEMSO NUMERO DA NFCE QUE VAI(y)

 ACBrNFe1.Configuracoes.WebServices.TimeOut:=10000;
 OBJAcbr.Enviar(StrToInt(CabecalhoDOcnumero_nf.Text),true,True);

RESOLVI ASSIM

 

 

So pra Constar sou de Porto Velho Rondonia

 

 

Aqui no Rio não resolveu,mas a uns 10 minutos atras consegui emitir uma e logo apos parou novamente.

[Lote em processamento]

16 minutos atrás, [email protected] disse:

Aumentei aqui mas não adiantou. Quais os parâmetros que você utilizou? Qual a versão do ACBrMonitorPlus você está usando?  Tem gente me falando que todo dia primeiro de cada mês acontece isso mas não estou querendo acreditar que isso seja normal... 

Aqui no Rio estamos na mesma,mesmo aumentando.

[código do hash do qr code invalido]

Meu componente está atualizado.mas o que mas me confunde é que só acontece nas notas que são geradas em contingência.

[código do hash do qr code invalido]

Boa noite.Estou tendo problemas aoconsultar a nfc-e pelo qr-code se efetuar a consulta de uma nota no ambiente de produção,a nota e enviada e autorizada mas quando efetuo a consulta ao clicar na area de informações para o contribuinte e fisco aparece o erro na formatação do qr-code :código do hash do qr-code invalido mas nao recebo nenhuma rejeição a nota e autorizada sem problemas.alguem poderia me auxiliar?

[Sincronizar dados firebird]

Boa noite.Criei uma aplicação em delphi xe2 e firebird para emissão de NFC-e ,mas estou com um problema em relação ao sincronismo da minha base de dados que trabalha da seguinte forma:Meus pdvs tem um base local que efetuam vendas diariamente que salvam no banco de dados local .gostaria de saber se alguem conhece algum componente que consiga sincronizar a tabela de vendas e itens vendidos do meus pdvs para o retaguarda que no caso seria o servidor.em relação aos produtos faço a atualização através de u arquivo txt que e gerado no servidor e enviado para os terminais mas tentando fazer o procedimento via txt não obtive sucesso devido a cupons em contingencia que devem ser enviados e atualizados na base.

[nota fiscal sem informação qr-code]

Agradeço a todos pelo a ajuda!!Finalmente consegui a soluçao do problema .fiz a atualização do acbr hoje pela manha e removi o acbr e  o reinstalei em uma pasta diferente da anterior.acbrnfenotasfiscas.pas ficou assim apos a atualização :

 

    // Gera o QR-Code para adicionar no XML antes de ser validado e salvo
    // somente para a NFC-e.

    if (NFe.Ide.modelo = 65) and  (NFe.Ide.tpAmb = taHomologacao) then
    begin
      with TACBrNFe(TNotasFiscais(Collection).ACBrNFe) do
      begin
        NFe.infNFeSupl.qrCode := GetURLQRCode(NFe.Ide.cUF, NFe.Ide.tpAmb,
                                  onlyNumber(NFe.infNFe.ID), NFe.Dest.CNPJCPF,
                                  NFe.Ide.dEmi, NFe.Total.ICMSTot.vNF,
                                  NFe.Total.ICMSTot.vICMS, NFe.signature.DigestValue);
        XMLAss := GerarXML;
        FXMLAssinado := XMLAss;
      end;
    end;

    if Configuracoes.Arquivos.Salvar  and not (Configuracoes.Arquivos.SalvarApenasNFeProcessadas) then
    begin
      if NaoEstaVazio(NomeArq) then
        Gravar(NomeArq, XMLAss)
      else
        Gravar(CalcularNomeArquivoCompleto(), XMLAss);
    end;
  end;

 

 

[Valor Vtroco Já Funciona No Danfefortes ?]

Sei que o tópico e antigo mas pra quem precisar da soluçao:

 DMDADOS.ACBrNFe1.DANFE.vTroco:=10;