PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 25 → Wx - Trabalhando com diferença de datas
Wx - Trabalhando com diferença de datas
Started by Boller, Dec., 22 2015 2:05 PM - No answer
Registered member
4,521 messages
Posted on December, 22 2015 - 2:05 PM
Prezados,

Segue um exemplo interessante:

Procedure InicializaFiltro()

QuatroHorasAntes is DateTime = DateSys()+TimeSys()
QuatroHorasMenos is string = (QuatroHorasAntes..Hour - 4)+":00" // menos 4 horas
EDT_Data_Inicial = DateToString(DateSys(),"DD/MM/YYYY")
EDT_Hora_Inicial = QuatroHorasMenos
EDT_Data_Final = DateToString(DateSys(),"DD/MM/YYYY")
EDT_Hora_Final = TimeToString(TimeSys(),"HH:MM:SS") // hora atual


--
Adriano Jose Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 9949 1800
adrianoboller@gmail.com
skype: adrianoboller
______________________________________________