Fuso horário / horário de verão

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Fuso horário / horário de verão

Mensagem por JoséQuintas »

No harbour tem função pra obter o fuso horário ok.
hb_UTCOffSet()

Mas e como obter isso para o horário de verão?
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Kapiaba
Colaborador
Colaborador
Mensagens: 1908
Registrado em: 07 Dez 2012 16:14
Localização: São Paulo
Contato:

Fuso horário / horário de verão

Mensagem por Kapiaba »

Olá, veja se não é isto:

Código: Selecionar todos

#require "hbmisc"

PROCEDURE Main()

   LOCAL tTime

   Set( _SET_DATEFORMAT, "yyyy-mm-dd" )

   ?? "UTC    time:", tTime := hb_TSToUTC( "200.20.186.75" )
   ?
   ?? "Local  time:", tTime + hb_UTCOffset() / 86400
   ?
   ?? "System time:", hb_DateTime()
   ?
   // Ou
   ? hb_TSToStr( hb_DateTime() )

RETURN
abs.
Responder