FileMaker Pro Custom Functions

/* Function: ElapsedTime_CFpub ( tsStart ; tsEnd). Type: Timestamp calculation returning a text result. Purpose: To calculate in human readable form the elapsed time between two events using years, months, days, hours, minutes and seconds. Constraints: The function uses 30 days for months and 12 months for years resulting in a 360 day year. Options: The function can be rewritten without the years and months and is perfectly accurate for elapsed time vs calendar time. Modifications: The function can have a third parameter to extract any one time period value or to supply the text form. Author: James Hea Email: jhea@mac.com */ Let ( [ seconds = If( IsEmpty(tsEnd) ; "" ; tsEnd- tsStart) ; minutes = seconds/60 ; hours = minutes/60 ; days = hours/24; months = days/30; years = months/12; displaySeconds = Mod(seconds ; 60); displayMinutes = Int(Mod(minutes; 60)); displayHours = Int(Mod(hours ; 24)); displayDays = Int(Mod(days; 30)); displayMonths = Int(Mod(months; 12)); displayYears = Int(Div(months; 12)) ]; Case( IsEmpty(tsEnd); "" ; displayYears & " years " & displayMonths & " months " & displayDays & " days " & displayHours & " hours " & displayMinutes & " minutes " & displaySeconds & " seconds" ) // end Case ) // end Let
 Then copy & paste into FileMaker Advanced's Edit Custom Function window.