Comments on: Happy New Year! 2009 http://www.stjohnjohnson.com/blog/happy-new-year-2009 This is a place for me to post my ideas, projects, tutorials, and resume for all to see Fri, 29 Apr 2011 06:09:26 +0000 hourly 1 http://wordpress.org/?v=3.3.1 By: Mark Kobulnick http://www.stjohnjohnson.com/blog/happy-new-year-2009/comment-page-1#comment-2742 Mark Kobulnick Mon, 12 Jul 2010 17:31:28 +0000 http://www.stjohnjohnson.com/?p=258#comment-2742 By the way, I changed the code to Numbervar Difference := datediff("yyyy", d1, d2) Much more efficient. By the way, I changed the code to

Numbervar Difference := datediff(“yyyy”, d1, d2)

Much more efficient.

]]> By: Mark Kobulnick http://www.stjohnjohnson.com/blog/happy-new-year-2009/comment-page-1#comment-2740 Mark Kobulnick Mon, 12 Jul 2010 13:45:21 +0000 http://www.stjohnjohnson.com/?p=258#comment-2740 Leap years are a pain. I had to write a Crystal Report when I started this job. As per our contract, we are entitled to "Bonus Vacation Days" based on years of service. For my "Years of Service" formula I used 365.25 as my denominator. One day the Payroll dept contacts me with a discrepancy. One employee received 1 less day of bonus vacation time. When I expanded the result to 4 decimal places, the years of service came to 19.9971. When I changed my denominator to 365.20, the years of service came out to 20.0000. Here's the formula: dateTimeVar d1 := {EMPLOYEE.ADJ_HIRE_DATE}; dateTimeVar d2 := {?EndPayPeriod}; NumberVar d3 := 0.0; Numbervar Difference := datediff("d", d1, d2 ); d3 := (Difference/365.20000); Leap years are a pain. I had to write a Crystal Report when I started this job. As per our contract, we are entitled to “Bonus Vacation Days” based on years of service. For my “Years of Service” formula I used 365.25 as my denominator. One day the Payroll dept contacts me with a discrepancy. One employee received 1 less day of bonus vacation time. When I expanded the result to 4 decimal places, the years of service came to 19.9971. When I changed my denominator to 365.20, the years of service came out to 20.0000. Here’s the formula:

dateTimeVar d1 := {EMPLOYEE.ADJ_HIRE_DATE};

dateTimeVar d2 := {?EndPayPeriod};

NumberVar d3 := 0.0;

Numbervar Difference := datediff(“d”, d1, d2 );

d3 := (Difference/365.20000);

]]>