<!---
This file is Copyright © 1998-2009 by Home Care Business Services. This work may not be reproduced, in whole or in part, 
using any medium, including, but not limited to, electronic transmission, CD-ROM or published in print, without the express 
permission of Home Care Business Services.

$Revision: 1.2 $
$Id: update_timeaccounting.cfm,v 1.2 2010/03/22 22:03:46 arlen Exp $
$Date: 2010/03/22 22:03:46 $
--->

<cfparam name="url.atid" default=0 />
<cfparam name="url.aid" default=0 />

<cfif url.atid neq 0>

	<cfquery name="UpdateGetTime" datasource="#Application.DataSrc#">
		update #Request.prefix_db_lookup#.Assessment_TimeAuthorizations set ScheduledHours = 0, UsedHours = 0 where Assessment_Tracker_ID = #url.atid# and Assessment_ID = #url.aid#
	</cfquery>

	<cfquery name="GetTime" datasource="#Application.DataSrc#">
		SELECT at.*,si.visit_date,sum(si.Total_units) as total,si.rev_code,si.rev_codeid
		FROM #Request.prefix_db_lookup#.Assessment_TimeAuthorizations at
		left outer join #Request.prefix_db_agency#.ScheduleItems si on at.assessment_tracker_id = si.assessment_tracker_id
		where at.Assessment_Tracker_ID = #url.atid# and at.Assessment_ID = #url.aid#
		and at.revcode_id = si.rev_codeid
		and si.visit_date > #CreateODBCDate(now())#
		group by si.rev_code 
		order by si.rev_code
	</cfquery>

	<cfoutput query=gettime>
		<cfquery name="UpdateGetTime" datasource="#Application.DataSrc#">
			update #Request.prefix_db_lookup#.Assessment_TimeAuthorizations set ScheduledHours = #gettime.total# where Assessment_TimeAuthorizations_ID = #gettime.Assessment_TimeAuthorizations_ID#
		</cfquery>
	</cfoutput>

	<cfquery name="GetTimePast" datasource="#Application.DataSrc#">
		SELECT at.*,si.visit_date,sum(si.Total_units) as total,si.rev_code,si.rev_codeid
		FROM #Request.prefix_db_lookup#.Assessment_TimeAuthorizations at
		left outer join #Request.prefix_db_agency#.ScheduleItems si on at.assessment_tracker_id = si.assessment_tracker_id
		where at.Assessment_Tracker_ID = #url.atid# and at.Assessment_ID = #url.aid#
		and at.revcode_id = si.rev_codeid
		and si.visit_date <= #CreateODBCDate(now())#
		group by rev_code 
		order by si.rev_code
	</cfquery>


	<cfoutput query=GetTimePast>
		<cfquery name="UpdateGetTime" datasource="#Application.DataSrc#">
			update #Request.prefix_db_lookup#.Assessment_TimeAuthorizations set UsedHours = #GetTimePast.total# where Assessment_TimeAuthorizations_ID = #GetTimePast.Assessment_TimeAuthorizations_ID#
		</cfquery>
	</cfoutput>

</cfif>