Software "trava" when calling ACBrNFe1.SSL.SelectionarCertificado

[smaniand]

Hi all, 

we have a huge problem with our software. We are using trunk2, components updatet to today 16/03/2017. 

We have a "leitor" Serasa Gemalto, and the "Certificado Digital" is Serasa too, A3. When our software calls ACBrNFe1.SSL.SelecionarCertificado, it opens a windows where you can select the certificates installed in the machine.

As soon as we select the A3 Certificate and we press ok, the software CRASHES.

All was working with ACBr sourcecode from 1 year ago (when the method was called: ACBrNFe1.Configuracoes.certificados.....)

What can we do?

Other useful info: problem occurredn in a CPU with Windows8, we moved the "leitor" in a CPU with Windows 10, and same problem. All works with Certificado A1.

 

Thanks

Andrea

ITALY

Editado 16 Março, 2017 por smaniand

[RicardoVoigt]

Boa tarde,

qual versão do Delphi ou Lazarus? (what version of your IDE ?)

Já tentou desinstalar (apagarAcbr.bat) e reinstalar (ACBrInstall_Trunk2.exe) os componentes? (Did you try unninstal and reinstall the components?)

Já tentou registrar a capicom.dll ? (C:\ACBr\DLLs\Capicom\instala.bat) Tente também rodar como Administrador... (Try run as Admin...)

Att

Ricardo

[smaniand]

Ok now we are a step ahead.

We are usinc CAPICOM, and now i set the parameter SSLLib to LibCapicom. After this, the software does not hangs anymore.

But when we send the NFe, the software raises an excaption: Parametro Incoreto.

Any help appreciated,

thanks

[hleorj]

30 minutos atrás, smaniand disse:

Hi all, 

we have a huge problem with our software. We are using trunk2, components updatet to today 16/03/2017. 

We have a "leitor" Serasa Gemalto, and the "Certificado Digital" is Serasa too, A3. When our software calls ACBrNFe1.SSL.SelecionarCertificado, it opens a windows where you can select the certificates installed in the machine.

As soon as we select the A3 Certificate and we press ok, the software CRASHES.

All was working with ACBr sourcecode from 1 year ago (when the method was called: ACBrNFe1.Configuracoes.certificados.....)

What can we do?

Other useful info: problem occurredn in a CPU with Windows8, we moved the "leitor" in a CPU with Windows 10, and same problem. All works with Certificado A1.

 

Thanks

Andrea

ITALY

Linguagem utilizada no fórum é o português 

Favor utilizar uma tradução em português.

1 minuto atrás, smaniand disse:

Ok now we are a step ahead.

We are usinc CAPICOM, and now i set the parameter SSLLib to LibCapicom. After this, the software does not hangs anymore.

But when we send the NFe, the software raises an excaption: Parametro Incoreto.

Any help appreciated,

thanks

Ok, agora estamos um passo à frente.

Estamos usinc CAPICOM, e agora eu definir o parâmetro SSLLib para LibCapicom. Depois disso, o software não trava mais.

Mas quando enviamos o NFe, o software levanta um excaption: Parametro Incoreto.

Qualquer ajuda apreciada,

obrigado

[smaniand]

Boa tarde,

favor, alguem pode ajudar? Temos o mesmo problema, ao assinar a Nfe aparece o erro "Parametro Incorreto"

Obr.

Andrea

 

[hleorj]

Post o arquivo xml sem assinatura, se possível.

[smaniand]

O problema è que o aplicativo nem gera o XML...

Ao chamar o metodo AcbrNfe1.Enviar o aplicativo trava, ou mensagem "Parametro Incoreto" (em portugues)

Tentei compilar ACBr sem OpenSSL, tentei usar MinGW...mesmo problema.

Att.

Andrea

Usando um certificado A1, è tudo certo. Somente A3 tem problema. Mas temos um outro cliente com certificado A3 Boa Vista e tudo funciona normal, mesma versao do apllicativo

Editado 17 Março, 2017 por smaniand

[RicardoVoigt]

34 minutos atrás, smaniand disse:

Boa tarde,

favor, alguem pode ajudar? Temos o mesmo problema, ao assinar a Nfe aparece o erro "Parametro Incorreto"

Obr.

Andrea

 

Se não me engano, me parece que este erro "Parametro incorreto" vem da capicom.dll...

Já tentou simular o erro usando o aplicativo Demo ? (C:\ACBr\Exemplos\ACBrDFe\ACBrNFe\Delphi)

Está enviando uma NFe modelo 55 ou NFCe modelo 65?

Faça também um teste sem configurar a senha do certificado no componente ACBrNFe, para ver se abre uma "telinha" solicitando a senha PIN.

Att

Ricardo

[smaniand]

Estou enviando uma NFe modelo 55.

A senha nao està configurada, a telinha aparece, quando vou digitar o pincode e Ok, o software trava (ou parametro incorretto)

Agora vou tentar usar o demo, obrigado pela ajuda

Andrea

 

[RicardoVoigt]

Mesmo ocorrendo o erro "Parametro incorreto", você chegou a consultar no portal (ou na respectiva sefaz) se por acaso a NFe não foi autorizada ?

Att

Ricardo

[smaniand]

a NFe nao està na sefaz.

com o Demo, eu carrego o numero de serie do certificado, depois quando eu clicar em botao SHA265+RSA, aparece telinha do pin e depois eu clicar em ok, demo trava tb.

Andrea

 

Foi para o site da sefaz, para baixar o XML de uma nota enviada ontem (google chrome). Quando eu clicar no botao "Baixa XML", aparece a tela do chrome que solicita o certificado, depois aparece a telinha para senha, e o Chrome trava tambem!

Serà um problema no driver do certificado?

Andrea

Editado 17 Março, 2017 por smaniand

[Rafael Dias]

Yes, seems to be a problem with the certificate instalation.
Sim, parece ser um problema com a instalação do certificado.

[smaniand]

Sim, parece. O estranho è que antes de instalar o update do nosso software, foi tudo ok. Depois de update, nada funciona.

[smaniand]

Resolvei removendo CAPICOM: 

 

[Daniel Simoes]

Windows UI Dialog to show existing certificates is problematic...

Now you can built your own Window, to select the certificate, using  ACBrNFe1.SSL.LerCertificadosStore and ACBrNFe1.SSL.ListaCertificados[] ... Check this code in Demo:

procedure TForm1.sbtnGetCert1Click(Sender: TObject);
var
  I: Integer;
begin
  frSelecionarCertificado := TfrSelecionarCertificado.Create(Self);
  try
    ACBrNFe1.SSL.LerCertificadosStore;

    For I := 0 to ACBrNFe1.SSL.ListaCertificados.Count-1 do
    begin
      with ACBrNFe1.SSL.ListaCertificados[I] do
      begin
        if (CNPJ <> '') then
        begin
          with frSelecionarCertificado.StringGrid1 do
          begin
            RowCount := RowCount + 1;
            Cells[ 0, RowCount-1] := NumeroSerie;
            Cells[ 1, RowCount-1] := RazaoSocial;
            Cells[ 2, RowCount-1] := CNPJ;
            Cells[ 3, RowCount-1] := FormatDateBr(DataVenc);
            Cells[ 4, RowCount-1] := Certificadora;
          end;
        end;
      end;
    end;

    frSelecionarCertificado.ShowModal;

    if frSelecionarCertificado.ModalResult = mrOK then
      edtNumSerie.Text := frSelecionarCertificado.StringGrid1.Cells[ 0,
                            frSelecionarCertificado.StringGrid1.Row];

  finally
     frSelecionarCertificado.Free;
  end;
end;
 

 

[Dercide Alvarez]

@Daniel Simoes

Implementei essa rotina : LerCertificadosStore

Porém ela não carrega um certificado da SERPRORBv4, é um certificado valido até 2018 e que uso constantemente. Já havia testado na DEMO e também não carrega.

Dercide.

[Daniel Simoes]

Verifique que Loop, há um filtro, para pular os certificados com numero de série menor que 16 caracteres e sem CNPJ...

Isso é apenas um exemplo.. adapte a suas necessidades