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: 20420
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP
Curtiram: 1 vez

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, multithread, gtwvg, fivewin 25.12, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui), (hmg3), (hmg extended), (oohg), PNotepad, ASP, (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: 1914
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