Newest functions Upload a function Leave a tip My account

There are 2,522 functions in this library.

JulianDecoder ( JulianDate )

This function takes a Julian date code and returns a timestamp

  Average rating: 4.9 (24 votes) Log in to vote

Roger Biel 2Geckos Consulting, LLC www.2geckos.com

  Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

// JulianDecoder( JulianDate ) /*This function takes a Julian date code and returns a timestamp Julian date is the number of seconds since Jan 1st 1970*/ //1174687862 datetime = "3/31/2007 10:11:02 PM" ; // JulianDate = 1174687862 ; Let( [ //work backwards starting with seconds and then subtract seconds to get minutes, etc… Julianmin = Int( JulianDate/60 )*60 ; Juliansec = JulianDate-Julianmin ; JulianDate = JulianDate-Juliansec ; Juliansec = ":" & Case( Length( Juliansec )= 1 ; "0" )& Juliansec ; JulianHour = Int( JulianDate/60/60 )*60*60 ; Julianmin =( JulianDate-JulianHour )/60 ; JulianDate = JulianDate-( Julianmin*60 ) ; Julianmin = ":" & Case( Length( Julianmin )= 1 ; "0" )& Julianmin ; JulianDay = Int( JulianDate/60/60/24 )*60*60*24 ; JulianHour =( JulianDate-JulianDay )/60/60 ; JulianDate = JulianDate-( JulianHour*60*60 ) ; JulianHour = " " & Case( Length( JulianHour )= 1 ; "0" )& JulianHour ; JulianYear = Int( JulianDate/60/60/24/365 )+1970 ; JulianDOY =( JulianDate-( Int( JulianDate/60/60/24/365 )*60*60*24*365 ) )/60/60/24 ; //determine month based on day of year jan = Day( Date( 2 ; 1 ; JulianYear )-1 ) ; feb = jan+Day( Date( 3 ; 1 ; JulianYear )-1 ) ; mar = feb+Day( Date( 4 ; 1 ; JulianYear )-1 ) ; apr = mar+Day( Date( 5 ; 1 ; JulianYear )-1 ) ; may = apr+Day( Date( 6 ; 1 ; JulianYear )-1 ) ; jun = may+Day( Date( 7 ; 1 ; JulianYear )-1 ) ; jul = jun+Day( Date( 8 ; 1 ; JulianYear )-1 ) ; aug = jul+Day( Date( 9 ; 1 ; JulianYear )-1 ) ; sep = aug+Day( Date( 10 ; 1 ; JulianYear )-1 ) ; oct = sep+Day( Date( 11 ; 1 ; JulianYear )-1 ) ; nov = oct+Day( Date( 12 ; 1 ; JulianYear )-1 ) ; dec = nov+Day( Date( 13 ; 1 ; JulianYear )-1 ) ; JulianMonth = Case( JulianDOY-jan<1 ; "01" ; JulianDOY-feb<1 ; "02" ; JulianDOY-mar<1 ; "03" ; JulianDOY-apr<1 ; "04" ; JulianDOY-may<1 ; "05" ; JulianDOY-jun<1 ; "06" ; JulianDOY-jul<1 ; "07" ; JulianDOY-aug<1 ; "08" ; JulianDOY-sep<1 ; "09" ; JulianDOY-oct<1 ; "10" ; JulianDOY-nov<1 ; "11" ; JulianDOY-dec<1 ; "12" ) ; JulianDay = Case( JulianDOY-jan<1 ; JulianDOY ; JulianDOY-feb<1 ; JulianDOY-jan ; JulianDOY-mar<1 ; JulianDOY-feb ; JulianDOY-apr<1 ; JulianDOY-mar ; JulianDOY-may<1 ; JulianDOY-apr ; JulianDOY-jun<1 ; JulianDOY-may ; JulianDOY-jul<1 ; JulianDOY-jun ; JulianDOY-aug<1 ; JulianDOY-jun ; JulianDOY-sep<1 ; JulianDOY-aug ; JulianDOY-oct<1 ; JulianDOY-sep ; JulianDOY-nov<1 ; JulianDOY-oct ; JulianDOY-dec<1 ; JulianDOY-nov ) ; result = JulianMonth & "/" & JulianDay & "/" & JulianYear & JulianHour & Julianmin & Juliansec ] ; GetAsTimestamp( result ) ) Click to copy

This function takes a Julian date code and returns a timestamp
Julian date is the number of seconds since Jan 1st 1970

work backwards starting with seconds and then subtract seconds to get minutes, etc…

In conjunction with Julian function this becomes a powerful way to perform math with the date.

Although not a true Julian date, for all practical purposes 1970 is sufficient.
Leap year, Time zone, and DST are irrelevant, this is just decoding the Julian date generated by the Julian custom function.

 

Comments

		comment, VR Feb 24, 2012
"Julian date is the number of seconds since Jan 1st 1970." I am afraid you are mistaken: Julian date is the number of days since January 1, 4713 BC (in Julian calendar). The number of seconds since January 1, 1970 is commonly referred to as Unix time. Converting Unix time to Filemaker timestamp is rather trivial = UnixTime + 62135596800 though properly one should also account for the time zone and daylight offset.

Log in to post comments.

 

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

Support this website.

This library has been a free commmunity resource for FileMaker users and developers for 20 years. It receives no funding and has no advertisements. If it has helped you out, I'd really appreciate it if you could contribute whatever you think it's worth: