[Boleto Caixa - Dígito Verificador do Código do Cedente Inválido.]

Amigos do ACBR, poderiam por gentileza me auxiliarem nessa questa?

Na homologação do boleto caixa estou recebendo a seguinte mensagem: "Dígito Verificador do Código do Cedente Inválido."

 

estou passando assim no fonte:

x (Ocultei os dados)

 

  with FACBrBoleto.Cedente do
  begin

    TipoInscricao   := pJuridica;
    Agencia            := '0279';
    AgenciaDigito   := '8';
    Conta                := '03001776';
    ContaDigito       := '3'
    CodigoCedente := '1113111'
    Convenio           := '';
    Modalidade       := '101';

    CodigoTransmissao  := ''; 
    Nome                 := 'xxxxxxxxxxxxxxxxxxxxxxxxx';
    CNPJCPF           := 'xxxxxxxxxxxxxxxx';
     

    Logradouro  := 'xxxxxxxxxxxxxxxxxxxxxxxxx';
    Bairro            := 'xxxxxxxxxxxxxxxxxxxxxxxxx';
    Cidade          := 'xxxxxxxxxxxxxxxxxxxxxxxxx';
    Complemento := 'xxxxx';
    NumeroRes     := 'xxxxx';
    CEP                 := 'xxxxxxxx';
    UF                   := 'xx';
  end;

[Não existe NFe com a chave ["Chave NF-e"] carregada]

Obrigado. Apliquei a linha de código e agora coloquei para testar. Vou aguardar os resultados.

[Não existe NFe com a chave ["Chave NF-e"] carregada]

4 horas atrás, Juliomar Marchetti disse:

NFE.NotasFiscais.Clear;

Coloco antes do NFE.EventoNFe.Evento.Clear; ?

[Não existe NFe com a chave ["Chave NF-e"] carregada]

48 minutos atrás, Juliomar Marchetti disse:

Mandou limpar as notas antes?

Qual seria o comando? No meu código esta assim como postei... Alias ele segue o exemplo do ACBR...

[Não existe NFe com a chave ["Chave NF-e"] carregada]

Bom dia amigos,

Ao tentar fazer uma carta de correção recebo o erro "Não existe NFe com a chave [ Chave da nota aqui ] carregada"

Ao fechar  o meu sistema e abrir novamente na maioria das veze a carta é transmitida normalmente. Parece que o sistema fica com alguma coisa presa na memória.

Meu código está assim:

NFE.EventoNFe.Evento.Clear;

with NFE.EventoNFe.Evento.New do
begin
      infEvento.chNFe                := Chave;
      infEvento.cOrgao               := CodOrgao;
      infEvento.CNPJ                  := NrCNPJ;
      Evento                                := Now;
      infEvento.dhEvento            := Evento;
      infEvento.tpEvento             := teCCe;
      infEvento.nSeqEvento        := Sequencia;
      infEvento.versaoEvento      := '4.00';
      infEvento.detEvento.descEvento  := 'Carta de Correção';
      infEvento.detEvento.xCorrecao    := quotedstr(RetirarCaractere(ADescCorrecao,[#10,#13,#39]));
      infEvento.detEvento.xCondUso    := EmptyStr;
end;
idLote := '1';

NFE.EnviarEvento(strtoint(idLote));     <- O erro acontece aqui

if not (NFE.WebServices.EnvEvento.cStat in [128,135,136]) then
   Exit;

NFE.EventoNFe.GerarXML;
NFE.EventoNFe.Gerador.SalvarArquivo(EnderecoDiretorioXML + CaminhoXML);

 

[DistribuicaoDFe - Download dos eventos]

Obrigado amigos!

 

Vou programar um pouquinho e usar o Distribução DFe da maneira como o João disse, adequando a minha realidade.

Grande abraços... e fica uma sugestão para alguém desenvolver algo mais simples para o método distribuição por chave, trazendo os eventos relacionados.

 

valeu!

[DistribuicaoDFe - Download dos eventos]

3 horas atrás, BigWings disse:

Alguns eventos, por exemplo o cancelamento e a carta de correção, devem ser retornados na consulta por chave, método ACBrNFe.Consultar.

Agora fiquei na dúvida se o método ACBrNFe.Consultar vai trazer os documentos de terceiros... Mas já seria uma ajuda porém ainda faltariam outros eventos...

 

[DistribuicaoDFe - Download dos eventos]

Bom dia Juliana,

Sim, eu li o artigo do Italo, entendi o funcionamento da rotinas.

Mas na verdade eu gostaria de saber se existe algo mais simples, no caso informando a chave da nota e recebendo tudo o que for de evento vinculado a mesma, sem tem que ficar procurando todos os arquivos retornados de notas diferentes da que eu preciso.

Apenas complementando, o método DistribuicaoDFePorChaveNFe me retorna apenas o XML da nota fiscal já manifestada, eu achava que este me retornaria os eventos da mesma como uma carta de correção por exemplo...

[DistribuicaoDFe - Download dos eventos]

Olá amigos da comunidade ACBR,

 

Sei que existem bastantes tópicos já sobre DFe mas eu estou tendo dificuldades em baixar os eventos mesmo apos ler bastante.

Preciso simplesmente criar uma rotina onde eu entro com a Chave de Acesso da NF-e (Recebida e já manifestada) e assim baixar tudo o que for referente a mesma como XML principal e carta de correção por exemplo.

*Estou em ambiente de homologação

*Configuração do ACBRNFE

  Configuracoes.Arquivos.Salvar             := True;
  Configuracoes.Arquivos.SalvarEvento       := true;
  Configuracoes.Arquivos.PathNFe            := EnderecoDiretorioXML;
  Configuracoes.Arquivos.PathEvento         := EnderecoDiretorioXML;
  Configuracoes.Arquivos.EmissaoPathNFe     := True;
  Configuracoes.Arquivos.DownloadDFe.PathDownload := EnderecoDiretorioProtEvento;

Quando eu uso DistribuicaoDFePorChaveNFe recebo automaticamente apenas o XML da nota no diretório apontado mas os eventos não.

Sei que o NSU da minha nota é 150 encontrado no xml pela DistribuicaoDFePorChaveNFe

Se uso DistribuicaoDFePorNSU(25, CNPJ, '150') recebo apenas o XML da nota sem os eventos também...

Se uso DistribuicaoDFePorUltNSU(25, CNPJ, '150'); recebo todos os outros documentos até o ultimo NSU 155 onte num deles encontra-se o evento da correção da minha nota

 

Grato por quem puder me ajudar.

 

[PDF da inutilização incompleto.]

Acabei de baixar e atualizar o ACBR e não mudou em nada a situação mesmo...

Veja que ao inutilizar a numeração ele não exibe a justificativa (estou em homologação) e ao imprimir não exibe nada...

Ja em produção imprime os dados sem a justificativa como mostrei no post anterior...

 

[PDF da inutilização incompleto.]

23 minutos atrás, Felipe E. Resende Mesquita disse:

Bom dia, Calmeida79.

Os fontes estão atualizados? Consegue reproduzir o erro com o demo na pasta exemplos?

Sim. Os fontes estão "relativamente" atualizados, coisa de 1 mês... Vou tentar reproduzir nos exemplos e volto aqui...

[PDF da inutilização incompleto.]

Fortes Report

57 minutos atrás, Juliana Tamizou disse:

Bom dia.

Qual gerador de relatórios está utilizando?

Att.

Fortes Report

[PDF da inutilização incompleto.]

Boa tarde amigos do ACBR,

Hoje fui imprimir um PDF da inutilização de numeração da NF-e, coisa que nunca havia feito antes, e notei que a justificativa não é exibida e também os caracteres estão um pouco estranhos.

Alguém pode me dizer se é assim mesmo ou se meu sistema pode estar faltando alguma coisa?

 

Grato.

 

71041099000118_14139_Inutil.xml

[Diferença SEFAZ SP e MG]

Obrigado pela resposta...

Vou fazer alguns testes em homologação.

 

 

[Diferença SEFAZ SP e MG]

Bom dia amigos do ACBR,

Tenho meu sistema de transmissão de NF-e rodando  aqui em SP porém recebi uma proposta de um cliente de MG e gostaria de saber se existe diferença nas tags ou blocos entre os dois estados. 

Alguem possui sistema nesses dois estados e poderia me dizer?

[Erro ao consultar NF-e com evento.]

Em 17/08/2019 at 16:30, Juliomar Marchetti disse:

Então tem que verificar pois esse fonte não parece ser dos componentes do ACBr.

não é usando IXMLDocumento

 

Juliomar, Obrigado pela ajuda.

Retirei o UTF8Decode e funcionou, era a unica diferença que havia em relação ao exemplo do ACBR.

 

 

 

 

Exemplo ACBR

 

[Erro ao consultar NF-e com evento.]

Adicionando mais uma informação, as notas que estou tentando consultar são notas canceladas com eventos de carta de correção.

As notas autorizadas ou canceladas sem evento recebo o retorno perfeitamente.

 

O erro acontece aqui

 

[Erro ao consultar NF-e com evento.]

Boa tarde amigos do ACBR,

 

Estou com um problema no momento de fazer a consuta de algumas notas fiscais. Percebi que o erro acontece apenas nas notas que possuem eventos como carta de correção.

Ao consultar a nota fiscal da seguinte forma:

nfe.NotasFiscais.Clear;
nfe.WebServices.Consulta.NFeChave  := [CHAVE 44 dígitos];
nfe.WebServices.Consulta.Executar;

LoadConsulta201(nfe.WebServices.Consulta.RetWS);

 

Recebo o erro

'An invalid character was found in text content. 

Line 1

<retEvento versao="1.00"><infEvento><tpA'.

 

Anexado estão o erro e o resultado do RetWS

Conto com a ajuda de vocês.

Obs. Já atualizei a minha pasta Schemas e todo o ACBR.

Utilizo Delphi 2007

 

a.xml

Adicionando mais uma informação, as notas que estou tentando consultar são notas canceladas com eventos de carta de correção.

As notas autorizadas ou canceladas sem evento recebo o retorno perfeitamente.

[Erro Desconhecido - SAT 0.08]

Acredito que as empresas vão atualizar os aparelhos até o dead line 

[Erro Desconhecido - SAT 0.08]

Pesquisando e lendo um pouco mais aqui... vi que o meu sat (RB200 Bematech) não suporta a versão 0.08...

 

[Erro Desconhecido - SAT 0.08]

Boa tarde amigo,

Estou tentando enviar um SAT na versão 0,08 mas recebo a mensagem de "Resposta:002738|06010|1999|Erro desconhecido||"

Anexei o XML gerado.

 

Eu atualizei o ACBR;

Atualizei o SAT Bematech pelo activation software;

 

Alguém pode me dar uma luz? (Na versão 0,07 esse mesmo arquivo passa tranquilamente)

SAT.XML

[Como saber se estou Transmitindo já na NT 2018.005]

Manda e-mail direto na pagina da SEFAZ de SP. Eles costumam responder rápido.

[Como saber se estou Transmitindo já na NT 2018.005]

Bom dia amigos,

 

Como saber se já estou transmitindo atendendo os requisitos da NT 2018.005?

Atualizei meu acbr, Schemas, Reports, DLL's e meu código fonte. (Aqui em SP não será obrigado a indicar o responsável técnico)

Não mexi no código referente ao protocolo para as mensagens de interesse da sefaz...

Fiz testes em homologação e tudo funcionou...

[Gravar XML do evento]

Acabei por conseguir...

 

caso alguém precise está aqui a minha solução:

 

EnderecoXML := "Caminho onde está o meu xml que vou cancelar"

  DM.NFE.NotasFiscais.Clear;
  DM.NFE.EventoNFe.Evento.Clear;

  if not DM.NFE.NotasFiscais.LoadFromFile(EnderecoXML) then
  Begin
    raise Exception.Create('Não foi possível carregar o XML da Nota Fiscal Eletrônica para cancelamento!');
    Exit;
  End;

  strNrNota   := "123456"
  iNumeroLote := StrToInt("123456");
  DM.NFE.EventoNFe.idLote := iNumeroLote;

  strProtocolo := "Protocolo do XML"
  strChave     := "Chave do XML"

  with DM.NFE.EventoNFe.Evento.Add do
  begin
    infEvento.chNFe           := strChave;
    infEvento.CNPJ            := strCnpjCompleto;
    infEvento.dhEvento        := now;
    infEvento.tpEvento        := teCancelamento;
    infEvento.detEvento.xJust := Justificativa;
    infEvento.detEvento.nProt := strProtocolo;
  end;

  DM.nfe.Configuracoes.Arquivos.Salvar             := True;
  DM.nfe.Configuracoes.Arquivos.SalvarEvento       := true;
  DM.nfe.Configuracoes.Arquivos.PathNFe            := EnderecoDiretorioXML;
  DM.nfe.Configuracoes.Arquivos.PathEvento         := EnderecoDiretorioXML;
  DM.nfe.Configuracoes.Arquivos.EmissaoPathNFe     := True;

  if DM.NFE.EnviarEvento(iNumeroLote) then
  begin

      with DM.NFE.WebServices.EnvEvento do
      begin       

         DataProtocolo   := FormatDateTime('dd/mm/yyyy hh:nn:ss',EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento);
         NrProtocolo     := EventoRetorno.retEvento.Items[0].RetInfEvento.nProt;
         XMLCancelamento := EventoRetorno.retEvento.Items[0].RetInfEvento.XML;
         Result          := 'Cod:' + IntToStr(EventoRetorno.retEvento.Items[0].RetInfEvento.cStat) + '-' + EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo;
 

         DM.nfe.ImprimirEventoPDF;     

     END

End;

[Gravar XML do evento]

Bom dia amigos,

Poderiam me ajudar no processo de gravar um XML de evento de cancelamento? Já li alguns topicos aqui mas não consegui ainda

NotasFiscais.Clear;
EventoNFe.Evento.Clear;

NotasFiscais.LoadFromFile(EnderecoXML);

EventoNFe.idLote := 1;

   with EventoNFe.Evento.Add do
   begin
         infEvento.chNFe := strChave;
         infEvento.CNPJ   := strCnpjCompleto;
         infEvento.dhEvento := now;
         infEvento.tpEvento := teCancelamento;
         infEvento.detEvento.xJust := Justificativa;
         infEvento.detEvento.nProt := strProtocolo;
   end;

EnviarEvento(iNumeroLote); 

Configuracoes.Arquivos.Salvar             := True;
Configuracoes.Arquivos.SalvarEvento       := true;
Configuracoes.Arquivos.PathNFe            := EnderecoDiretorioXML;
Configuracoes.Arquivos.PathEvento         := EnderecoDiretorioXML;
Configuracoes.Arquivos.EmissaoPathNFe     := True;

NotasFiscais.GravarXML(EnderecoDiretorioXML);

reportDanfe.ImprimirDANFEPDF();