FileMaker Pro Custom Functions

/* Purpose: To display the age of something in a seconds/minutes/hours/days format. This is a similar format to used on a number of websites now, ie facebook Example: 6 seconds / 8 minutes / 14 hours / 1 day Assumptions: Rounds off to the nearest unit. Assumptions: Once maximum unit reached, automatically ticks over to next (ie 61 minutes = 1 hour, 61 seconds = 1 minute, 25 hours = 1 day ) Created by: Daniel Wood, Digital Fusion Ltd, 14/3/2009 */ Let ( [ Difference = GetAsNumber ( Abs ( Get ( CurrentTimeStamp ) - aTimestamp ) ) ; SetVariables = Case ( Difference ≤ 60 ; Let ([ $unit = "second" ; $amount = Difference ]; "" ) ; Difference ≤ 3600 ; Let ([$unit = "minute" ; $amount = Round ( Difference / 60 ; 0 ) ]; "" ) ; Difference ≤ 86400 ; Let ([$unit = "hour" ; $amount = Round ( Difference / 3600 ; 0 ) ]; "" ) ; Let ([ $unit = "day" ; $amount = Round ( Difference / 86400 ; 0 ) ]; "" ) ) ]; $amount & " " & $unit & If ( $amount ≠ 1 ; "s" ; "" ) )
 Then copy & paste into FileMaker Advanced's Edit Custom Function window.