Employ ( StartDate, EndDate )

Estimates the employment time between two dates.

Average rating: 4.5 (32 votes) Log in to vote

Pascal Dimopoulos
Primary School Education
http://uesrs.otenet.gr/~dnapas

Sample input:

Employ("15/01/2000" ; "8/18/2007" )

Sample output:

7 Years, 7 Months, 4 Days

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

Let ([ 
FBS=Case( Month(Date(2 ; 29 ; Year(StartDate) ) ) = 3 ; 28 ; 29 );
FBE=Case( Month(Date(2 ; 29 ; Year(EndDate) ) ) = 3 ; 28 ; 29 );
LDS=Case(
Month(StartDate)=1; 31; 
Month(StartDate)=2; FBS;
Month(StartDate)=3; 31; 
Month(StartDate)=4; 30; 
Month(StartDate)=5; 31;
Month(StartDate)=6; 30;
Month(StartDate)=7; 31;
Month(StartDate)=8; 31;
Month(StartDate)=9; 30;
Month(StartDate)=10; 31;
Month(StartDate)=11; 30;
Month(StartDate)=12; 31); 

LDE=Case(
Month(EndDate)=1; 31; 
Month(EndDate)=2; FBE;
Month(EndDate)=3; 31; 
Month(EndDate)=4; 30; 
Month(EndDate)=5; 31;
Month(EndDate)=6; 30;
Month(EndDate)=7; 31;
Month(EndDate)=8; 31;
Month(EndDate)=9; 30;
Month(EndDate)=10; 31;
Month(EndDate)=11; 30;
Month(EndDate)=12; 31); 

Zero_Factor=Day(StartDate)=1 and Day(EndDate)=LDE; 

d=Case( Zero_Factor; 0; 
Day(StartDate)- Day(EndDate) > 0; Day(EndDate)+LDS-Day(StartDate)+1;
Day(StartDate)- Day(EndDate)< 0 ; Day(EndDate)-Day(StartDate)+1; 1
); 

m0=Case( 
Month(StartDate)-Month(EndDate)>0 and Day(StartDate)-Day(EndDate)>0; 
Month(EndDate)+11-Month(StartDate); 
Month(StartDate)-Month(EndDate)>0 and Day(StartDate)-Day(EndDate) ≤ 0; 
Month(EndDate)+12-Month(StartDate); 
Month(StartDate)-Month(EndDate)<0 and Day(StartDate)-Day(EndDate)>0; 
Month(EndDate)-Month(StartDate)-1; 
Month(StartDate)-Month(EndDate)<0 and Day(StartDate)-Day(EndDate) ≤ 0; 
Month(EndDate)-Month(StartDate); 
Month(StartDate)-Month(EndDate) = 0 and Day(StartDate)-Day(EndDate)>0; 
11; 
Month(StartDate)-Month(EndDate)=0 and Day(StartDate)-Day(EndDate)  ≤ 0; 
Month(EndDate)-Month(StartDate)); 
m=Case(
m0=11 and Zero_Factor; 0; 
Zero_Factor; m0+1; 
m0);
Zero_Factor_2=Zero_Factor and m0=11; 
y0=Year(EndDate)-Year(StartDate);

y=Case(
Zero_Factor_2 and Month(StartDate)-Month(EndDate)> 0; y0; 
Zero_Factor_2 and Month(StartDate)-Month(EndDate)< 0; y0+1;
Month(StartDate)-Month(EndDate) =0 and Day(StartDate)-Day(EndDate) > 0; y0-1;
Month(StartDate)-Month(EndDate) = 0 and Day(StartDate)-Day(EndDate)   ≤  0; y0; 
Month(StartDate)-Month(EndDate)  >  0 and Day(StartDate)-Day(EndDate)  < 0; y0-1; 
Month(StartDate)-Month(EndDate)> 0 and Day(StartDate)-Day(EndDate) ≥  0; y0-1;
y0); 
NY=If (y=1; "Year";"Years"); 
ΝΜ=If(m=1; "Month"; "Months"); 
ND=If(d=1; "Day";"Days") 
]; 
y &" " &  NY & "," &" " &  m&" " & ΝΜ &","&" " & d &" "  &  ND)

Employ (StartDate, EndDate).
Estimates the employment time between two dates. It is 100% accurate, because it does not use the usual devidors to estimate months or days (30,475, or 365,25). Fixes common problems as to include the day that an employment starts,not missing days between years and fixes many other problems that many similar functions can not solve.

Comments

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

Employ ( StartDate, EndDate )

Comments

Support this website.

Support this website.