Data e hora servidor NFC-e

[Turbo Drive]

Bom dia

Estou usando a seguinte função para capturar a data e hora do servidor:

AcbrNfe1.WebServices.StatusServico.Executar;
  hrserv26 := TimeToStr(AcbrNfe1.WebServices.StatusServico.dhRecbto);
  dtsrv26 := dateToStr(AcbrNfe1.WebServices.StatusServico.dhRecbto);

Estou no RN, e aqui usamos o servidor do RS. Atrasei a hora do meu computador em 60 min, e ao invés do retorno ser 10:00 hrs, ainda está me retornando a hora atrasada.

Verifiquei o XML da consulta, e este vem com a data e hora do servidor.

Não tenho certeza, mas acho que o retorno com atraso esteja nessa função da unit AcbrNFeWebservices

if (pos('svrs.rs.gov.br', FPURL) > 0) and
       (MinutesBetween(NFeRetorno.dhRecbto, Now) > 50) and
       (not IsHorarioDeVerao(CUFtoUF(FcUF), NFeRetorno.dhRecbto)) then
      FdhRecbto:= IncHour(NFeRetorno.dhRecbto,-1)
    else
      FdhRecbto := NFeRetorno.dhRecbto;

Existe alguma forma configurar o componente para chamar essa função apenas no período do horário de verão ?

Desde já agradeço a atenção.

 

[André Ferreira de Moraes]

A fun

Em 11/08/2017 at 10:31, Turbo Drive disse:

Existe alguma forma configurar o componente para chamar essa função apenas no período do horário de verão ?

A função IsHorarioDeVerao deveria fazer isso, debugue ela para encontrar o problema.