Tuesday, April 05, 2005
Get No Of days in Year
GetNoOfDaysInYear
Function (dateTimeVar investmentDate)
numberVar intDay := 1;
dateVar yearStartDate := CDate (Year (investmentDate), 1 , 1) ;
dateVar yearEndDate := CDate (Year (investmentDate), 12 , 31);
intDay = DateDiff ("d", yearStartDate , yearEndDate );
intDay;
Function (dateTimeVar investmentDate)
numberVar intDay := 1;
dateVar yearStartDate := CDate (Year (investmentDate), 1 , 1) ;
dateVar yearEndDate := CDate (Year (investmentDate), 12 , 31);
intDay = DateDiff ("d", yearStartDate , yearEndDate );
intDay;