Problemas Acbrnfe Com Novos Certificados Digitais

[karlouchoa]

Amigos,

 

Tenho vários clientes utilizando o ACBRNFE para emitirem seu NFC-e. O problema é que de um tempo pra cá, em alguns clientes que adquiriram um novo certificado digital, serasa ou Valid, A1 ou A3, nao estamos conseguindo enviar os NFC-e's.

 

O pior de tudo é coloquei um Try Exception (Delphi) para avaliar a MSG de retorno, mas a MSG está vazia.

 

Ex.

 

    try

   

        f_pdv.ACBrNFe1.Enviar(vNumLote,True,Sincrono);

   

    begin

 

        passou:=true;

 

     //---------------------- Leitura do Arquivo XMl--------------------

 

      chNfe := f_pdv.ACBrNFe1.NotasFiscais.Items[0].NFe.procnfe.chNFe;

      digest:= f_pdv.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.digVal;

      protocolo:= f_pdv.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.nProt;

 

 

     if (trim(protocolo) <> '') then

     begin

        q.close;

        q.SQL.Text:='update t_nfs '+

        ' set NrProtocol = :Protocolo, '+

        '     IDNota = :IdNota, '+

        '     Env = ''S'' '+

        ' where numnf = :nf '+

        '  and modelo = 65 '+

        '  and serie = :serie ' +

        '  and cdemp = :emp ';

        q.ParamByName('nf').AsString := numnf;

        q.ParamByName('emp').AsString := f_menu.Empresa;

        q.ParamByName('serie').AsString := inttostr(f_menu.serie);

        q.ParamByName('Protocolo').AsString:=Protocolo;

        q.ParamByName('IdNota').AsString:=ChNFe;

        q.Prepare;

        q.ExecSQL;

     end;

    end;

  except on E:Exception do

  begin

        passou:=false;

        showmessage('Nota Fiscal Gerada em Contingência!'+' Erro :'+E.Message);

  end;

  end;

 

 

No retorno do showmessage fica: 

                      Nota Fiscal Gerada em Contingência!  Erro :''

 

Preciso de uma ajudinha dos amigos por favor. 

 

Lembrando que isto está acontecendo para todos os certificados novos adquiridos, os certificados antigos conseguem enviar normalmente, e isto está ocorrendo em vários clientes.

 

 

Desde já,

 

Muito obrigado 

 

a quem puder ajudar!

 

[Régys Silveira]

Você atualizou a cadeia de certificados, certificados mais novos já usam uma nova cadeia de certificados e você precisa atualizar.

[karlouchoa]

atualizei a cadeia e ainda continua com problema..   

[Régys Silveira]

Reinstalou o certificado?

[karlouchoa]

quando testo o servico retorno SERVICO EM OPERACAO, agora quando a NFC é enviada retorna vazio conforme descrito anteriormente.

[karlouchoa]

Sim. Reinstalei o certificado.

[karlouchoa]

Prezados,

 

Usando uma função que recupera o retorno da SEFAZ pelo componente ACBr (função obtida através do tópico: ), recebemos o código de erro 0 (zero) - Variável pxMotivo.

Gostaria de saber qual o motivo e como corrigir.

[André Ferreira de Moraes]

Teste a versão OpenSSL com certificados A1 e veja se ocorre o mesmo problema.

[karlouchoa]

Fiz a instalação do componente OpenSSL.

No entanto, no momento da compilação houve erros em linhas que pedem a configuração do certificado, tais como:

 

ACBrNFe1.Configuracoes.Certificados.SelecionarCertificado;

 

Somente comentando esta linha, o Delphi permitia compilar e executar o projeto.

Ao enviar a NFC-e, a nota foi gerada em contingência e o erro apresentado foi: failed to load private pem key from "" (ainda obtendo retorno 0).

 

Alguma sugestão?

[karlouchoa]

Prezados,

 

Desinstalei o ACBr e seus componentes do Delphi, criei um novo repositório do ACBr com as atualizações, instalei novamente o pacote ACBr (ACBrInstall.exe) e no momento da compilação do meu projeto apareceu o seguinte erro:

 

[DCC Error] ACBrNFeNotasFiscais.pas(560): E2003 Undeclared identifier: 'ImprimirDANFEResumido'

 

[DCC Error] ACBrNFeNotasFiscais.pas(576): E2003 Undeclared identifier: 'ImprimirDANFEResumidoPDF'

 

Segui este processo (desinstalação e instalação) para tentar resolver o problema deste post : enviar NFC-e para novos certificados (retorno da SEFAZ: 0).

 

Alguma sugestão?

[karlouchoa]

Senhores,

 

Vou finalizar este post pois resolvi tentar atualizar o meu componente ACBR. A partir de então estou com problemas na compilacao do meu projeto.

 

Irei abrir outro post para este problema, depois caso persista a questão do Certificado Novo, entrarei em contato novamente.

 

Obrigado!