Erro [dcc32 Error] ACBrD5.pas(356): E2003 Undeclared identifier: 'DateSeparator'

[ThiagoHB]

Olá Pessoal!
 

Estou com o seguinte problema, uso Delphi XE8 instalei o ACBR fiz update, tudo atualizado certinho, instalei tudo certo, ao compilar ele aparece o seguintes erros

 

CODIGO ACBR:

procedure InvalidDateTimeError(const AYear, AMonth, ADay, AHour, AMinute,
  ASecond, AMilliSecond: Word; const ABaseDate: TDateTime);
  function Translate(AOrig, AValue: Word): string;
  begin
    if AValue = RecodeLeaveFieldAsIs then
      if ABaseDate = 0 then
        Result := SMissingDateTimeField
      else
        Result := IntToStr(AOrig)
    else
      Result := IntToStr(AValue);
  end;
var
  LYear, LMonth, LDay, LHour, LMinute, LSecond, LMilliSecond: Word;
begin
  DecodeDate(ABaseDate, LYear, LMonth, LDay);
  DecodeTime(ABaseDate, LHour, LMinute, LSecond, LMilliSecond);
  raise EConvertError.CreateFmt(SInvalidDateTime,
                                [Translate(LYear, AYear) + DateSeparator +
                                 Translate(LMonth, AMonth) + DateSeparator +
                                 Translate(LDay, ADay) + ' ' +
                                 Translate(LHour, AHour) + TimeSeparator +
                                 Translate(LMinute, AMinute) + TimeSeparator +
                                 Translate(LSecond, ASecond) + DecimalSeparator +
                                 Translate(LMilliSecond, AMilliSecond)]);
end;

 

LOGS:

[dcc32 Error] ACBrD5.pas(356): E2003 Undeclared identifier: 'DateSeparator'
[dcc32 Warning] ACBrD5.pas(356): W1058 Implicit string cast with potential data loss from 'string' to 'ShortString'
[dcc32 Error] ACBrD5.pas(358): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Error] ACBrD5.pas(359): E2003 Undeclared identifier: 'TimeSeparator'
[dcc32 Error] ACBrD5.pas(360): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Error] ACBrD5.pas(361): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Error] ACBrD5.pas(362): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Fatal Error] U_ACBR_ECE.pas(8): F2063 Could not compile used unit 'ACBrD5.pas'

[BigWings]

42 minutos atrás, ThiagoHB disse:

[dcc32 Error] ACBrD5.pas

Está referenciando essa unit em algum lugar no seu projeto?

[Juliomar Marchetti]

1 hora atrás, ThiagoHB disse:

Olá Pessoal!
 

Estou com o seguinte problema, uso Delphi XE8 instalei o ACBR fiz update, tudo atualizado certinho, instalei tudo certo, ao compilar ele aparece o seguintes erros

 

CODIGO ACBR:

procedure InvalidDateTimeError(const AYear, AMonth, ADay, AHour, AMinute,
  ASecond, AMilliSecond: Word; const ABaseDate: TDateTime);
  function Translate(AOrig, AValue: Word): string;
  begin
    if AValue = RecodeLeaveFieldAsIs then
      if ABaseDate = 0 then
        Result := SMissingDateTimeField
      else
        Result := IntToStr(AOrig)
    else
      Result := IntToStr(AValue);
  end;
var
  LYear, LMonth, LDay, LHour, LMinute, LSecond, LMilliSecond: Word;
begin
  DecodeDate(ABaseDate, LYear, LMonth, LDay);
  DecodeTime(ABaseDate, LHour, LMinute, LSecond, LMilliSecond);
  raise EConvertError.CreateFmt(SInvalidDateTime,
                                [Translate(LYear, AYear) + DateSeparator +
                                 Translate(LMonth, AMonth) + DateSeparator +
                                 Translate(LDay, ADay) + ' ' +
                                 Translate(LHour, AHour) + TimeSeparator +
                                 Translate(LMinute, AMinute) + TimeSeparator +
                                 Translate(LSecond, ASecond) + DecimalSeparator +
                                 Translate(LMilliSecond, AMilliSecond)]);
end;

 

LOGS:

[dcc32 Error] ACBrD5.pas(356): E2003 Undeclared identifier: 'DateSeparator'
[dcc32 Warning] ACBrD5.pas(356): W1058 Implicit string cast with potential data loss from 'string' to 'ShortString'
[dcc32 Error] ACBrD5.pas(358): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Error] ACBrD5.pas(359): E2003 Undeclared identifier: 'TimeSeparator'
[dcc32 Error] ACBrD5.pas(360): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Error] ACBrD5.pas(361): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Error] ACBrD5.pas(362): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Fatal Error] U_ACBR_ECE.pas(8): F2063 Could not compile used unit 'ACBrD5.pas'

Seu projeto foi migrado de alguma versão antiga? creio que o problema esteja relacionado a isso

http://docwiki.embarcadero.com/RADStudio/Rio/en/Unit_Scope_Names