Erro na Atualização - 11376

[Dercide Alvarez]

Atualizei os fontes as 14:00, deu o seguinte erro :

C:\ACBr\Fontes\ACBrDFe\ACBrDFeCapicom.pas(475) Error: Incompatible types
C:\ACBr\Fontes\ACBrDFe\ACBrDFeCapicom.pas(484) Error: Incompatible types
C:\ACBr\Fontes\ACBrDFe\ACBrDFeCapicom.pas(493) Error: Incompatible types
C:\ACBr\Fontes\ACBrDFe\ACBrDFeSSL.pas(243) Fatal: Could not compile used unit 'ACBrDFeCapicom.pas'
Compilation failure
Erro ao compilar o pacote "ACBr_DFeComum.dpk".
 

Dercide.

[Waldir Paim]

Acredito que a correção pode ser essa:

De :

function TDFeCapicom.GetCertDataVenc: TDateTime;
begin
  CarregarCertificadoSeNecessario;
  if Assigned(FCertificado) then
    Result := FCertificado.ValidToDate
  else
    Result := inherited;
end;

function TDFeCapicom.GetCertNumeroSerie: String;
begin
  CarregarCertificadoSeNecessario;
  if Assigned(FCertificado) then
    Result := FCertificado.SerialNumber
  else
    Result := inherited;
end;

function TDFeCapicom.GetCertSubjectName: String;
begin
  CarregarCertificadoSeNecessario;
  if Assigned(FCertificado) then
    Result := FCertificado.SubjectName
  else
    Result := inherited;
end;

Para:

function TDFeCapicom.GetCertDataVenc: TDateTime;
begin
  CarregarCertificadoSeNecessario;
  if Assigned(FCertificado) then
    Result := FCertificado.ValidToDate
  else
    Result := inherited GetCertDataVenc;
end;

function TDFeCapicom.GetCertNumeroSerie: String;
begin
  CarregarCertificadoSeNecessario;
  if Assigned(FCertificado) then
    Result := FCertificado.SerialNumber
  else
    Result := inherited GetCertNumeroSerie;
end;

function TDFeCapicom.GetCertSubjectName: String;
begin
  CarregarCertificadoSeNecessario;
  if Assigned(FCertificado) then
    Result := FCertificado.SubjectName
  else
    Result := inherited GetCertSubjectName; 
end;

Aqui compilou, mas vamos aguardar a correção definitiva.

[Dercide Alvarez]

Beleza, ficamos no aguardo.

 

[Régys Silveira]

Como já dito outras vezes, por favor, ao contribuir, anexe o arquivo alterado não partes de código.

[Daniel Simoes]

Correção já está no SVN...