Nit-pick: there are 86,400 seconds in a day ;-)

O well, some days feels longer than other. :-)

? mySECONDS(), SECONDS()
...
FUNCTION mySeconds(tdBase)
LOCAL ldBase
ldBase = IIF(EMPTY(tdBase), {^2003/01/01}, tdBase)
RETURN (DATE() - ldBase) * 86400 + SECONDS()