ColdFusion UDF For Retrieving Surrounding Dates

<cffunction
	name="GetSurroundingDates"
	access="public"
	returntype="struct"
	output="false"
	hint="Returns the start and end dates of all same-year dates relavent to the given date.">

	<!--- Define arguments. --->
	<cfargument
		name="Date"
		type="date"
		required="true"
		/>


	<!--- Set up local scope. --->
	<cfset var LOCAL = StructNew() />

	<!---
		Start out fixing the passed in date. Fixing it will
		remove the time and result in a date-only values. This
		value will be echoed back in the resultant struct.
	--->
	<cfset LOCAL.Date = DateFormat( ARGUMENTS.Date ) />

	<!--- Get the start and end date of the week. --->
	<cfset LOCAL.WeekStart = DateFormat( LOCAL.Date - DayOfWeek( ARGUMENTS.Date ) + 1 ) />
	<cfset LOCAL.WeekEnd = DateFormat( LOCAL.WeekStart + 6 ) />

	<!--- Get the start and end of the month. --->
	<cfset LOCAL.MonthStart = DateFormat( LOCAL.Date - Day( LOCAL.Date ) + 1 ) />
	<cfset LOCAL.MonthEnd = DateFormat( LOCAL.Date + (DaysInMonth( LOCAL.Date ) - Day( LOCAL.Date )) ) />

	<!--- Get the start and end of the calendar month. --->
	<cfset LOCAL.CalendarMonthStart = DateFormat( LOCAL.MonthStart - DayOfWeek( LOCAL.MonthStart ) + 1 ) />
	<cfset LOCAL.CalendarMonthEnd = DateFormat( LOCAL.MonthEnd + (7 - DayOfWeek( LOCAL.MonthEnd )) ) />

	<!--- Get the start and end of the year. --->
	<cfset LOCAL.YearStart = DateFormat( CreateDate( Year( LOCAL.Date ), 1, 1 ) ) />
	<cfset LOCAL.YearEnd = DateFormat( CreateDate( Year( LOCAL.Date ), 12, 31 ) ) />


	<!--- Return the surrounding dates. --->
	<cfreturn LOCAL />
</cffunction>

<!---
	Get today as the given date. We don't care about
	fixing the date as the ColdFusion UDF will take
	care of that for us.
--->
<cfset dtToday = Now() />

<!--- Dump out resultant struct. --->
<cfdump
	var="#GetSurroundingDates( dtToday )#"
	label="Surronding Dates - #DateFormat( dtToday )#"
	/>