Cancelamento De Nota Com Resposta Esquisita Ws-Ba

[jorge andrade]

Pessoal

 

Boa tarde

 

 

Hoje de madrugada, gerei algumas notas na versão 2.00 e estou tentando cancelar uma delas e está dando pau como se eu estivesse tentando cancelar a nota com data;hora errada, embora a resposta relativo a data/hora do evento parecer estar no padrão 3.10, ou estou errado? Veja abaixo:

 

Data/hora de autorização := <dhRecbto>2014-10-23T00:51:34</dhRecbto>

Data/hora do evento : <dhRegEvento>2014-10-23T11:38:38-03:00</dhRegEvento


Resposta:

CSta1t=578
XMotivo=Rejeicao: A data do evento nao pode ser maior que a data de processamento

 

Obs: Tenho bastante tempo tempo pra cancelar aou ao menos até à 00:40 de 24/10, porém gostaria de resolver isso antes.

 

Desde de já, obrigado.

 

[]s,
 

[André Ferreira de Moraes]

Faça uma consulta de status de serviço, verifique a hora retornada pelo servidor da SEFAZ e compare com a hora do micro que está gerando o evento.

[jorge andrade]

Matou a pau André, não tinha pensado nisso, na Bahia não tem horário de verão e o servidor está bem além do sefaz.

 

[]s,

[alessandro92]

Boa Noite.

Estou tendo problemas também com a questão dos horários dos eventos. Temos um cliente que possui filiais em diversos estados brasileiros, no entanto, os eventos são realizados somente pela filial de RS. Assim, se a filial estiver em um time zone diferente de RS dá o problema mencionado. Estive pesquisando e cheguei em algo que acredito resolver o problema das diferenças de horários utilizando as próprias API's dos sitemas operacionais, ficando desse modo:

No uses após o implementation:

uses
  DateUtils,
  {$IFDEF MSWINDOWS} windows, StdCtrls {$ENDIF} {$IFDEF UNIX}
  unixutil {$ENDIF};

Na função de retorno do UTC:

function GetUTC: string;
var
  TZOffset: Integer;
  {$IFDEF MSWINDOWS}
  BiasType: Byte;
  TZInfo: TTimeZoneInformation;
  {$ENDIF}
begin

  {$IFDEF MSWINDOWS}
  BiasType := GetTimeZoneInformation(TZInfo);

  // Determine offset in effect for DateTime UT.
  if (BiasType=2) then
    TZOffset := TZInfo.Bias + TZInfo.DaylightBias
  else if (BiasType=1) then
    TZOffset := TZInfo.Bias + TZInfo.StandardBias
  else
    TZOffset := TZInfo.Bias;
  {$ENDIF}
  {$IFDEF UNIX}
    TZOffset := -Tzseconds div 60;
  {$ENDIF}        

  Result := IfThen( TZOffset>0,'-','+')+FormatDateTime('hh:nn',EncodeTime(Abs(TZOffset) div 60, Abs(TZOffset) mod 60, 0,0) );
end;

Realizei testes no ambiente de homologação e funcionou.

Testei também uma implementação semelhante da função no Lazarus e compilei para Linux e também trouxe o UTC correto e, a melhor parte, já considera o horário de verão na geração.

Ele sempre considera a informação do computador que está emitindo o Evento. 

 

Agradeceria se pudessem testar e verificar se realmente é aceitável essa alteração.

[Sempre Tecnologia]

Utilizo o AcBrNFeMonitor e tenho o mesmo cenário do alessandro92 , no caso para cancelar passamos apenas a chave da NFe, acredito que se acrescentar o campos de data/hora do cancelamento na função CancelarNFe pode resolver o problema.

[André Ferreira de Moraes]

Utilizo o AcBrNFeMonitor e tenho o mesmo cenário do alessandro92 , no caso para cancelar passamos apenas a chave da NFe, acredito que se acrescentar o campos de data/hora do cancelamento na função CancelarNFe pode resolver o problema.

Para passar todos os campos basta vc usar o comando NFE.EnviarEvento.

[Sempre Tecnologia]

Fiz o procedimento e o problema foi resolvido.