PowerBuilder

Date/Time Older-Than N Seconds/Minutes/Hours/Days

Demonstrates the how to tell if a date/time is older than the current time by N seconds, minutes, hours, or days. PowerBuilder

integer li_rc
oleobject loo_Dt
integer b

loo_Dt = create oleobject
li_rc = loo_Dt.ConnectToNewObject("Chilkat.CkDateTime")
if li_rc < 0 then
    destroy loo_Dt
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// Set to the current system date/time.
loo_Dt.SetFromCurrentSystemTime()
Write-Debug "Now: " + loo_Dt.GetAsTimestamp(1)

// Subtract 10 minutes, making the date 10 minutes in the past.
loo_Dt.AddSeconds(-600)
Write-Debug "10 minutes ago: " + loo_Dt.GetAsTimestamp(1)

// Is the date/time older than 10 seconds?
b = loo_Dt.OlderThan(10,"seconds")
Write-Debug "Older than 10 seconds: " + string(b)

// Is the date/time older than 5 minutes?
b = loo_Dt.OlderThan(5,"minutes")
Write-Debug "Older than 5 minutes: " + string(b)

// Is the date/time older than 15 minutes?
b = loo_Dt.OlderThan(15,"minutes")
Write-Debug "Older than 15 minutes: " + string(b)

// Is the date/time older than 1 hour?
b = loo_Dt.OlderThan(1,"hour")
Write-Debug "Older than 1 hour: " + string(b)

// Is the date/time older than 1 day?
b = loo_Dt.OlderThan(1,"day")
Write-Debug "Older than 1 day: " + string(b)

// Output:

// 	Now: 2017-05-05T23:33:06-0500
// 	10 minutes ago: 2017-05-05T23:23:06-0500
// 	Older than 10 seconds: True
// 	Older than 5 minutes: True
// 	Older than 15 minutes: False
// 	Older than 1 hour: False
// 	Older than 1 day: False


destroy loo_Dt