
<cfif  isDefined("session.AgencyId")>
<cfsetting  requesttimeout="30">
<cfif isdefined('form.EmptyPathwayID') and #form.EmptyPathwayID# neq ''>
<cfoutput>
<cfloop index="InsertID" list="#form.EmptyPathwayID#" delimiters=",">

<cfquery name="ids" datasource="#Application.DataSrc#">
select Pathway_Details_ID,Item_Number,Intervention_Code,Type,Description,Agency_ID,Patient_ID,Assessment_ID,Assessment_Tracker_ID,Record_Creation_Date,Created_By from #Request.prefix_db_agency#.Pathway_Details where Pathway_Details_Id=#InsertID#
</cfquery>

<cfquery name="insertvisitdetails" datasource="#Application.DataSrc#">
INSERT INTO #Request.prefix_db_agency#.PatientVisitDetails(Pathway_Details_ID,ScheduleItems_ID,Item_Number,Intervention_Code,Type,Description,Reading1,Agency_ID,
Patient_ID,Assessment_ID,Assessment_Tracker_ID,Record_Creation_Date,Record_Created_By) VALUES ('#ids.Pathway_Details_ID#','#session.cs.ScheduleId#','#ids.Item_Number#','#ids.Intervention_Code#','#ids.Type#','#ids.Description#','#ids.Agency_ID#','#ids.Patient_ID#','#ids.Assessment_ID#','#ids.Assessment_Tracker_ID#','#DateFormat(ids.Record_Creation_Date,"yyyy-mm-dd")#','#ids.Created_By#') 
</cfquery>
</cfloop>
</cfoutput>
</cfif>

<cfif isdefined('form.hdnPerProgressId') and form.hdnPerProgressId neq ''>
<cfloop list="#form.hdnPerProgressId#" index="id" delimiters=",">
<cfoutput>
<cfquery name="updateperformed" datasource="#Application.DataSrc#">  
  Update #Request.prefix_db_agency#.PatientVisitDetails set Performed='',general_assessment='' where Progress_Details_ID=#id# 
</cfquery>
</cfoutput>
</cfloop>
</cfif>

<cfif isdefined('form.hdnrePathId') and form.hdnrePathId neq ''>
<cfloop list="#form.hdnrePathId#" index="id" delimiters=",">
<cfoutput>
<cfquery name="updateresolved" datasource="#Application.DataSrc#">  
  UPDATE #Request.prefix_db_agency#.Pathway_Details SET Resolved_Date = NULL where Pathway_Details_Id=#id# 
</cfquery>
</cfoutput>
</cfloop>
</cfif>

<cfif isdefined('form.hdnWoundResolve') and form.hdnWoundResolve neq ''>
<cfloop list="#form.hdnWoundResolve#" index="id" delimiters=",">
<cfoutput>
<cfquery name="updateresolved" datasource="#Application.DataSrc#">  
  UPDATE #Request.prefix_db_agency#.Pathway_Details SET Resolved_Date = NULL where Pathway_Details_Id=#id# 
</cfquery>
</cfoutput>
</cfloop>
</cfif>

<cfif isdefined('form.hdnVitalResolved') and form.hdnVitalResolved neq ''>
<cfloop list="#form.hdnVitalResolved#" index="id" delimiters=",">
<cfoutput>
<cfquery name="updateresolved" datasource="#Application.DataSrc#">  
  UPDATE #Request.prefix_db_agency#.Pathway_Details SET Resolved_Date = NULL where Pathway_Details_Id=#id# 
</cfquery>
</cfoutput>
</cfloop>
</cfif>

<cfif isdefined('form.hdnLabResolved') and form.hdnLabResolved neq ''>
<cfloop list="#form.hdnLabResolved#" index="id" delimiters=",">
<cfoutput>
<cfquery name="updateresolved" datasource="#Application.DataSrc#">  
  UPDATE #Request.prefix_db_agency#.Pathway_Details SET Resolved_Date = NULL where Pathway_Details_Id=#id# 
</cfquery>
</cfoutput>
</cfloop>
</cfif>

<cfset glob_queryVisitDate = '' />
<cfset bool_VisitDate = 'false' />
<cfset get_Woundinsert = 'true' />
<cfset set_queryWunType = '' />
<cfset set_ScheduleItems_ID = '' />
<cfset loc_visitdate = ''  />
<cfset get_ProgressID = ''  />

<CFLOOP COLLECTION="#Form#" ITEM="VarName">

<CFOUTPUT>
<cfif #VarName# contains('RESOLVED_') and #VarName# neq 'RESOLVED_'>
  <cfset IndexOfOccurrence=Find("_", #VarName#) />
  <cfquery name="updateresolved" datasource="#Application.DataSrc#">  
  UPDATE #Request.prefix_db_agency#.Pathway_Details SET 
  Resolved_Date = '#DateFormat(Now(),"yyyy-mm-dd")#', 
  Record_Mod_Date = '#DateFormat(Now(),"yyyy-mm-dd")#',
  <cfif isDefined("session.EmployeeID")>
  Record_Modified_By = '#session.EmployeeID#'
  </cfif>
 WHERE Pathway_Details_Id= #mid(VarName,IndexOfOccurrence+1,len(VarName))#
  </cfquery>  
</cfif>

<cfif #VarName# Contains 'NOTES_'>
<cfif isdefined('form.EmptyPathwayID') and #form.EmptyPathwayID# neq ''>
<cfloop index="InsertID" list="#form.EmptyPathwayID#" delimiters=",">
<cfif #VarName# Contains '#InsertID#'>
<cfset IndexOfOccurrence=Find("_", #VarName#) /> 
<cfquery name="updatenotes" datasource="#Application.DataSrc#">  
  Update #Request.prefix_db_agency#.PatientVisitDetails set Notes='#Form[VarName]#' where Pathway_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))# 
</cfquery>
<cfelse>
<cfset IndexOfOccurrence=Find("_", #VarName#) /> 
<cfquery name="updatenotes" datasource="#Application.DataSrc#">  
  Update #Request.prefix_db_agency#.PatientVisitDetails set Notes='#Form[VarName]#' where Progress_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))# 
</cfquery>
</cfif>
</cfloop>
<cfelse>
<cfset IndexOfOccurrence=Find("_", #VarName#) /> 
<cfquery name="updatenotes" datasource="#Application.DataSrc#">  
  Update #Request.prefix_db_agency#.PatientVisitDetails set Notes='#Form[VarName]#' where Progress_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))# 
</cfquery>
</cfif>
</cfif>

<cfif #VarName# Contains 'Symptom-'>
<cfif isdefined('form.EmptyPathwayID') and #form.EmptyPathwayID# neq ''>
<cfloop index="InsertID" list="#form.EmptyPathwayID#" delimiters=",">
<cfif #VarName# Contains '#InsertID#'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />  
<cfquery name="updateperformed" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.PatientVisitDetails set Severity='#Form[VarName]#' where Pathway_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>
<cfelse>
<cfset IndexOfOccurrence=Find("_", #VarName#) />  
<cfquery name="updateperformed" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.PatientVisitDetails set Severity='#Form[VarName]#' where Progress_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>
</cfif>
</cfloop>
<cfelse>
<cfset IndexOfOccurrence=Find("_", #VarName#) />  
<cfquery name="updateperformed" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.PatientVisitDetails set Severity='#Form[VarName]#' where Progress_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>
</cfif>
</cfif> 

<cfif #VarName# Contains 'Vresolved_'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />
<cfquery name="updateresolved" datasource="#Application.DataSrc#">  
  UPDATE #Request.prefix_db_agency#.Pathway_Details SET Resolved_Date = '#DateFormat(Now(),"yyyy-mm-dd")#', 
  Record_Mod_Date = '#DateFormat(Now(),"yyyy-mm-dd")#',
  Record_Modified_By = '#session.EmployeeID#'
		WHERE Pathway_Details_Id= #mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>  
</cfif> 

<cfif #VarName# Contains 'Vrdsever_'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />  
<cfquery name="updateperformed" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.PatientVisitDetails set Severity='#Form[VarName]#' where Progress_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>
</cfif>

<cfif #VarName# Contains 'Vnotes_'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />  
<cfquery name="updateperformed" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.PatientVisitDetails set Notes='#Form[VarName]#' where Progress_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>
</cfif>

<cfif #VarName# Contains 'Vreading_'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />  
<cfquery name="updateperformed" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.PatientVisitDetails set Reading1='#Form[VarName]#' where Progress_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>
</cfif>

<cfif #VarName# Contains 'Assessment-'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />
<cfquery name="updategeneral" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.patient_generalassessment set genaralassessment=trim('#Form[VarName]#') where Generalassessment_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))# 
</cfquery>
</cfif>

<cfif #VarName# Contains 'Generalnotes_' and #VarName# neq 'Generalnotes_'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />
<cfquery name="updategeneralnotes" datasource="#Application.DataSrc#">  
Update #Request.prefix_db_agency#.patient_generalassessment set generalassessmentnotes=trim('#Form[VarName]#') where Generalassessment_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>
</cfif>

<cfif #VarName# Contains 'Labresolved_'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />
<cfquery name="updatelabresolved" datasource="#Application.DataSrc#">  
  UPDATE #Request.prefix_db_agency#.Pathway_Details SET Resolved_Date = '#DateFormat(Now(),"yyyy-mm-dd")#', 
  Record_Mod_Date = '#DateFormat(Now(),"yyyy-mm-dd")#',
  Record_Modified_By = '#session.EmployeeID#'
		WHERE Pathway_Details_Id= #mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>  
</cfif> 

<cfif #VarName# Contains 'Labrdsever_'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />  
<cfquery name="updateperformed" datasource="#Application.DataSrc#">  
Update #Request.prefix_db_agency#.PatientVisitDetails set Severity='#Form[VarName]#' where Progress_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>
</cfif>

<cfif #VarName# Contains 'Labnotes_'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />  
<cfquery name="updateperformed" datasource="#Application.DataSrc#">  
Update #Request.prefix_db_agency#.PatientVisitDetails set Notes='#Form[VarName]#' where Progress_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>
</cfif>

<cfif #VarName# Contains 'Labreading_'>
<cfset IndexOfOccurrence=Find("_", #VarName#) />  
<cfquery name="updateperformed" datasource="#Application.DataSrc#">  
Update #Request.prefix_db_agency#.PatientVisitDetails set Reading1='#Form[VarName]#' where Progress_Details_ID=#mid(VarName,IndexOfOccurrence+1,len(VarName))#
</cfquery>
</cfif>


</CFOUTPUT>
</CFLOOP>

<cfif isdefined('form.sid') and #form.sid# neq ''>
<cfquery name="updatepain" datasource="#Application.DataSrc#">  
Update  IGNORE #Request.prefix_db_agency#.Assessment_New a, #Request.prefix_db_agency#.ScheduleItems s, #Request.prefix_db_agency#.PatientVisitDetails p
set a.MR_420 = p.Severity
where a.Assessment_ID = s.Assessment_ID
and s.Assessment_ID = p.Assessment_ID
and p.ScheduleItems_ID = '#form.sid#'
and p.Description like '%pain%'
and p.Type = 'symptom'
</cfquery>

<cfquery name="updatesurg" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.Assessment_New a, #Request.prefix_db_agency#.ScheduleItems s, #Request.prefix_db_agency#.PatientVisitDetails p
set a.MR_488 = p.Severity
where a.Assessment_ID = s.Assessment_ID
and s.Assessment_ID = p.Assessment_ID
and p.ScheduleItems_ID = '#form.sid#'
and p.Description like '%surgical w%'
and p.Type = 'symptom'
</cfquery>

<cfquery name="updatedysp" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.Assessment_New a, #Request.prefix_db_agency#.ScheduleItems s, #Request.prefix_db_agency#.PatientVisitDetails p
set a.MR_490 = p.Severity
where a.Assessment_ID = s.Assessment_ID
and s.Assessment_ID = p.Assessment_ID
and p.ScheduleItems_ID = '#form.sid#'
and p.Description like '%dyspnea%'
and p.Type = 'symptom'
</cfquery>

<cfquery name="updatemed" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.Assessment_New a, #Request.prefix_db_agency#.ScheduleItems s, #Request.prefix_db_agency#.PatientVisitDetails p
set a.MR_780 = p.Severity
where a.Assessment_ID = s.Assessment_ID
and s.Assessment_ID = p.Assessment_ID
and p.ScheduleItems_ID = '#form.sid#'
and p.Description like '%medication m%'
and p.Type = 'symptom'
</cfquery>

<cfquery name="updatebath" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.Assessment_New a, #Request.prefix_db_agency#.ScheduleItems s, #Request.prefix_db_agency#.PatientVisitDetails p
set a.MR_670 = p.Severity
where a.Assessment_ID = s.Assessment_ID
and s.Assessment_ID = p.Assessment_ID
and p.ScheduleItems_ID = '#form.sid#'
and p.Description like '%bathe%'
and p.Type = 'symptom'
</cfquery>

<cfquery name="updatetransf" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.Assessment_New a, #Request.prefix_db_agency#.ScheduleItems s, #Request.prefix_db_agency#.PatientVisitDetails p
set a.MR_690 = p.Severity
where a.Assessment_ID = s.Assessment_ID
and s.Assessment_ID = p.Assessment_ID
and p.ScheduleItems_ID = '#form.sid#'
and p.Description like '%transfer%'
and p.Type = 'symptom'
</cfquery>

<cfquery name="updatetransf" datasource="#Application.DataSrc#">  
Update IGNORE  #Request.prefix_db_agency#.Assessment_New a, #Request.prefix_db_agency#.ScheduleItems s, #Request.prefix_db_agency#.PatientVisitDetails p
set a.MR_700 = p.Severity
where a.Assessment_ID = s.Assessment_ID
and s.Assessment_ID = p.Assessment_ID
and p.ScheduleItems_ID = '#form.sid#'
and p.Description like '%ambula%'
and p.Type = 'symptom'
</cfquery>
</cfif>



<cfif isdefined('form.list_ProgressID') and form.list_ProgressID neq ''>
	<cfloop list="#form.list_ProgressID#" index="id">
		<cfquery name="getWoundInfo" datasource="#Application.DataSrc#">
			select Visit_Date,Wnd_Type,ScheduleItems_ID,Pathway_Details_Id,Wnd_Stage from #Request.prefix_db_agency#.PatientVisitDetails where Progress_Details_ID='#id#'
		</cfquery>
		<cfset WoundResolve = 'form.WoundResolve_'&id />		
			<cfset 	var_Wnd_Len_1 = "form.lengthmin_"&id />
			<cfset 	var_Wnd_Len_2 = "form.lenghtmax_"&id />
			<cfset 	var_Wnd_Wid_1 = "form.widthmin_"&id />
			<cfset 	var_Wnd_Wid_2 = "form.widthmax_"&id />
			<cfset 	var_Wnd_Dep_1 = "form.depthmin_"&id /> 
			<cfset 	var_Wnd_Dep_2 = "form.depthmax_"&id />
			<cfset 	var_Wnd_Surr_Tiss = "form.WndSurrTiss_"&id /> 
			<cfset 	var_Wnd_Chara = "form.WndChara_"&id /> 
			<cfset 	var_Notes = "form.txtNotes_" &id />
			<cfset VARIABLES.WNDSTAGE = getWoundInfo.Wnd_Stage />
			<cfif isdefined('#var_Wnd_Len_1#')>
				<cfset 	Wnd_Len_1 = #form["lengthmin_" & id]# />
			<cfelse>
				<cfset 	Wnd_Len_1 = 0 />
			</cfif>
			
			<cfif isdefined('#var_Wnd_Len_2#')>
				<cfset 	Wnd_Len_2 =#form["lenghtmax_" & id]# />
			<cfelse>
				<cfset 	Wnd_Len_2 = 0 />
			</cfif>
			
			<cfif isdefined('#var_Wnd_Wid_1#')>
				<cfset 	Wnd_Wid_1 =#form["widthmin_" & id]# />
			<cfelse>
				<cfset 	Wnd_Wid_1 = 0 />
			</cfif>
			
			<cfif isdefined('#var_Wnd_Wid_2#')>
				<cfset 	Wnd_Wid_2 =#form["widthmax_" & id]# />
			<cfelse>
				<cfset 	Wnd_Wid_2 = 0 />
			</cfif>
			
			<cfif isdefined('#var_Wnd_Dep_1#')>
				<cfset 	Wnd_Dep_1 =#form["depthmin_" & id]# />
			<cfelse>
				<cfset 	Wnd_Dep_1 = 0 />
			</cfif>
			
			<cfif isdefined('#var_Wnd_Dep_2#')>
				<cfset 	Wnd_Dep_2 =#form["depthmax_" & id]# />
			<cfelse>
				<cfset 	Wnd_Dep_2 = 0 />
			</cfif>
			
			<cfif isdefined('#var_Wnd_Surr_Tiss#')>
				<cfset 	Wnd_Surr_Tiss =#form["WndSurrTiss_" & id]# />
			<cfelse>
				<cfset 	Wnd_Surr_Tiss ='null' />
			</cfif>
			
			<cfif isdefined('#var_Wnd_Chara#')>
				<cfset 	Wnd_Chara =#form["WndChara_" & id]# /> 
			<cfelse>
				<cfset 	Wnd_Chara ='null' /> 
			</cfif>
			 
			 <cfif isdefined('#var_Notes#')>
				<cfset 	Notes =#form["txtNotes_" & id]# />
			<cfelse>
				<cfset 	Notes ='null' />
			</cfif>	
			<cfif #Wnd_Len_1# neq '0,0,0'>		
			<cfquery name="getInsert" datasource="#Application.DataSrc#">
				Update #Request.prefix_db_agency#.PatientVisitDetails set
				Wnd_Len_1 ='#Wnd_Len_1#', 
				Wnd_Len_2 ='#Wnd_Len_2#', 
				Wnd_Wid_1 ='#Wnd_Wid_1#', 
				Wnd_Wid_2 ='#Wnd_Wid_2#', 
				Wnd_Dep_1 ='#Wnd_Dep_1#', 
				Wnd_Dep_2 ='#Wnd_Dep_2#' ,
				Wnd_Surr_Tiss ='#Wnd_Surr_Tiss#', 
				Wnd_Chara ='#Wnd_Chara#', 
				Notes ='#Notes#'
				where
				Progress_Details_ID = #id#
			</cfquery>	
			</cfif>

			<cfif isdefined('#WoundResolve#')>
				<cfquery name="updateresolved" datasource="#Application.DataSrc#">  
					UPDATE #Request.prefix_db_agency#.Pathway_Details SET Resolved_Date = '#DateFormat(Now(),"yyyy-mm-dd")#', 
					Record_Mod_Date = '#DateFormat(Now(),"yyyy-mm-dd")#'
					WHERE Pathway_Details_Id= '#getWoundInfo.Pathway_Details_Id#'
 				 </cfquery> 
		</cfif>
		
	</cfloop>
</cfif>
<cfif isdefined('form.Intmg_InterHidden') and form.Intmg_InterHidden neq 0>
	<cfloop list="#form.Intmg_InterHidden#" index="id">
		<cfquery name="Intmg_Inter" datasource="#Application.DataSrc#">  
			Update #Request.prefix_db_agency#.PatientVisitDetails set  Notes = '#form["Intmg_Inter" & id]#' where Progress_Details_ID = '#id#'
		</cfquery>
	</cfloop> 
</cfif>
</cfif>
<cfoutput>update Successfully</cfoutput>

