<!---
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.11 $
$Id: 485_update_action.cfm,v 1.11 2010/03/22 22:03:46 arlen Exp $
$Date: 2010/03/22 22:03:46 $
--->

<cfif isdefined('form.order') and form.order eq 1>
<cfquery name="485_update_action" datasource="#Application.DataSrc#">
	UPDATE #Request.prefix_db_agency#.Assessment_Forms SET
	<cfif isdefined('form.Date_Sent') and form.Date_Sent neq ''>Date_Sent = #CreateODBCDate(form.Date_Sent)#,</cfif>
	<cfif isdefined('form.date_received_item_25') and date_received_item_25 neq ''>date_received_item_25 = #CreateODBCDate(form.date_received_item_25)#,<cfelse>date_received_item_25 = null,</cfif>
	Form_Status = '#form.Form_Status#',
	Record_Modified_By = #Session.EmployeeId#,
	Record_Mod_date = #CreateODBCDateTime(Now())#
	WHERE Assessment_Forms_Id = #form.formId#
</cfquery>

<cfelse>

<cfset M0230_ICD_Item_13_ = '' />
<cfset M0230_Diagnosis_Item_13_ = '' />

<cfoutput>
<cfif isdefined('form.ICD_Count') and form.ICD_Count neq ''>
<cfloop from="1" to="#form.ICD_Count#" index="i">
<cfif i eq 1>
<cfset M0230_ICD_Item_13_ = #FORM['M0230_ICD_Item_'&i]# />
<cfelse>
<cfset M0230_ICD_Item_13_ = M0230_ICD_Item_13_&'<br/>'&#FORM['M0230_ICD_Item_'&i]# />
</cfif>
</cfloop>
</cfif>

<cfif isdefined('form.diagnosis_Count') and  form.diagnosis_Count neq ''>
<cfloop from="1" to="#form.diagnosis_Count#" index="i">
<cfif i eq 1>
<cfset M0230_Diagnosis_Item_13_ = #FORM['M0230_Diagnosis_Item_'&i]#/>
<cfelse>
<cfset M0230_Diagnosis_Item_13_ = M0230_Diagnosis_Item_13_&'<br/>'&#FORM['M0230_Diagnosis_Item_'&i]# />
</cfif>
</cfloop>
</cfif>


<cfquery name="485_update_action" datasource="#Application.DataSrc#">
UPDATE #Request.prefix_db_agency#.Assessment_Forms SET		
<!---Physician_Item_24='#form.Physician_Item_24#'--->
<cfif form.SOC_Item_2 neq ''>SOC_Item_2 = #CreateODBCDate(form.SOC_Item_2)#<cfelse>SOC_Item_2 =NULL</cfif>
<cfif form.Cert_start_Item_3a neq ''>,Cert_start_Item_3a = #CreateODBCDate(form.Cert_start_Item_3a)#<cfelse>,Cert_start_Item_3a=NULL</cfif>
<cfif form.Cert_End_Item_3b neq ''>,Cert_End_Item_3b = #CreateODBCDate(form.Cert_End_Item_3b)#<cfelse>,Cert_End_Item_3b=NULL</cfif>
<cfif M0230_ICD_Item_13_ neq ''>,M0230_ICD_Item_11='#M0230_ICD_Item_13_#'</cfif>
<cfif M0230_Diagnosis_Item_13_ neq ''>,M0230_Diagnosis_Item_11='#M0230_Diagnosis_Item_13_#'</cfif>
<cfif #form.Order_item_21# neq ''>,Order_item_21='#form.Order_item_21#'</cfif>
<cfif #form.Addendum_Details_10# neq ''>,Addendum_Details_10 = '#form.Addendum_Details_10#'</cfif>
<cfif #form.Addendum_Details_22# neq ''>,Addendum_Details_22='#form.Addendum_Details_22#'</cfif>
<cfif #form.Goals_Item_22# neq ''>,Goals_Item_22='#form.Goals_Item_22#'</cfif>
WHERE Assessment_Forms_Id = #form.formId#
</cfquery>
</cfoutput>
</cfif>
<cfset  enc_afid = encrypt(#form.formId#,"54kczhzgHTj4a8n+SRZPyg==","AES","Hex") />
<cfoutput>
<cflocation url="index.cfm?a=1&page=patient&px=y&cat=60day_summary_update&afid=#enc_afid#" addtoken="no">
</cfoutput>


