Erro ao compilar o pacote "ACBr_MDFe.dpk".

[Leao]

No final da instalação:

Copyright (c) 1983,2002 Borland Software Corporation
D:\Acbr\trunk2\Fontes\ACBrDFe\ACBrMDFe\PCNMDFe\pmdfeMDFeW.pas(686) Error: ';' not allowed before 'ELSE'
D:\Acbr\trunk2\Fontes\ACBrDFe\ACBrMDFe\ACBrMDFeManifestos.pas(46) Fatal: Could not compile used unit '..\..\..\..\Fontes\ACBrDFe\ACBrMDFe\PCNMDFe\pmdfeMDFeW.pas'
Compilation failure
Erro ao compilar o pacote "ACBr_MDFe.dpk".

Abortando... Ocorreram erros na compilação dos pacotes.

Já usei o apagarAcbr.bat

version 12554

Obrigado,

Leão

 

log_Delphi_7.txt

-----------------------------------| o erro |-------------------------------------------------------------

pmdfeMDFeW.pas

procedure TMDFeW.GerarFerrov;
var
  i: Integer;
begin
  Gerador.wGrupo('ferrov', '#01');

  Gerador.wGrupo('trem', '#02');
  Gerador.wCampo(tcStr, '#03', 'xPref    ', 01, 10, 1, MDFe.ferrov.xPref, DSC_XPREF);

  if VersaoDF = ve100 then
    Gerador.wCampo(tcDatHor, '#04', 'dhTrem', 19, 19, 0, MDFe.ferrov.dhTrem, DSC_DHTREM);    // esse ; é só tirar...
  else
    Gerador.wCampo(tcStr, '#04', 'dhTrem', 25, 25, 1, FormatDateTime('yyyy-mm-dd"T"hh:nn:ss', MDFe.ferrov.dhTrem)
                                                           + GetUTC(CodigoParaUF(MDFe.ide.cUF), MDFe.ferrov.dhTrem), DSC_DHTREM);

  Gerador.wCampo(tcStr, '#05', 'xOri     ', 01, 03, 1, MDFe.ferrov.xOri, DSC_XORI);
  Gerador.wCampo(tcStr, '#06', 'xDest    ', 01, 03, 1, MDFe.ferrov.xDest, DSC_XDEST);
  Gerador.wCampo(tcInt, '#07', 'qVag     ', 01, 03, 1, MDFe.ferrov.qVag, DSC_QVAG);
  Gerador.wGrupo('/trem');

  for i := 0 to MDFe.ferrov.vag.Count - 1 do
  begin
    Gerador.wGrupo('vag', '#08');
    Gerador.wCampo(tcStr, '#09', 'serie', 3, 3, 1, MDFe.ferrov.vag.serie, DSC_NSERIE);
    Gerador.wCampo(tcInt, '#10', 'nVag ', 1, 8, 1, MDFe.ferrov.vag.nVag, DSC_NVAG);
    Gerador.wCampo(tcInt, '#11', 'nSeq ', 1, 3, 0, MDFe.ferrov.vag.nSeq, DSC_NSEQ);
    Gerador.wCampo(tcDe3, '#12', 'TU   ', 1, 7, 1, MDFe.ferrov.vag.TU, DSC_TU);
    Gerador.wGrupo('/vag');
  end;
  if MDFe.ferrov.vag.Count > 990 then
   Gerador.wAlerta('#08', 'vag', '', ERR_MSG_MAIOR_MAXIMO + '990');

  Gerador.wGrupo('/ferrov');
end;
 

[Juliomar Marchetti]

Bom dia

de quando é sua atualização? pois acabei de conferir e não existe a mensagem informada!

favor atualizar o svn e reverter alterações que tenha feito manual nos fontes !

 

[Leao]

Olá Juliomar, 

estar atualizado  version 12554

de sábado

[Juliomar Marchetti]

29 minutos atrás, Leao disse:

Olá Juliomar, 

estar atualizado  version 12554

de sábado

Bom dia!

então faça o revert em seus fontes , deve ter ocorrido algo localmente em seu micro!

[BigWings]

Ou atualize novamente, o erro foi corrigido na 12557.

[Leao]

Sim, agora estar corrigido.

 

Obrigado,

Leão

[Fernanda Alves]

Olá!

Estou com um problema parecido: Erro ao compilar o pacote "ACBr_MDFeDamdfeFR.dpk".

Minha revisão é a 12575 e não há alterações no fonte. Já usei o bat também e não resolveu.

Abaixo o log gerado.

Obrigada.

 

Anexe o arquivo não cole

[Alisson Suart]

Se nao tem alterações nos arquivos, apague os mesmos e faça o download novamente. Deve resolver.

[Fernanda Alves]

Já consegui resolver obrigada! Meu FastReport estava em uma versão anterior, então não encontrava algumas propriedades.