PC SOFT

WINDEVWEBDEV AND WINDEV MOBILE
ONLINE HELP

Home | Sign in | English UK
  • Format of result
  • Validity of the times
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaReports and QueriesUser code (UMC)
WEBDEV
WindowsLinuxPHPWEBDEV - Browser code
WINDEV Mobile
AndroidAndroid Widget iPhone/iPadApple WatchUniversal Windows 10 AppWindows Mobile
Others
Stored procedures
Calculates the difference between two times in hundredths of a second.
Example
// Displays the time passed since 12:15
Diff is int
Time_Sign is string
MyResult is string
 
Diff = TimeDifference("1215", TimeSys())
MyResult = IntegerToTime(Abs(Diff))
IF Diff < 0 THEN Time_Sign = "-"
Info("Time passed: " + Time_Sign + Left(MyResult, 2) + " hours " + ...
Middle(MyResult, 3, 2) + " minutes " + ...
Middle(MyResult, 5, 2) + " seconds " + ...
Middle(MyResult, 7, 2) + " hundredths of a second")
Syntax
<Result> = TimeDifference(<Start time> , <End time>)
<Result>: Integer
Number of hundredths of a second passed between the two times. This number comes from the following operation:
<End time> - <Start time>.
The result is negative if <Start time> is after <End time>.
<Start time>: Character string or Time variable
Start time in the following format:
  • HHMMSSCC
  • HHMMSS
  • HHMM
  • HH
<End time>: Character string or Time variable
End time in the following format:
  • HHMMSSCC
  • HHMMSS
  • HHMM
  • HH
Remarks

Format of result

To get the duration in another format (HHMMSSCC for example), use IntegerToTime.
WEBDEV - Server codePHPAjax

Validity of the times

The validity of times passed in parameter is checked. A message is displayed if the time is invalid. The validity of a time can be checked by TimeValid.
Component : wd240std.dll
Minimum version required
  • Version 9
This page is also available for…
Comments
Exemplo Diferenca Tempo
Exemplo Diferenca Tempo

n_diferenca is int=TimeDifference(EDT_Time_inicial,EDT_Time_final)
EDT_resultado=IntegerToTime(Abs(n_diferenca))
EDT_horas=EDT_resultado[[1 TO 2]]
EDT_Minutos=EDT_resultado[[3 TO 4]]
EDT_segundos=EDT_resultado[[5 TO 6]]
EDT_centesimos_segundos=EDT_resultado[[7 TO 8]]

//Frances
n_diferenca_f est entier=HeureDifférence(EDT_Time_inicial,EDT_Time_final)
EDT_resultado=EntierVersHeure(Abs(n_diferenca))
EDT_horas=EDT_resultado[[1 A 2]]
EDT_Minutos=EDT_resultado[[3 A 4]]
EDT_segundos=EDT_resultado[[5 A 6]]
EDT_centesimos_segundos=EDT_resultado[[7 A 8]]

//Blog Com Video e Exemplo
http://windevdesenvolvimento.blogspot.com.br/2016/07/curso-windev-datas-014-timedifference.html
https://www.youtube.com/watch?v=LxSIqUn-cqA

De matos AMARILDO
27 Jul. 2016
Example
// Time passed since 01/01/1998 at 12:15
sTDatahoraAgenda is string = Middle(StringToDate(EDT_DataAgendamento)+StringToTime(Middle(EDT_DataAgendamento,12,5)),1,12) //"199801011215"
Diff is string
Diff = DateTimeDifference(sTDatahoraAgenda, DateSys() + TimeSys())
//Display the time passed
//Info("Time passed: " + CR + ...
//Left(Diff, 8) + "days" + CR + ...
//Middle(Diff, 9, 2) + "hours" + CR + ...
//Middle(Diff, 11, 2) + "minutes" + CR + ...
//Middle(Diff, 13, 2) + "seconds" + CR + ...
//Middle(Diff, 15, 2) + "hundredths of a second")

//Valida data
nSMinutos is int = Val(Middle(Diff, 11, 2))
IF CBOX_Agendamento..Value = True AND Middle(Diff, 11, 2) < 30
Info("A data e hora agendada tem que ser maior do que 30 minutos")
ok1 = False
ELSE
ok1 = True
END
adrianoboller
27 Nov. 2015