<cfcomponent displayname="Assessments Functions" hint="I Return Assessments Information" output="false">

	<cfset client.Loc_ID = 0 />
	
   <cffunction name="init" displayname="Initialize Component" access="public" returntype="Assessments" hint="I initialize and return the Assessments object.">
		<cfreturn this>
	</cffunction>

	<cffunction name="get_assessments"  returntype="any" access="public" output="false" >
	      <cfargument name="patid" required="yes" default="0"  hint="patient_ID" >
	      <cfargument name="assid" required="no" default="0"  hint="AssessmentId">
	      <cfargument name="Loc_ID" required="no" hint="Loc_ID" default="#client.Loc_ID#"> 
	      <cfset client.Loc_ID = session.agencyid />
			<cfquery name = "getallassessment" datasource="#Application.DataSrc#">
				SELECT * FROM #Request.prefix_db_agency#.pAssessments 
				LEFT OUTER JOIN #Request.prefix_db_agency#.pPatients ON pAssessments.Patient_ID = pPatients.Patient_ID
				 WHERE pPatients.Loc_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#client.Loc_ID#">
				 AND  pAssessments.Patient_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.patid#">
				 <cfif arguments.assid neq 0>
				 AND  pAssessments.Assmt_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.assid#">
				 </cfif>
				 AND pAssessments.status = 0 
				 AND pPatients.status = 0 
			</cfquery>
		<cfreturn  getallassessment>
	</cffunction>


	<cffunction name="get_all_ques_ans"  access="public" output="Yes"  returntype="query">
           <cfargument name="assessment_reason" required="yes" hint="assessment_reason">  
		    <cfargument name="wizard"  default="1" hint="wizard">  
			<cfquery name="get_all_questions" datasource="#Application.DataSrc#">    
			          SELECT * FROM  #Request.prefix_db_lookup#.assessment_questions_lookup as ques
	                JOIN #Request.prefix_db_lookup#.assessment_answers_lookup as answ ON answ.question_id  = ques.ques_id 
	             		WHERE ques.Deleted <> 1   
					  AND answ.Deleted <> 1 
					  AND ques.assessment_reason = <cfqueryparam cfsqltype="cf_sql_varchar" value="#arguments.assessment_reason#">
					   AND  ques.assessment_reason = answ.assessment_reason
					  <cfif arguments.wizard neq 0>
					  	 AND  (ques.wizard =  <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.wizard#"> OR ques.wizard =  <cfqueryparam cfsqltype="cf_sql_integer" value="0">)
					  </cfif>
					   ORDER BY ques.order_id,ques.wizard,answ.srt_id,ques.answer_label  ASC
			</cfquery> 
	   <cfreturn get_all_questions />
      </cffunction>

     <cffunction name="get_assess"  access="public" output="Yes"  returntype="query">
              <cfargument name="patid" required="yes" default="0"  hint="patient_ID" >
	           <cfargument name="assid" required="yes" default="0"  hint="AssessmentId">
	            <cfargument name="Loc_ID" required="no" hint="Loc_ID" default="#client.Loc_ID#">   
			  <cfquery name="getassessment" datasource="#Application.DataSrc#">    
			        SELECT  *  FROM  #Request.prefix_db_agency#.pAssessments
				WHERE Assmt_ID =  <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.assid#">
				AND Patient_ID =    <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.patid#">
			 </cfquery> 
		   <cfreturn getassessment />
      </cffunction>

      <cffunction name="get_all_answers"  access="remote" output="Yes" httpmethod="GET" returnformat="JSON">
			  <cfargument name="assessment_reason" required="yes" hint="assessment_reason"> 
			   <cfargument name="wizard"  default="0" hint="wizard">   
			   <cfif assessment_reason EQ '3 - Resumption of care (after inpatient stay)'>
			   <cfset assessment_reason= '1 - Start of care - further visits planned' />
			   </cfif>
			  <cfquery name="get_label" datasource="#Application.DataSrc#">    
			          SELECT * FROM  #Request.prefix_db_lookup#.assessment_questions_lookup as ques
                      JOIN #Request.prefix_db_lookup#.assessment_answers_lookup as answ ON answ.question_id  = ques.ques_id 
					  WHERE ques.Deleted <> 1  
					  AND  answ.Deleted <> 1  
					  <cfif arguments.wizard neq 0>
					  	AND  (ques.wizard =  <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.wizard#"> OR ques.wizard =  0)
					  </cfif>
					  AND  ques.assessment_reason = <cfqueryparam cfsqltype="cf_sql_varchar" value="#arguments.assessment_reason#"> 
					  AND  ques.assessment_reason = answ.assessment_reason
					  ORDER BY ques.order_id ASC
			 </cfquery> 
			 <cfset label_name = '' >
			 <cfset responsekey=[] />
			 <cfoutput query="get_label" group="answer_label">
				 <cfset obj={"label_name"=#answer_label# ,"answer_type" = #answer_type#,"important" = #important#,"questions" = #questions#, "questions_label" = #questions_label#, "other" = #other#,
				 "alert_message" = #alert_message#,"wizard" = #get_label.wizard#,"question_id" = #question_id#,"ans_id" = #ans_id# }  />
                  <cfset arrayAppend(responsekey, obj) />
			 </cfoutput>
			 <cfset response={"answer_labels"= #responsekey#} />
			 <cfreturn response />
     </cffunction>

   <cffunction name="assessment_insert"   access="remote" returnFormat= "JSON" >
	         <cfargument name="answers" required="yes" hint="Assesments form creation">
			   <cfargument name="assid" required="yes" hint="Assesments form creation">
			   <cfargument name="patid" required="yes" hint="Assesments form creation">
			    <cfargument name="parent_id" required="no" hint="Assesments form creation" default="0">
			   <cfset Record_Creation_Date = "#Now()#" />
			     <cfif arguments.assid  gt 0>
					<cfset data=ArrayNew(1) />
					<cfset datalist=ArrayNew(2) />
					<cfset datalist=ListToArray(answers,"~",false,true) />

					<cfquery  name="get_assessment" datasource="#Application.DataSrc#">
					      SELECT * FROM #Request.prefix_db_agency#.pAssessments
					      WHERE Assmt_ID =  <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.assid#">
					     AND Patient_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.patid#">
					     AND Status = <cfqueryparam cfsqltype="cf_sql_integer" value="0">
					</cfquery>
					<cfloop from="1" to="#ArrayLen(datalist)#" index="i" step="2">
					<cfoutput>
                              <cfquery  name="Update_assessment" datasource="#Application.DataSrc#">
					      UPDATE #Request.prefix_db_agency#.pAssessments  SET
						 <cfif  right(datalist[i],3) gt 175 AND right(datalist[i],3) lt 200 >
						      <cfif isDate(datalist[i+1]) >
							   #datalist[i]#  = <cfqueryparam value="#DateFormat(datalist[i+1],'yyyy-mm-dd')#"  cfsqltype="cf_sql_date">
							<cfelse>
								 #datalist[i]#  =  NULL
							 </cfif>
						  <cfelse>
						  	#datalist[i]#  =
						  	<cfif (#datalist[i]# EQ 'F254'  OR #datalist[i]# EQ 'F256')
								 AND Left(get_assessment.F26,1) EQ '1'>
										<cfqueryparam value="#Evaluate('form.other#datalist[i]#')#" cfsqltype="cf_sql_varchar">
								<cfelse>
										<cfqueryparam value="#datalist[i+1]#" cfsqltype="cf_sql_varchar">
								</cfif>

						  </cfif>
						  ,Record_Mod_Date = <cfqueryparam VALUE="#Record_Creation_Date#"  cfsqltype="cf_sql_timestamp">
						  ,Record_Mod_By =  <cfqueryparam VALUE="#client.emp_id#"  cfsqltype="cf_sql_integer">
					     WHERE Assmt_ID =  <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.assid#">
					     AND Patient_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.patid#">
					</cfquery>
					</cfoutput>
						</cfloop>
						 <cfset url.assid  = encrypt(#arguments.assid#,#application.enckey#,"AES","Hex") />   
				<cfelse>
				      <cfset data=ArrayNew(1) />
						<cfset datalist=ArrayNew(2) />
						<cfset datalist=ListToArray(answers,"~",false,true) />
						 <cfset url.assid  = 0 >
						
					<cfquery  name="getass" datasource="#Application.DataSrc#">
		                 		SELECT IFNULL(Max(Assmt_ID)+1,0) as Assmt_ID  FROM  #Request.prefix_db_agency#.pAssessments
		             	</cfquery>

		                 <cfquery  name="getadmit" datasource="#Application.DataSrc#">
		                       SELECT *  FROM  #Request.prefix_db_agency#.pAdmit 
		                       WHERE Patient_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.patid#">
		                       AND status = <cfqueryparam cfsqltype="cf_sql_integer" value="0">
		                  </cfquery>
		   			<cfquery  name="Insert_assessment" datasource="#Application.DataSrc#"> 
					        INSERT INTO #Request.prefix_db_agency#.pAssessments(
					    		          Assmt_ID,parent_id,<cfloop from="1" to="#ArrayLen(datalist)#" index="i" step="2"> #datalist[i]#, </cfloop>
						    				Patient_ID,Loc_ID,Record_Creation_Date,Record_Created_By, Record_Mod_Date, Record_Mod_By

						   )  
						   VALUES
						         (
								     <cfqueryparam cfsqltype="cf_sql_integer" value="#getass.Assmt_ID#">,
								     <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.parent_id#">,
								    <cfloop from="2" to="#ArrayLen(datalist)#" index="j" step="2">
								        <cfif right(datalist[j-1],3) gt 175  AND right(datalist[j-1],3) lt 200 and  len(datalist[j-1]) EQ 4>
									          <cfqueryparam value="#datalist[j]#"  cfsqltype="cf_sql_date">,
									       <cfelse>
											   <cfqueryparam value="#datalist[j]#"  cfsqltype="cf_sql_varchar">,
										</cfif>
									</cfloop>
									<cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.patid#">,
									<cfqueryparam cfsqltype="cf_sql_integer" value="#client.Loc_ID#">,
									<cfqueryparam VALUE="#Record_Creation_Date#"  cfsqltype="cf_sql_timestamp">,
							        <cfqueryparam VALUE="#client.emp_id#"  cfsqltype="cf_sql_integer">,
							        <cfqueryparam VALUE="#Record_Creation_Date#"  cfsqltype="cf_sql_timestamp">,
							        <cfqueryparam VALUE="#client.emp_id#"  cfsqltype="cf_sql_integer">
						   )
						</cfquery> 
						
						<cfquery datasource="#Application.DataSrc#" name="Last_ass">
					       <cfsetting requesttimeout="5000">
						  SELECT MAX(Assmt_ID) as LastInsertID FROM #Request.prefix_db_agency#.pAssessments
						</cfquery>

						<cfquery  name="Getp" datasource="#Application.DataSrc#">
						      SELECT * FROM #Request.prefix_db_agency#.pPatients
						      JOIN #Request.prefix_db_agency#.pAssessments ON pAssessments.Patient_ID =  pPatients.Patient_ID 
						      WHERE pPatients.Patient_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.patid#">
						      AND pAssessments.Assmt_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#getass.Assmt_ID#">
						      AND pPatients.Status = <cfqueryparam cfsqltype="cf_sql_integer" value="0">
						</cfquery>
						<cfif #Left(Getp.F26,1)# EQ 1 >
							<cfquery  name="Insert_Coding_request" datasource="#Application.DataSrc#">
								INSERT INTO #Request.prefix_db_lookup#.Coding_Request  (Agency_ID,Request_Date,Last_Name,First_Name,Assessment_Type,
								 Assessment_Date,Assigned_to,Coding_status,Assigned_by,Request_Time,MHCB_Entered,
								 time_requested,Updated_by) 
								VALUES ('#session.agencyid#','#DateFormat(now(),"yyyy-mm-dd")#',
									'#GetP.Pt_Last#','#Getp.Pt_First#','#Getp.F26#',
									'#DateFormat(Getp.F176,"yyyy-mm-dd")#','Melissa','H_P_Review',
									'#session.employeeid#',
									'#TimeFormat(now(), "short")#',#now()#,#now()#,'#Session.employeeid#')
							</cfquery>
						</cfif>

						<cfquery  name="Insert_Coding_request" datasource="#Application.DataSrc#">
							INSERT INTO #Request.prefix_db_lookup#.Coding_Request  (Agency_ID,Request_Date,Last_Name,First_Name,Assessment_Type,
							 Assessment_Date,Assigned_to,Coding_status,Assigned_by,Request_Time,MHCB_Entered,
							 time_requested,Updated_by) 
							VALUES ('#session.agencyid#','#DateFormat(now(),"yyyy-mm-dd")#',
								'#GetP.Pt_Last#','#Getp.Pt_First#','#Getp.F26#',
								'#DateFormat(Getp.F176,"yyyy-mm-dd")#','Melissa','Coding',
								'#session.employeeid#',
								'#TimeFormat(now(), "short")#',#now()#,#now()#,'#Session.employeeid#')
						</cfquery>


						<cfset url.assid  = encrypt(#Last_ass.LastInsertID#,#application.enckey#,"AES","Hex") />


				</cfif>

				    <!--- <cfquery  name="get_pat" datasource="#Application.DataSrc#">
                                  SELECT * FROM  #Request.prefix_db_agency#.pPatients
                                   WHERE Patient_ID =  <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.patid#"> 
                              </cfquery>
                              <cfquery  name="update_assessment_table" datasource="#Application.DataSrc#">
                                    UPDATE #Request.prefix_db_agency#.pAssessments  SET
                                     F6 = <cfqueryparam value="#get_pat.Pt_Agy_ID#" cfsqltype="cf_sql_varchar">,
                                     F7 = <cfqueryparam value="#get_pat.Pt_First#" cfsqltype="cf_sql_varchar">,
                                     F8 = <cfqueryparam value="#get_pat.Pt_Middle#" cfsqltype="cf_sql_varchar">,
                                     F9 = <cfqueryparam value="#get_pat.Pt_Last#" cfsqltype="cf_sql_varchar">,
                                     F10 = <cfqueryparam value="#get_pat.Pt_Suffix#" cfsqltype="cf_sql_varchar">,
                                     F11 = <cfqueryparam value="#get_pat.Pt_State#" cfsqltype="cf_sql_varchar">,
                                     F12 = <cfqueryparam value="#get_pat.Pt_Zip#" cfsqltype="cf_sql_varchar">,
                                     F13 = <cfqueryparam value="#get_pat.Pt_SSN#" cfsqltype="cf_sql_varchar">,
                                     F19 = <cfqueryparam value="#get_pat.Pt_Gender#" cfsqltype="cf_sql_varchar">,
                                     F20    = <cfqueryparam value="#get_pat.Pt_DOB#" cfsqltype="cf_sql_date">,
                                     Record_Mod_Date = <cfqueryparam VALUE="#Record_Creation_Date#"  cfsqltype="cf_sql_date">,
                                     Record_Mod_By =  <cfqueryparam VALUE="#client.emp_id#"  cfsqltype="cf_sql_integer">
                                     WHERE Assmt_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#assid#">
                              </cfquery> --->
				 <cfset redirect_url = url.assid />
			      <cfset response_key={"statusCode"= 200,"statusText"= 'success',"data"= '#url.assid#' } />
			<cfreturn  response_key >
   </cffunction>

   <cffunction name="startcare_insert"   access="remote" returnFormat= "JSON" >
      <cfargument name="answers" required="yes" hint="Assesments form creation">
      <cfargument name="questions_ids" required="no" hint="Assesments form creation" default="">
		<cfargument name="assid" required="yes" hint="Assessment id form creation">
		<cfargument name="patid" required="yes" hint="Patient id form creation">
	   <cfargument name="wizard" required="no" hint="wizard form creation">
	   <cfargument name="total_wizard" required="no" hint="Assesments form creation">
	   <cfargument name="QA_insertion" required="no" hint="QA insertion" default="0">
		<cfset Record_Creation_Date = "#Dateformat(Now(),'yyyy-mm-dd')#" />
		<cfset data=ArrayNew(1) />
		<cfset datalist=ArrayNew(2) />
		<cfset datalist=ListToArray(answers,"~",false,true) />

      <cfquery  name="Update_assessment" datasource="#Application.DataSrc#">
	   	UPDATE #Request.prefix_db_agency#.pAssessments  SET
	      <cfloop from="1" to="#ArrayLen(datalist)#" index="i" step="2">
			<cfif  right(datalist[i],3) gt 175  AND right(datalist[i],3) lt 200 AND  len(datalist[i]) EQ 4>
				<cfif isDate(datalist[i+1]) >
				   #datalist[i]#  = <cfqueryparam value="#DateFormat(datalist[i+1],'yyyy-mm-dd')#"  cfsqltype="cf_sql_date">,
				<cfelse>
					 #datalist[i]#  =  NULL,
				 </cfif>
			<cfelse>
			     <cfif #datalist[i+1]# NEQ '' and #datalist[i+1]# NEQ '$'>
			     	#datalist[i]#  = <cfqueryparam value="#datalist[i+1]#" cfsqltype="cf_sql_varchar">,
			     	<cfelse>
			     	   #datalist[i]#  =  NULL,
			     	</cfif>
			</cfif>
		</cfloop>
		  <cfif total_wizard EQ wizard>
		  		F25 =  <cfqueryparam VALUE="1"  cfsqltype="cf_sql_integer">,
		  		F263  = <cfif arguments.QA_insertion EQ 1><cfqueryparam value="QA pending" cfsqltype="cf_sql_varchar">
		  	 	<cfelse><cfqueryparam value="pending QA submission" cfsqltype="cf_sql_varchar"> </cfif>,
		  </cfif>
		  Record_Mod_Date = <cfqueryparam VALUE="#Record_Creation_Date#"  cfsqltype="cf_sql_date">
		  ,Record_Mod_By =  <cfqueryparam VALUE="#client.emp_id#"  cfsqltype="cf_sql_integer">
	      WHERE Assmt_ID =  <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.assid#">
	      AND Patient_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.patid#">
	</cfquery>

	<cfquery  name="getass" datasource="#Application.DataSrc#">
           SELECT * FROM #Request.prefix_db_agency#.pAssessments
           WHERE Assmt_ID = <cfqueryparam value = "#arguments.assid#" CFSQLType ="cf_sql_integer">
           AND status = <cfqueryparam value="0" cfsqltype="cf_sql_integer">
   </cfquery>


      <!--- Start UPDATE OASIS based on Assmt_Update table--->
      <cfset assid = #arguments.assid# />
   	<cfset patid = #arguments.patid# />
   	<cfset assessment_reason = #getass.F26# />
   	<!--- <cfif FindNoCase("PT",assessment_reason) EQ 1 OR FindNoCase("OT",assessment_reason) EQ 1>
   		<cfinclude template ="/patientadmin_new/patient/Assmt_Therapy_Update.cfm" />
   	</cfif> --->

	 <cfquery  name="getSOCS" datasource="#Application.DataSrc#">
       SELECT * FROM #Request.prefix_db_agency#.pAssessments
       WHERE Admit_ID = <cfqueryparam value = "#getass.Admit_ID#" CFSQLType ="cf_sql_integer">
       AND (F26 = <cfqueryparam value = "1 - Start of care - further visits planned" CFSQLType ="cf_sql_varchar">)
       AND status = <cfqueryparam value="0" cfsqltype="cf_sql_integer">
	</cfquery>
	<cfset runproblems = 0 />
	<cfif getSOCS.recordcount gt 0 >
		<cfif FindNoCase("PT",assessment_reason) EQ 1 OR FindNoCase("OT",assessment_reason) EQ 1>
			<cfset runproblems = 1 />
		</cfif>
	</cfif>

   	<cfif total_wizard EQ wizard AND (arguments.QA_insertion EQ 1  OR FindNoCase("PT",assessment_reason) EQ 1 OR FindNoCase("OT",assessment_reason) EQ 1) AND   getSOCS.recordcount gt 0>
   		<cfinclude template ="/patientadmin_new/patient/QA_allsteps.cfm" />
     </cfif>
      <!--- END OASIS based on Assmt_Update table--->

	<cfset Assmt_ID = #arguments.assid# />
	<cfset Patient_ID = #arguments.patid# />
    <cfset questions_ids = arguments.questions_ids />

     

	
    <cfif arguments.QA_insertion EQ 1>
   	<cfquery  name="getassess" datasource="#Application.DataSrc#">
	     SELECT  *  FROM  #Request.prefix_db_agency#.pAssessments
	    WHERE Assmt_ID =  <cfqueryparam cfsqltype="cf_sql_integer" value="#Assmt_ID#">
	    AND Patient_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#Patient_ID#">
	    AND status = 0
	</cfquery>

	<cfquery  name="getquestions" datasource="#Application.DataSrc#">
		SELECT * FROM assessment_questions_lookup WHERE assessment_reason like '#getassess.F26#'
		AND Deleted = 0
	</cfquery>	
	<cfset questions_ids ="" />
	<cfloop query ="getquestions">
		<cfset answers = '$' />
		<cfif answer_label NEQ ''>
			<cfset answers = #getassess[getquestions.answer_label]# />
		</cfif>
		<cfset questions_ids =  questions_ids & #getquestions.ques_id# & ' ~ ' & #answers# & ' ~ '/>
	</cfloop>
   	 <!---<cfinclude template ="/patientadmin_new/patient/QA_insertion.cfm" /> 
   	<cfinclude template ="/patientadmin_new/patient/OASIS_QA_New.cfm" />--->
     <cfelse>
     	<!---<cfquery  name="getquestions" datasource="#Application.DataSrc#">
		 DELETE FROM #Request.prefix_db_agency#.pOASIS_QA 
		 WHERE Assmt_ID =  <cfqueryparam cfsqltype="cf_sql_integer" value="#Assmt_ID#">
		</cfquery>	 --->
     		
     </cfif> 
      <!--- Start HIPPS code generation  --->
	     <cfif total_wizard EQ wizard>
	     		<!--- Start Insertion of Diagnosis pProblem---> 
	     			
			       <cfquery  name="getass" datasource="#Application.DataSrc#">
				       SELECT * FROM #Request.prefix_db_agency#.pAssessments
				       WHERE Assmt_ID = <cfqueryparam value = "#arguments.assid#" CFSQLType ="cf_sql_integer">
				       AND status = <cfqueryparam value="0" cfsqltype="cf_sql_integer">
			    	</cfquery> 
			    	<cfif  FindNoCase("1",assessment_reason) EQ 1 OR FindNoCase("PT",assessment_reason) EQ 1 OR FindNoCase("OT",assessment_reason) EQ 1>
   						<cfinclude template ="/patientadmin_new/patient/Assmt_Therapy_Update1.cfm" />
   				</cfif>
   					


			    	<cfif LEFT(getass.F26,1) EQ  '1' OR  LEFT(getass.F26,1) EQ  '3'  OR LEFT(getass.F26,1) EQ  '4'>
	     				<cfinclude template="/patientadmin_new/patient/symp_insertion.cfm" /> 
	     				<cfinclude template="/patientadmin_new/patient/woundvitalinsert.cfm" /> 
	     				
	     			</cfif>	
	     			<cfif LEFT(getass.F26,1) EQ  '9'>
	     				<cfinclude template="/patientadmin_new/patient/discharge_woundinsert.cfm" /> 	     				
	     			</cfif>	

	     			<cfinclude template="/patientadmin_new/patient/autovital_insert.cfm" />
			      <cfinclude template ="/patientadmin_new/patient/QA_diagnosis.cfm" /> 


			 	<!--- End Insertion of Diagnosis --->

		     		 <cfquery  name="getassess" datasource="#Application.DataSrc#">
				     SELECT  *  FROM  #Request.prefix_db_agency#.pAssessments
				    WHERE Assmt_ID =  <cfqueryparam cfsqltype="cf_sql_integer" value="#Assmt_ID#">
				    AND Patient_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#Patient_ID#">
				</cfquery>


				<cfif assessment_reason EQ 'PT Adult Evaluation' OR assessment_reason EQ 'OT Adult Evaluation'  >
								<cfquery  name="getass" datasource="#Application.DataSrc#">
						       SELECT * FROM #Request.prefix_db_agency#.pAssessments
						       WHERE Assmt_ID = <cfqueryparam value = "#arguments.assid#" CFSQLType ="cf_sql_integer">
						       AND status = <cfqueryparam value="0" cfsqltype="cf_sql_integer">
						    </cfquery>
				 				<cfinclude template = "/patientadmin_new/patient/OASIS_rules.cfm">
				</cfif>


				<cfif Left(getassess.F26,1) EQ '1' OR Left(getassess.F26,1) EQ '3'  OR Left(getassess.F26,1) EQ '4'>  
					<cfinclude template ="/patientadmin_new/patient/Generatehipps.cfm" />
				</cfif>

		</cfif>
	<!--- END  HIPPS code  --->

      <cfif wizard eq 1>
            <!--- <cfquery  name="get_ass" datasource="#Application.DataSrc#">
                SELECT * FROM  #Request.prefix_db_agency#.pAssessments
                 WHERE Assmt_ID =  <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.assid#"> 
            </cfquery>
            <cfquery  name="update_patients_table" datasource="#Application.DataSrc#">
                  UPDATE #Request.prefix_db_agency#.pPatients  SET
                   Pt_Agy_ID = <cfqueryparam value="#get_ass.F6#" cfsqltype="cf_sql_varchar">,
                   Pt_First  = <cfqueryparam value="#get_ass.F7#" cfsqltype="cf_sql_varchar">,
                   Pt_Middle = <cfqueryparam value="#get_ass.F8#" cfsqltype="cf_sql_varchar">,
                   Pt_Last   = <cfqueryparam value="#get_ass.F9#" cfsqltype="cf_sql_varchar">,
                   Pt_Suffix = <cfqueryparam value="#get_ass.F10#" cfsqltype="cf_sql_varchar">,
                   Pt_State  = <cfqueryparam value="#get_ass.F11#" cfsqltype="cf_sql_varchar">,
                   Pt_Zip    = <cfqueryparam value="#get_ass.F12#" cfsqltype="cf_sql_varchar">,
                   Pt_SSN    = <cfqueryparam value="#get_ass.F13#" cfsqltype="cf_sql_varchar">,
                   Pt_Gender = <cfqueryparam value="#get_ass.F19#" cfsqltype="cf_sql_varchar">,
                   Pt_DOB    = <cfqueryparam value="#get_ass.F20#" cfsqltype="cf_sql_date">,
                   Record_Mod_Date = <cfqueryparam VALUE="#Record_Creation_Date#"  cfsqltype="cf_sql_date">,
                   Record_Mod_By =  <cfqueryparam VALUE="#client.emp_id#"  cfsqltype="cf_sql_integer">
                   WHERE Patient_ID = <cfqueryparam cfsqltype="cf_sql_integer" value="#arguments.patid#">
            </cfquery> --->
      </cfif>
	<cfset url.assid  = encrypt(#arguments.assid#,#application.enckey#,"AES","Hex") />   
	 <cfset redirect_url = url.assid />
      <cfset response_key={"statusCode"= 200,"statusText"= 'success',"data"= '#url.assid#' } />
	<cfreturn  response_key >
   </cffunction>

   <cffunction name="insert_diagnosis"  access="remote" output="Yes"  returnformat="plain" returntype="string">   
		<cfargument name="Assmt_ID" required="yes" default="0">
		<cfargument name="Skill" required="yes" default="0">
		<cfargument name="Type" required="yes" default="0">
		<cfargument name="DiagnosisID" required="yes" default="0">
		<cfargument name="M0230Primary" required="yes" default="0">
		<cfargument name="M0230Secondary" required="yes" default="0">
		<cfargument name="M0230Severity" required="no" default="0">
		<cfargument name="M0230Onset" required="no" default="0">
		<cfargument name="Coding_Status" required="no" default="">
		<cfargument name="Notes" required="no" default="">
		<cfargument name="careplan" required="no" default="1">

		<cfset AutoProblem_IDs = "" />
	    <cfif arguments.Assmt_ID  neq 0 AND  arguments.DiagnosisID  neq 0 >
      	 <cfquery  name="getprobs" datasource="#Application.DataSrc#">
				SELECT pProblem.*,IFNULL(MAX(pProblem.dx_order),0)+1 AS dxordernumber FROM #Request.prefix_db_agency#.pProblem 
				WHERE pProblem.Assmt_ID = <cfqueryparam value="#arguments.Assmt_ID#"  cfsqltype="CF_SQL_INTEGER">
				<!--- AND pProblem.Skill = <cfqueryparam value="#arguments.Skill#"  cfsqltype="cf_sql_varchar"> --->
				AND pProblem.status = <cfqueryparam value="0"  cfsqltype="cf_sql_varchar">
				AND (M0_No like 'M1021%' OR M0_No like 'M1023%')
				ORDER BY RIGHT(M0_No, 1) ASC
			</cfquery>

			<cfset ordernumbers = 1 />
			<cfset dxorder = 1 />
			<cfif getprobs.recordcount gt 0>
				<cfset lastrow = QueryGetRow(getprobs, getprobs.recordcount) />
				<cfset ordernumber = ListToArray(lastrow.M0_No,'~')>
				<cfif arrayIsDefined(ordernumber, 2) >
				 	<cfset ordernumbers = #IncrementValue(ordernumber[2])# />	
				</cfif>
				<cfset dxorder = #getprobs.dxordernumber# />
			</cfif>


	       <cfif arguments.M0230Primary eq 1 >
	       		<cfset M0_No = 'M1021' />
	       <cfelse>
	           	<cfset var.Unique = 0 />
	         	<cfloop list="a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z" index="item">
				   <cfset M0_No = 'M1023'& item />
					<cfquery name="ChkNum" dbtype="query">
							SELECT * FROM getprobs WHERE  M0_No like <cfqueryparam value="#M0_No#%"  cfsqltype="cf_sql_varchar">
						</cfquery>
						<cfif ChkNum.recordcount EQ 0>
							 <cfbreak>
						</cfif>
				</cfloop>
	       </cfif>
	       <cfset M0_No = M0_No &'~'&ordernumbers />
			<cfquery name="getdiag" datasource="#Application.DataSrc#">
				SELECT vt.id  as id,vt.Diagnosis,vt.ICD as ICD,'ICD' as Code_Type,cw.Default as Pathway_Type,IFNULL(vt.Pathway,0) AS Pathwaysid,vt.Diagnosis_Short as Short_Diagnosis, vt.Comorbid as Other_DG,vt.PDGM,vt.Comorbid
               		 FROM  #Request.prefix_db_lookup#.vetted_190924 as vt 
				JOIN #Request.prefix_db_lookup#.CW_Coding_Class_PDGM  as cw ON  vt.Priority = cw.Priority
				WHERE  vt.ID = <cfqueryparam value="#arguments.DiagnosisID#" cfsqltype="CF_SQL_INTEGER">
			</cfquery>
			<cfset dig_description = #getdiag.Diagnosis# />
			<cfset pathway_id = #getdiag.Pathwaysid# />
			<cfquery  name="getprob" datasource="#Application.DataSrc#">
				SELECT pProblem.* FROM #Request.prefix_db_agency#.pProblem 
				WHERE pProblem.Assmt_ID = <cfqueryparam value="#arguments.Assmt_ID#"  cfsqltype="CF_SQL_INTEGER">
				<!--- AND pProblem.Skill = <cfqueryparam value="#arguments.Skill#"  cfsqltype="cf_sql_varchar"> --->
				AND pProblem.Description = <cfqueryparam value="#dig_description#"  cfsqltype="cf_sql_varchar">
			</cfquery>

			<cfquery  name="Updateproblems" datasource="#Application.DataSrc#">
				UPDATE #Request.prefix_db_agency#.pProblem 
				SET status = <cfqueryparam value="2"  cfsqltype="CF_SQL_INTEGER">,
				Change_by =  <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">,
				Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">
				WHERE Assmt_ID = <cfqueryparam value="#arguments.Assmt_ID#"  cfsqltype="CF_SQL_INTEGER">
				AND M0_No =  <cfqueryparam value="OASIS"  cfsqltype="cf_sql_varchar">
				AND Path_ID = <cfqueryparam value="#pathway_id#"  cfsqltype="CF_SQL_INTEGER"> 
				AND Status != 2 
			</cfquery>

			<cfset Careplan = 0 >
			<cfif LEFT(arguments.M0230Severity,1)  NEQ '0'>
				<cfset Careplan = 1 >
			</cfif>
			<cfif Left(getdiag.ICD,1) EQ 'Z'>
				<cfset  Careplan = 0 />
			</cfif>

			<cfif getprob.recordcount gt 0>
				<cfquery name="getstatus" dbtype="query">
						 SELECT * FROM getprob WHERE Status = <cfqueryparam value="0"  cfsqltype="cf_sql_varchar">
			    </cfquery>
			    <cfif getstatus.recordcount gt 0>
					<cfset insert_action="M0230DUP" />	
				<cfelse>
					<cfset pProblem_ID =  #getprob.Problem_ID# />
					<cfset AutoProblem_ID = #getprob.AutoProblem_ID# />
					<cfquery  name="pProblem_insert" datasource="#Application.DataSrc#">
						INSERT INTO #Request.prefix_db_agency#.pProblem
						  (
							 Problem_ID, Assmt_ID, Status, Path_ID,Skill, M0_No, Description, Answer, Severity, dx_order,Coding_Status,Careplan,Notes, Date_Create, Created_by, Date_Change, Change_by
						  ) 
						  VALUES
						  (							
							<cfqueryparam value = "#pProblem_ID#" CFSQLType ="CF_SQL_INTEGER">,
							<cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="CF_SQL_INTEGER">,
							<cfqueryparam value = "0" CFSQLType ="CF_SQL_INTEGER">,
							<cfqueryparam value = "#pathway_id#" CFSQLType ="CF_SQL_INTEGER">,
							<cfqueryparam value="#arguments.Skill#"  cfsqltype="cf_sql_varchar">,
							<cfqueryparam value="#M0_No#"  cfsqltype="cf_sql_varchar">,
							<cfqueryparam value="#dig_description#"  cfsqltype="cf_sql_varchar">,
							<cfqueryparam value="#arguments.M0230Severity#"  cfsqltype="cf_sql_varchar">,
							<cfqueryparam value="#Left(arguments.M0230Severity,1)#"  cfsqltype="cf_sql_varchar">,
							<cfqueryparam value="#dxorder#"  cfsqltype="CF_SQL_INTEGER">,
							<cfqueryparam value="#arguments.Coding_Status#"  cfsqltype="cf_sql_varchar">,
							<cfqueryparam value = "#Careplan#" CFSQLType ="CF_SQL_INTEGER">,
							<cfqueryparam value="#arguments.Notes#"  cfsqltype="cf_sql_varchar">,
							<cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
							<cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">,
							<cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
							<cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">
						  )
					 </cfquery>
					<cfset insert_action= "M0230Added" />
				</cfif>
			<cfelse>
				<cfquery  name="getpro" datasource="#Application.DataSrc#">
					SELECT IFNULL(MAX(Problem_ID),0)+1 As pProblem_ID FROM #Request.prefix_db_agency#.pProblem 
				</cfquery>
				<cfset pProblem_ID =  #getpro.pProblem_ID# />
			      <cfquery  name="pProblem_insert" datasource="#Application.DataSrc#">
							INSERT INTO #Request.prefix_db_agency#.pProblem
							(
								 Problem_ID, Assmt_ID, Status, Path_ID,Skill, M0_No, Description, Answer, Severity,dx_order,Coding_Status, Careplan, Notes, Date_Create, Created_by, Date_Change, Change_by
							) 
							VALUES
							(							
								<cfqueryparam value = "#pProblem_ID#" CFSQLType ="CF_SQL_INTEGER">,
								<cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="CF_SQL_INTEGER">,
								<cfqueryparam value = "0" CFSQLType ="CF_SQL_INTEGER">,
								<cfqueryparam value = "#pathway_id#" CFSQLType ="CF_SQL_INTEGER">,
								<cfqueryparam value="#arguments.Skill#"  cfsqltype="cf_sql_varchar">,
								<cfqueryparam value="#M0_No#"  cfsqltype="cf_sql_varchar">,
								<cfqueryparam value="#dig_description#"  cfsqltype="cf_sql_varchar">,
								<cfqueryparam value="#arguments.M0230Severity#"  cfsqltype="cf_sql_varchar">,
								<cfqueryparam value="#Left(arguments.M0230Severity,1)#"  cfsqltype="cf_sql_varchar">,
								<cfqueryparam value="#dxorder#"  cfsqltype="CF_SQL_INTEGER">,
								<cfqueryparam value="#arguments.Coding_Status#"  cfsqltype="cf_sql_varchar">,
								<cfqueryparam value = "#Careplan#" CFSQLType ="CF_SQL_INTEGER">,
								<cfqueryparam value="#arguments.Notes#"  cfsqltype="cf_sql_varchar">,
								<cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
								<cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">,
								<cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
								<cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">
							)
					</cfquery>
					<cfset insert_action= "M0230Added" />
			</cfif>
		<cfelse>
			<cfset insert_action="M0230NOTAdded" />		
		</cfif>
		<cfif insert_action EQ 'M0230Added'>
			<cfquery  name="getprob" datasource="#Application.DataSrc#">
				SELECT pProblem.* FROM #Request.prefix_db_agency#.pProblem 
				WHERE pProblem.Assmt_ID = <cfqueryparam value="#arguments.Assmt_ID#"  cfsqltype="CF_SQL_INTEGER">
				AND Skill = <cfqueryparam value="#arguments.Skill#"  cfsqltype="cf_sql_varchar">
				AND Status = <cfqueryparam value="0"  cfsqltype="cf_sql_varchar">
				ORDER BY RIGHT(M0_No, 1) ASC
			</cfquery>
			<cfset insert_action = ValueList(getprob.Path_ID,"~") />
		</cfif>
		<cfreturn insert_action />						
	</cffunction>


	<cffunction name="delete_diagnosis"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		 <cfargument name="Assmt_ID" required="yes" default="0">
		 <cfargument name="AutoProblem_ID" required="yes" default="0">
		 <cfargument name="Skill" required="no" default="0">
		 <cfargument name="status" required="no" default="1">
		
		<cfif arguments.Assmt_ID neq 0 >
			<cfquery  name="updatepProblem" datasource="#Application.DataSrc#">
			    UPDATE #Request.prefix_db_agency#.pProblem
			    	SET status 		= <cfqueryparam value = "#arguments.status#" CFSQLType ="CF_SQL_INTEGER">,
					Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
					Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
					WHERE Assmt_ID =  <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="CF_SQL_INTEGER">
				 	AND AutoProblem_ID IN  (<cfqueryparam CFSQLType="CF_SQL_INTEGER" 
	                              value="#arguments.AutoProblem_ID#" 
	                              list="yes" >) 
			</cfquery>
		</cfif>
		<cfquery  name="getprob" datasource="#Application.DataSrc#">
				SELECT pProblem.* FROM #Request.prefix_db_agency#.pProblem 
				WHERE pProblem.Assmt_ID = <cfqueryparam value="#arguments.Assmt_ID#"  cfsqltype="CF_SQL_INTEGER">
				AND Skill = <cfqueryparam value="#arguments.Skill#"  cfsqltype="cf_sql_varchar">
				AND Status = <cfqueryparam value="0"  cfsqltype="cf_sql_varchar">
				ORDER BY RIGHT(M0_No, 1) ASC
		</cfquery>
		<cfset insert_action = ValueList(getprob.Path_ID,"~") />
		<cfif getprob.recordcount gt 0>
        <cfreturn insert_action />
        <cfelse>
        <cfreturn '0' />
        </cfif>
	</cffunction>	


	<cffunction name="update_diagnosis"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		 <cfargument name="AutoProblem_ID" required="yes" default="0">
		 <cfargument name="Answer" required="yes" default="0">
		 <cfargument name="Dx_Order" required="yes" default="0">
		 <cfargument name="Skill" required="no" default="SN">
		 <cfargument name="Careplan" required="no" default="0">
		 <cfargument name="Coding_Status" required="no" default="">
		
		<cfquery  name="getproblem" datasource="#Application.DataSrc#">
			SELECT pProblem.* FROM #Request.prefix_db_agency#.pProblem 
			WHERE pProblem.AutoProblem_ID = <cfqueryparam value="#arguments.AutoProblem_ID#"  cfsqltype="CF_SQL_INTEGER">
		</cfquery>


		<cfif getproblem.recordcount gt 0>
			<cfset ordernumber = ListToArray(getproblem.M0_No,'~')>
			<cfif arrayIsDefined(ordernumber, 1)>
				<cfset M0_No = #ordernumber[1]# />
			<cfelse>
				<cfset M0_No = #getproblem.M0_No# />
			</cfif>	
			<cfset M0_No = M0_No & '~' & arguments.Dx_Order />		
			<cfquery  name="updatepProblem" datasource="#Application.DataSrc#">
			    UPDATE #Request.prefix_db_agency#.pProblem
			    	SET status = <cfqueryparam value="3"  cfsqltype="CF_SQL_INTEGER">,
			 	Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
				Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
				WHERE Problem_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"   value="#getproblem.Problem_ID#"  >
			</cfquery>

			<cfquery  name="getzdiag" datasource="#Application.DataSrc#">
				SELECT * FROM #Request.prefix_db_lookup#.vetted_190924 
				WHERE Diagnosis = <cfqueryparam value="#getproblem.Description#"  cfsqltype="CF_SQL_VARCHAR">
			</cfquery>
			<cfif Left(getzdiag.ICD,1) EQ 'Z'>
				<cfset  arguments.Careplan = 0 />
			</cfif>

		   	<cfquery  name="pProblem_insert" datasource="#Application.DataSrc#">
				INSERT INTO #Request.prefix_db_agency#.pProblem
				(
					  Problem_ID, Assmt_ID, Status, Careplan, Path_ID, Skill, ques_id, M0_No, Description, Answer, Severity, dx_order, Coding_Status, Specific_Orders, Resolved_Date,<cfif arguments.Skill EQ 'other'>Assign,</cfif> Notes, Date_Create, Created_by, Date_Change, Change_by
				) 

				 SELECT  Problem_ID, Assmt_ID, 0 , '#arguments.Careplan#', Path_ID, '#arguments.Skill#', ques_id, '#M0_No#', Description, '#arguments.Answer#', '#Left(arguments.Answer,1)#', '#arguments.Dx_Order#', <cfif arguments.Coding_Status NEQ '' > "#arguments.Coding_Status#" 
				 <cfelse>Coding_Status </cfif>, Specific_Orders, Resolved_Date, <cfif arguments.Skill EQ 'other'>Assign ,</cfif> Notes,#now()# , #session.employeeid#  , #now()#, #session.employeeid#  
				 FROM #Request.prefix_db_agency#.pProblem
				  WHERE AutoProblem_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.AutoProblem_ID#">

			</cfquery>
			<cfquery datasource="#Application.DataSrc#" name="Lastinsert">
				SELECT MAX(AutoProblem_ID) as LastInsertID FROM #Request.prefix_db_agency#.pProblem
			</cfquery>
			<cfset autprob_id = #Lastinsert.LastInsertID# />
			<cfreturn autprob_id />
	      <cfelse>
	        	<cfreturn 'Failure' />
	      </cfif>
	</cffunction>	

	<cffunction name="update_assignee"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		 <cfargument name="AutoProblem_ID" required="yes" default="0">
		 <cfargument name="Assign" required="yes" default="0">
		 <cfargument name="Notes" required="no" default="">

		 	<cfquery  name="getproblem" datasource="#Application.DataSrc#">
				SELECT pProblem.* FROM #Request.prefix_db_agency#.pProblem 
				WHERE pProblem.AutoProblem_ID = <cfqueryparam value="#arguments.AutoProblem_ID#"  cfsqltype="CF_SQL_INTEGER">
			</cfquery>
			<cfquery  name="updatepProblem" datasource="#Application.DataSrc#">
			    UPDATE #Request.prefix_db_agency#.pProblem
			    	SET status = <cfqueryparam value="3"  cfsqltype="CF_SQL_INTEGER">,
				Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
				Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
				WHERE AutoProblem_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.AutoProblem_ID#">
			</cfquery>
			
			<cfquery  name="pProblem_insert" datasource="#Application.DataSrc#">
				INSERT INTO #Request.prefix_db_agency#.pProblem
				(
					  Problem_ID, Assmt_ID, Status, Careplan, Path_ID, Skill, ques_id, M0_No, Description, Answer, Severity, dx_order, Coding_Status, Specific_Orders, <cfif getproblem.Resolved_Date NEQ ''> Resolved_Date, </cfif> Assign, Notes, Date_Create, Created_by, Date_Change, Change_by
				) 
				 SELECT  Problem_ID, Assmt_ID, 0 , Careplan, Path_ID, Skill, ques_id, M0_No, Description, Answer, Severity, dx_order, Coding_Status, Specific_Orders, <cfif getproblem.Resolved_Date NEQ ''> Resolved_Date, </cfif> '#arguments.Assign#' , '#arguments.Notes# ',#now()# , #session.employeeid#  , #now()#, #session.employeeid#  
				 FROM #Request.prefix_db_agency#.pProblem
				  WHERE AutoProblem_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.AutoProblem_ID#">
			</cfquery>			
			<cfreturn 'Success' />
	      
	</cffunction>	




	<cffunction name="show_Diagnosis_edit"  access="remote" output="Yes" returnFormat= "plain">   
		<cfargument name="AgencyID" required="no" hint="AgencyID" default="#session.agencyid#"> 	
		<cfargument name="AutoProblem_ID" required="yes">
		<cfargument name="Assmt_ID" required="yes">
		<cfargument name="diagnosis" required="no" default= '1'>

			<cfif arguments.AutoProblem_ID  neq 0>
				<cfquery name="Diagnosis_list" datasource="#Application.DataSrc#">
					SELECT * FROM #Request.prefix_db_agency#.pProblem 
					WHERE AutoProblem_ID = <cfqueryparam value = "#arguments.AutoProblem_ID#" CFSQLType ="CF_SQL_INTEGER">	
					AND Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="CF_SQL_INTEGER">	
				</cfquery>					
				<cfsavecontent	variable = "html_diagnosis_list"> 			
					<cfoutput>
						<form name="EditDiagnosis_form" id="EditDiagnosis_form_id" action="" method="post">						
							<input type="hidden" name="AutoProblem_ID#arguments.Assmt_ID#" id="AutoProblem_ID#arguments.Assmt_ID#"  value="#arguments.AutoProblem_ID#"/>			
							<input type="hidden" name="Assmt_ID" id="Assmt_ID"  value="#arguments.Assmt_ID#"/>						
							
								<div class="row">
									<div class="col-md-3">
										<div class="form-group">
											<div class="label-stable">
												<label>Actively managing this condition?</label>
											</div>
										</div>
									</div>
									<div class="col-md-9">
										<div class="form-group">
										  <cfif arguments.diagnosis EQ 1>
												<div class="radio-list">
													<label style="display:unset;"><input type="radio" id="Assign1" name="Assign" <cfif Diagnosis_list.Assign eq 'referring physician'> checked </cfif> value="referring physician"> referring physician</label>
													<label style="display:unset;"><input type="radio" id="Assign2" name="Assign" <cfif Diagnosis_list.Assign eq 'certifying physician'> checked </cfif> value="certifying physician"> certifying physician</label>
													<label style="display:unset;"><input type="radio" id="Assign3" name="Assign" <cfif Diagnosis_list.Assign eq 'other'> checked </cfif> value="other"> other > please note below</label>
												</div>
											<cfelse>
														<div class="radio-list">
													<label style="display:unset;"><input type="radio" id="Assign1" name="Assign" <cfif Diagnosis_list.Assign eq 'assisted living'> checked </cfif> value="assisted living"> assisted living</label>
													<label style="display:unset;"><input type="radio" id="Assign2" name="Assign" <cfif Diagnosis_list.Assign eq 'other paid caregiver'> checked </cfif> value="other paid caregiver"> other paid caregiver</label>
													<label style="display:unset;"><input type="radio" id="Assign3" name="Assign" <cfif Diagnosis_list.Assign eq 'emergency contact'> checked </cfif> value="emergency contact"> emergency contact</label>
													<label style="display:unset;"><input type="radio" id="Assign4" name="Assign" <cfif Diagnosis_list.Assign eq 'other contact'> checked </cfif> value="other contact"> other contact</label>
													<label style="display:unset;"><input type="radio" id="Assign5" name="Assign" <cfif Diagnosis_list.Assign eq 'other'> checked </cfif> value="other"> other > please note below</label>
												</div>
											</cfif>
										</div>
									</div>			
								</div>	
								<div class="row">
								<div class="col-md-3">							
									<div class="form-group">
										<label class="control-label" style="text-align:center;margin-top: 13px;">Notes:</label>			
									</div>	
								</div>
								<div class="col-md-9">
									<div class="form-group">
										<textarea name="Notes" id="Notes#arguments.Assmt_ID#" type="text" value="" style="width: 100%;" class="form-control">#Diagnosis_list.Notes#</textarea>										
									</div>						
								</div>				
							</div>					
						</form>		
					</cfoutput>	
				</cfsavecontent>	
				<cfreturn html_diagnosis_list />	
			</cfif>	
	</cffunction>


	<cffunction name="show_Discontinue_edit"  access="remote" output="Yes" returnFormat= "plain">   
		<cfargument name="AgencyID" required="no" hint="AgencyID" default="#session.agencyid#"> 	
		<cfargument name="AutoCareplan_ID" required="yes">

			<cfif arguments.AutoCareplan_ID  neq 0>
				<cfquery name="pCareplan_list" datasource="#Application.DataSrc#">
					SELECT * FROM #Request.prefix_db_agency#.pCareplan 
					WHERE AutoCareplan_ID = <cfqueryparam value = "#arguments.AutoCareplan_ID#" CFSQLType ="CF_SQL_INTEGER">	
				</cfquery>					
				<cfsavecontent	variable = "html_Discontinue"> 			
					<cfoutput>
						<form name="EditDiscontinue_form" id="EditDiscontinue_form_id" action="" method="post">						
								<div class="row">
									<div class="col-md-3">
										<div class="form-group">
											<div class="label-stable">
												<label>Reason to Discontinue?</label>
											</div>
										</div>
									</div>
									<div class="col-md-9">
										<div class="form-group">
											<div class="radio-list">
												<label><input type="radio" id="Specifics" name="Specifics" <cfif pCareplan_list.Specifics eq 'plan needs update, new record added'> checked </cfif> value="plan needs update, new record added"> plan needs update, new record added</label>
												<label><input type="radio" id="Specifics1" name="Specifics" <cfif pCareplan_list.Specifics eq 'plan needs update, NO new record added'> checked </cfif> value="plan needs update, NO new record added"> plan needs update, NO new record added</label>
												
											</div>
											
										</div>
									</div>			
								</div>
								<div class="row">
									<div class="col-md-3">							
										<div class="form-group">
											<label class="control-label" style="text-align:center;margin-top: 13px;">Notes:</label>			
										</div>	
									</div>
									<div class="col-md-9">
										<div class="form-group">
											<textarea name="Notes" id="Notes#arguments.AutoCareplan_ID#" type="text" value="" style="width: 100%;" class="form-control">#pCareplan_list.Notes#</textarea>										
										</div>						
									</div>				
								</div>			
						</form>		
					</cfoutput>	
				</cfsavecontent>	
				<cfreturn html_Discontinue />	
			</cfif>	
	</cffunction>

	<cffunction name="show_pathwayDiagnosis"  access="remote" output="Yes" returnFormat= "plain">   
		<cfargument name="AgencyID" required="no" hint="AgencyID" default="#session.agencyid#"> 	
		<cfargument name="AutoCareplan_ID" required="yes">
		<cfargument name="Assmt_ID" required="yes">
		<cfargument name="pathwayType" required="yes">

			<cfif arguments.AutoCareplan_ID  neq 0>
				<cfquery name="getpathway" datasource="#Application.DataSrc#">
					SELECT pPathway.* FROM  #Request.prefix_db_lookup#.pPathway 
					JOIN  #Request.prefix_db_agency#.pCareplan ON pPathway.Item_ID = pCareplan.Item_ID
					WHERE AutoCareplan_ID = <cfqueryparam value = "#arguments.AutoCareplan_ID#" CFSQLType ="CF_SQL_INTEGER">
					AND pPathway.Type =  <cfqueryparam value="#arguments.pathwayType#" cfsqltype="cf_sql_varchar">
					GROUP BY Pathway_ID
				</cfquery>	
				<cfif arguments.pathwayType EQ 'problem'>

					<cfquery name="pProblem_list" datasource="#Application.DataSrc#">
						SELECT pProblem.* FROM #Request.prefix_db_lookup#.pPathway 
						JOIN #Request.prefix_db_agency#.pProgress ON pPathway.Item_ID = pProgress.Item_ID
						JOIN #Request.prefix_db_agency#.pProblem  ON pProblem.Path_ID = pPathway.Pathway_ID
						 WHERE pProgress.Item_ID = <cfqueryparam value = "#arguments.AutoCareplan_ID#" CFSQLType ="CF_SQL_INTEGER">
						 AND pPathway.Type =   <cfqueryparam value="symptom" cfsqltype="cf_sql_varchar">
						 AND pProgress.Status = <cfqueryparam value = "0" CFSQLType ="CF_SQL_INTEGER">
						 AND pProblem.Status = <cfqueryparam value = "0" CFSQLType ="CF_SQL_INTEGER">
						 AND pProblem.Path_ID != 0  <!--- AND (M0_No like 'M1021%' OR  M0_No like 'M1023%') --->
						 AND pProblem.Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="CF_SQL_INTEGER">
						 GROUP BY pProblem.Problem_ID
						 ORDER BY pProblem.dx_order ASC
					</cfquery>
				<cfelse>
					<cfquery name="pProblem_list" datasource="#Application.DataSrc#">
						<!--- SELECT * FROM  #Request.prefix_db_agency#.pProblem 
						WHERE Path_ID = <cfqueryparam value = "#ValueList(getpathway.Pathway_ID)#" CFSQLType ="CF_SQL_INTEGER" list="yes">
						AND Status = <cfqueryparam value = "0" CFSQLType ="CF_SQL_INTEGER"> --->
						SELECT pProblem.* FROM #Request.prefix_db_lookup#.pPathway 
						JOIN #Request.prefix_db_agency#.pCareplan ON pPathway.Item_ID = pCareplan.Item_ID
						JOIN #Request.prefix_db_agency#.pProblem  ON pProblem.Path_ID = pPathway.Pathway_ID
						 WHERE AutoCareplan_ID = <cfqueryparam value = "#arguments.AutoCareplan_ID#" CFSQLType ="CF_SQL_INTEGER">
						 AND pPathway.Type =   <cfqueryparam value="#arguments.pathwayType#" cfsqltype="cf_sql_varchar">
						 AND pCareplan.Status = <cfqueryparam value = "0" CFSQLType ="CF_SQL_INTEGER">
						 AND pProblem.Status = <cfqueryparam value = "0" CFSQLType ="CF_SQL_INTEGER">
						 AND pProblem.Path_ID != 0  <!--- AND (pProblem.M0_No like 'M1021%' OR  pProblem.M0_No like 'M1023%') --->
						 AND pProblem.Assmt_ID = pCareplan.Assmt_ID
						 GROUP BY pProblem.Problem_ID
						 ORDER BY pProblem.dx_order ASC
					</cfquery>
				</cfif>
				


				<cfsavecontent variable = "html_diagnosis"> 			
					<cfoutput query="pProblem_list"	>				
						<div class="form-group">
								#Description#
							</div>
						</div>
					</cfoutput>
				</cfsavecontent>	
				<cfreturn html_diagnosis />	
			</cfif>	
	</cffunction>

	<cffunction name="show_schedproc_edit"  access="remote" output="Yes" returnFormat= "plain">   
		<cfargument name="AgencyID" required="no" hint="AgencyID" default="#session.agencyid#"> 	
		<cfargument name="Schedule_ID" required="yes" default="0">
		<cfargument name="Assmt_ID" required="yes" default="0">
		<cfargument name="careplantype" required="yes">
		<cfargument name="Skill" required="yes">


				<cfquery name="getcareplanlist" datasource="#Application.DataSrc#">
					SELECT * FROM #Request.prefix_db_agency#.pCareplan 
					WHERE Assmt_ID    = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="CF_SQL_INTEGER">	
					AND Skill 			= <cfqueryparam value = "#arguments.Skill#" CFSQLType ="CF_SQL_VARCHAR">
					AND type  = <cfqueryparam value = "#arguments.careplantype#" CFSQLType ="CF_SQL_VARCHAR">	
					AND status = 0
					AND Date_Resolve IS NULL
				</cfquery>
				<cfquery name="getschprocedures" datasource="#Application.DataSrc#">
					SELECT * FROM #Request.prefix_db_agency#.pSched_Procedure 
					WHERE Assmt_ID    = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="CF_SQL_INTEGER">	
					AND Schedule_ID   = <cfqueryparam value = "#arguments.Schedule_ID#" CFSQLType ="CF_SQL_INTEGER">	
					AND status = 0
				</cfquery>
				<cfset procedurelist = #ValueList(getschprocedures.Careplan_ID)# />
				<cfsavecontent	variable = "html_careplan_list"> 			
					<cfoutput>
						<form name="Editprocedure_form" id="Editprocedure_form_id" action="" method="post">						
							<input type="hidden" name="Schedule_ID" id="Schedule_ID"  value="#arguments.Schedule_ID#"/>			
								<cfloop query="getcareplanlist">
									<cfquery name="getschpro" dbtype="query">
										SELECT * FROM getschprocedures 
										WHERE  Careplan_ID = <cfqueryparam value="#Careplan_ID#"  cfsqltype="CF_SQL_INTEGER">
									</cfquery>
									<div class="row">
										<div class="col-md-7">
											<div class="form-group">
											  <div class="checkbox-list">
	                                      <label><input type="checkbox"  name="procedures" id="#Careplan_ID#" value="#Careplan_ID#"  <cfif getschpro.recordcount gt 0> checked </cfif>> #Description#
	                                     </label>
	                                  </div>
											</div>
										</div>
										<input type="hidden" name="procedecription" id="procedecription#Careplan_ID#" value="#Description#" />
										<div class="col-md-5">	
										<input type="text"  name="Notes" id="Notes#Careplan_ID#"   value="#getschpro.Notes#" class="form-control">
										</div>
									</div>	
								</cfloop>
						</form>		
					</cfoutput>	
				</cfsavecontent>	
				<cfreturn html_careplan_list />	
	</cffunction>

	<cffunction name="update_schedprocedure"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		 <cfargument name="Schedule_ID" required="yes" default="0">
		 <cfargument name="careplanselect" required="yes" default="0">
		 <cfargument name="Notes" required="no" default="">


			<cfquery  name="updatepSched_Procedure" datasource="#Application.DataSrc#">
			   UPDATE #Request.prefix_db_agency#.pSched_Procedure
			    	SET status = <cfqueryparam value="3"  cfsqltype="CF_SQL_INTEGER">,
					Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
					Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
				WHERE Schedule_ID IN (<cfqueryparam value="#arguments.Schedule_ID#"  cfsqltype="CF_SQL_INTEGER" list="yes">)
			</cfquery>	
			<cfquery  name="pSched_Procedure_insert" datasource="#Application.DataSrc#">
				INSERT INTO #Request.prefix_db_agency#.pSched_Procedure
				(
					 Status, Assmt_ID, Schedule_ID, Careplan_ID, Notes, Date_Create, Created_by, Date_Change, Change_by 
				) 
				 SELECT  0 , Assmt_ID, #Schedule_ID#, Careplan_ID,  Notes ,#now()# , #session.employeeid#  , #now()#, #session.employeeid#  
				 FROM #Request.prefix_db_agency#.pCareplan
				 WHERE Careplan_ID IN (<cfqueryparam value="#arguments.careplanselect#"  cfsqltype="CF_SQL_INTEGER" list="yes">)
				 AND status = 0
			</cfquery>

			<cfloop list="#arguments.Notes#" item="notesitem" delimiters="~">  
				<cfset currentnotes =GetToken(notesitem,2,':') />
				<cfset currentcareplan_id =GetToken(notesitem,1,':') />
				<cfquery  name="updatepSched_Procedure" datasource="#Application.DataSrc#">
				   UPDATE #Request.prefix_db_agency#.pSched_Procedure
				    	SET Notes = <cfqueryparam value="#currentnotes#"  cfsqltype="CF_SQL_VARCHAR">
					WHERE Careplan_ID = <cfqueryparam value="#currentcareplan_id#"  cfsqltype="CF_SQL_INTEGER">
				</cfquery>	
			</cfloop>


			<cfreturn 'Success' />	      
	</cffunction>	

	<cffunction name="update_discontinue"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		 <cfargument name="AutoCareplan_ID" required="yes" default="0">
		 <cfargument name="Specifics" required="yes" default="0">
		 <cfargument name="Notes" required="no" default="">

			<cfquery  name="updatepProblem" datasource="#Application.DataSrc#">
			    UPDATE #Request.prefix_db_agency#.pCareplan
			    	SET Specifics = <cfqueryparam value="#arguments.Specifics#"  cfsqltype="CF_SQL_VARCHAR">,
			    	Status = <cfqueryparam value="2"  cfsqltype="CF_SQL_INTEGER">,
			    		Notes = <cfqueryparam value="#arguments.Notes#"  cfsqltype="CF_SQL_VARCHAR">,
			    	Date_Resolve = <cfqueryparam value="#DateFormat(now(),'mm/dd/yyyy')#" cfsqltype="cf_sql_date">,
				Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
				Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
				WHERE AutoCareplan_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.AutoCareplan_ID#">
			</cfquery>

			<cfquery  name="getpcareplans" datasource="#Application.DataSrc#">
			    SELECT * FROM #Request.prefix_db_agency#.pCareplan
				 WHERE AutoCareplan_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.AutoCareplan_ID#">
			</cfquery>
			<cfloop query="getpcareplans">
				<cfquery  name="pProblem_insert" datasource="#Application.DataSrc#">
					INSERT INTO #Request.prefix_db_agency#.pCareplan
					(
						 Careplan_ID, Assmt_ID, Item_ID, Order_ID, <cfif len(Incrmt1) GT 0>Incrmt1,</cfif>CMSOrder_ID, Status, Skill, Type, Description, Other, Notes, Param_Lo, Param_Hi, Param_Other, Specifics, Date_Target, Date_Resolve, Order_Date, Date_Create, Created_by, Date_Change, Change_by
					) 
					VALUES
					(							
						<cfqueryparam value = "#Careplan_ID#" CFSQLType ="CF_SQL_INTEGER">,
						<cfqueryparam value = "#Assmt_ID#" CFSQLType ="CF_SQL_INTEGER">,
						<cfqueryparam value = "#Item_ID#" CFSQLType ="CF_SQL_INTEGER">,
						<cfqueryparam value = "#Order_ID#" CFSQLType ="CF_SQL_INTEGER">,
						<cfif len(Incrmt1) GT 0><cfqueryparam value = "#Incrmt1#" CFSQLType ="CF_SQL_INTEGER">,</cfif>
						<cfqueryparam value = "0" CFSQLType ="CF_SQL_INTEGER">,
						<cfqueryparam value ="0"  cfsqltype="cf_sql_varchar">,
						<cfqueryparam value="#Skill#"  cfsqltype="cf_sql_varchar">,
						<cfqueryparam value="#Type#"  cfsqltype="cf_sql_varchar">,
						<cfqueryparam value="#Description#"  cfsqltype="cf_sql_varchar">,
						<cfqueryparam value="#Other#"  cfsqltype="cf_sql_varchar">,
						<cfqueryparam value="#Notes#"  cfsqltype="cf_sql_varchar">,
						<cfqueryparam value="#Param_Lo#"  cfsqltype="cf_sql_varchar">,
						<cfqueryparam value="#Param_Hi#"  cfsqltype="cf_sql_varchar">,
						<cfqueryparam value="#Param_Other#"  cfsqltype="cf_sql_varchar">,
						<cfqueryparam value="#Specifics#"  cfsqltype="cf_sql_varchar">,
						<cfqueryparam value="#Date_Target#" cfsqltype="cf_sql_date">,
						<cfqueryparam value="#DateFormat(now(),'mm/dd/yyyy')#" cfsqltype="cf_sql_date">,
						<cfqueryparam value="#Order_Date#" cfsqltype="cf_sql_date">,
						<cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
						<cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">,
						<cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
						<cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">
					)
				</cfquery>	
			</cfloop>



		<cfreturn 'Success' />
	      
	</cffunction>

	<cffunction name="delete485"  access="remote" output="Yes" returnformat="plain" returntype="string">   
	 <cfargument name="Order_ID" required="yes" default="0">
		<cfquery  name="updatepProblem" datasource="#Application.DataSrc#">
		    UPDATE #Request.prefix_db_agency#.pCMS4857
		    	SET status = <cfqueryparam value="2"  cfsqltype="CF_SQL_INTEGER">,
			Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
			Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
			WHERE Order_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.Order_ID#">
		</cfquery>	

		<cfquery  name="updatepProblem" datasource="#Application.DataSrc#">
			UPDATE #Request.prefix_db_agency#.pProblem SET CMSOrder_ID = 0 
			WHERE CMSOrder_ID = <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.Order_ID#">
		</cfquery>

		<cfquery  name="updatepCareplan" datasource="#Application.DataSrc#">
			UPDATE #Request.prefix_db_agency#.pCareplan SET CMSOrder_ID = 0 
			WHERE CMSOrder_ID = <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.Order_ID#">
		</cfquery>

		<cfquery  name="updatepPtmeds" datasource="#Application.DataSrc#">
			UPDATE #Request.prefix_db_agency#.pPtmeds SET CMSOrder_ID = 0 
			WHERE CMSOrder_ID = <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.Order_ID#">
		</cfquery>
		
		<cfquery  name="updatepWoundsVitals" datasource="#Application.DataSrc#">
			UPDATE #Request.prefix_db_agency#.pWoundsVitals SET CMSOrder_ID = 0 
			WHERE CMSOrder_ID = <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.Order_ID#">
		</cfquery>

		<cfreturn 'Success' />
	</cffunction>

	<cffunction name="deletevisit"  access="remote" output="Yes" returnformat="plain" returntype="string">   
	 <cfargument name="Schedule_ID" required="yes" default="0">

		<!--- HHA Exchange: delete remote visit only when payer has EVV required by Payer = Yes --->
		<cfif isDefined("session.agencyid") AND val(session.agencyid) EQ 1195 AND val(arguments.Schedule_ID) GT 0>
			<cfset shouldDeleteHHAEVV = false>
			<cftry>
				<cfset shouldDeleteHHAEVV = createObject("component", "components.evv.EVVVisitAutomation").init().scheduleRequiresEVVAutomation(
					scheduleID = val(arguments.Schedule_ID),
					agencyID = val(session.agencyid)
				)>
				<cfcatch type="any">
					<cflog file="HHAExchange_EVV" text="deletevisit EVV payer check failed schedule #arguments.Schedule_ID#: #cfcatch.message#">
				</cfcatch>
			</cftry>
			<cfif shouldDeleteHHAEVV>
				<cftry>
					<cfset createObject("component", "components.sandata.hhaexchange").init().delete_visit(
						Agency_ID = val(session.agencyid),
						Schedule_ID = val(arguments.Schedule_ID),
						reason = "visit_deleted"
					)>
					<cfcatch type="any">
						<cflog file="HHAExchange_EVV" text="deletevisit hook failed schedule #arguments.Schedule_ID#: #cfcatch.message#">
					</cfcatch>
				</cftry>
			</cfif>
		</cfif>

		<cfquery  name="updatepSchedules" datasource="#Application.DataSrc#">
		    UPDATE #Request.prefix_db_agency#.pSchedules
		    	SET status = <cfqueryparam value="1"  cfsqltype="CF_SQL_INTEGER">,
			   Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
			   Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
			WHERE Schedule_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.Schedule_ID#">
		</cfquery>	

		
		<cfreturn 'Success' />
	</cffunction>


	<cffunction name="delete_assessments"  access="remote" output="Yes" returnformat="plain" returntype="string">   
	      <cfargument name="Assmt_ID" required="yes" default="0">
		<!--- <cfquery  name="DeletepCMS4857" datasource="#Application.DataSrc#">
		    UPDATE #Request.prefix_db_agency#.pCMS4857
		    	SET status = <cfqueryparam value="2"  cfsqltype="CF_SQL_INTEGER">,
			Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
			Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
			WHERE Assmt_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.Assmt_ID#">
		</cfquery>	
		<cfquery  name="DeletepProblem" datasource="#Application.DataSrc#">
		    UPDATE #Request.prefix_db_agency#.pProblem
		    	SET status = <cfqueryparam value="1"  cfsqltype="CF_SQL_INTEGER">,
			Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
			Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
			WHERE Assmt_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.Assmt_ID#">
		</cfquery>	 --->
		<cfquery  name="DeletepAssessments" datasource="#Application.DataSrc#">
		    UPDATE #Request.prefix_db_agency#.pAssessments
		    	SET status = <cfqueryparam value="1"  cfsqltype="CF_SQL_INTEGER">,
			Record_Mod_Date = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
			Record_Mod_By	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
			WHERE Assmt_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="#arguments.Assmt_ID#">
			AND status = <cfqueryparam CFSQLType="CF_SQL_INTEGER"  value="0">
		</cfquery>		
		<cfreturn 'Success' />
	</cffunction>

	<cffunction name="duplicate_problems"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		 <cfargument name="problems_ids" required="yes" default="0">
			<cfquery  name="pProblem_insert" datasource="#Application.DataSrc#">
				INSERT INTO #Request.prefix_db_agency#.pProblem
				(
					  Problem_ID, Assmt_ID, Status, Careplan, Path_ID, Skill, ques_id, M0_No, Description, Answer, Severity, dx_order, Coding_Status, Specific_Orders,  Resolved_Date, Assign, Notes, Date_Create, Created_by, Date_Change, Change_by
				) 
				  SELECT  Problem_ID, Assmt_ID, 0 , Careplan, Path_ID, Skill, ques_id, M0_No, Description, Answer, Severity, dx_order, Coding_Status, Specific_Orders,  Resolved_Date, Assign, Notes,#now()# , #session.employeeid#  , #now()#, #session.employeeid#  
				  FROM #Request.prefix_db_agency#.pProblem
				  WHERE pProblem.Problem_ID IN (<cfqueryparam value="#arguments.problems_ids#"  cfsqltype="CF_SQL_INTEGER" list="yes">)
				  AND Status = 0
			</cfquery>	
		<cfreturn 'Success' />	      
	</cffunction>

	<cffunction name="reassignskill"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		<cfargument name="Skill" required="yes" default="">
		<cfargument name="Assmt_ID" required="yes" default="0">
		<cfset message= "failure" />
		<cfquery  name="getproblems" datasource="#Application.DataSrc#">
	           SELECT * FROM #Request.prefix_db_agency#.pProblem
	           WHERE Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="cf_sql_integer">
	           AND status     = <cfqueryparam value="0" cfsqltype="cf_sql_integer">
	           AND Skill    = <cfqueryparam value="#arguments.Skill#" cfsqltype="cf_sql_varchar">
		</cfquery>
		<cfif getproblems.recordcount gt 0>
			<cfset message = #getproblems.recordcount# & " "&#arguments.Skill# &' related problems must be re-assigned before discharge summary can be created' />
		<cfelse>
			<cfset message = 'Success' />
		</cfif>
		<cfreturn  message/>	      
	</cffunction>	


	<cffunction name="pOASIS_QAupdateold"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		<cfargument name="QA_ID" required="yes" default="">
		<cfargument name="Assmt_ID" required="yes" default="0">
		<cfargument name="Resolved" required="yes" default="0">
		<cfargument name="QA_Type" required="no" default="step1">
		<cfargument name="approveall" required="no" default="0">		
		<cfset message= "failure" />

		<cfquery  name="getass" datasource="#Application.DataSrc#">
	           SELECT * FROM #Request.prefix_db_agency#.pAssessments
	           WHERE Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="cf_sql_integer">
	           AND status =  0
		</cfquery>

		<cfif arguments.approveall EQ 1>
			<cfquery  name="getpOASIS" datasource="#Application.DataSrc#">
		           SELECT * FROM #Request.prefix_db_agency#.pOASIS_QA
		           WHERE Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="cf_sql_integer">
		           AND QA_Type =  <cfqueryparam value = "#QA_Type#" CFSQLType ="cf_sql_varchar">
		           AND Resolved = 2           
			</cfquery>
			<cfquery  name="updatepOASIS" datasource="#Application.DataSrc#">
		           UPDATE #Request.prefix_db_agency#.pOASIS_QA
		           SET Resolved =  <cfqueryparam value = "#arguments.Resolved#" CFSQLType ="cf_sql_integer">
		           WHERE Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="cf_sql_integer">
		           AND QA_Type =  <cfqueryparam value = "#QA_Type#" CFSQLType ="cf_sql_varchar">
		           AND Resolved = 2	  
			</cfquery>
		<cfelse>
			<cfquery  name="updatepOASIS" datasource="#Application.DataSrc#">
		           UPDATE #Request.prefix_db_agency#.pOASIS_QA
		           SET Resolved =  <cfqueryparam value = "#arguments.Resolved#" CFSQLType ="cf_sql_integer">
		           WHERE QA_ID = <cfqueryparam value = "#arguments.QA_ID#" CFSQLType ="cf_sql_integer">
			</cfquery>
			<cfquery  name="getpOASIS" datasource="#Application.DataSrc#">
		           SELECT * FROM #Request.prefix_db_agency#.pOASIS_QA
		            WHERE QA_ID = <cfqueryparam value = "#arguments.QA_ID#" CFSQLType ="cf_sql_integer">           
			</cfquery>
		</cfif>
		<cfset counts = 0/>
		<cfif arguments.Resolved EQ 1>
			<cfloop query="getpOASIS">

				<cfif Questions_label contains 'GG0170%' OR Questions_label contains 'GG0130%' >
					<cfset originalanswer = #Left(getpOASIS.QA_answer,2)# />
				<cfelse>
					<cfset originalanswer = #getpOASIS.QA_answer# />
				</cfif>
				<cfquery  name="getAssessments" datasource="#Application.DataSrc#">
			           SELECT * FROM #Request.prefix_db_agency#.pAssessments
			           WHERE Admit_ID =  <cfqueryparam value = "#getass.Admit_ID#" CFSQLType ="cf_sql_integer">
			           AND F26 IN (SELECT assessment_reason FROM Assmt_Update
			           WHERE question_label =  '#getpOASIS.Questions_label#') 
				</cfquery>
				<cfset AssignedSKILL =  getAssessments.F27 />

				<cfquery  name="updatepAssessments" datasource="#Application.DataSrc#">
			           UPDATE #Request.prefix_db_agency#.pAssessments
			           SET #getpOASIS.QA_answerlabel# =  <cfqueryparam value = "#originalanswer#" CFSQLType ="cf_sql_varchar">
			           WHERE Assmt_ID = <cfqueryparam value = "#getpOASIS.Assmt_ID#" CFSQLType ="cf_sql_integer">
			           AND status = 0	  
				</cfquery>

				<cfquery  name="updatepProblem" datasource="#Application.DataSrc#">
			           UPDATE #Request.prefix_db_agency#.pProblem
			           SET Answer =  <cfqueryparam value = "#getpOASIS.QA_answer#" CFSQLType ="cf_sql_varchar">,
			           	<cfif AssignedSKILL NEQ ''>
			           	  Skill = <cfqueryparam value = "#AssignedSKILL#" CFSQLType ="cf_sql_varchar">,
			           	</cfif>
			           	Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
					Change_by 	=   <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">
			           WHERE ques_id IN 
			           	    (SELECT ques_id FROM #Request.prefix_db_lookup#.assessment_questions_lookup  
			                WHERE assessment_reason = <cfqueryparam value = "#getass.F26#" CFSQLType ="cf_sql_varchar">
			                AND answer_label = <cfqueryparam value = "#getpOASIS.QA_answerlabel#" CFSQLType ="cf_sql_varchar">
			                	AND deleted = 0
			                	)
			            AND Assmt_ID = <cfqueryparam value = "#getpOASIS.Assmt_ID#" CFSQLType ="cf_sql_integer">
			           AND status = 0	  
				</cfquery> 		
				<cfset counts = counts + 1 />
			</cfloop>
			
		</cfif>
		<cfquery  name="getpOASIS" datasource="#Application.DataSrc#">
	           SELECT * FROM #Request.prefix_db_agency#.pOASIS_QA
	           WHERE Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="cf_sql_integer">
	           AND QA_Type =  <cfqueryparam value = "#QA_Type#" CFSQLType ="cf_sql_varchar">
	           AND Resolved = 2	           
		</cfquery>

		<cfif arguments.Resolved EQ 1>
			
			<cfset QA_count = getass.QA_count + counts />
			<cfquery  name="updateassessments" datasource="#Application.DataSrc#">
		           UPDATE #Request.prefix_db_agency#.pAssessments
		           SET QA_count =  <cfqueryparam value = "#QA_count#" CFSQLType ="cf_sql_integer">
		           WHERE Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="cf_sql_integer">
		           AND status =  0
			</cfquery>
		</cfif>

		<!---<cfif arguments.QA_Type EQ 'step6'>
			<cfquery  name="pOASIS_QA_insert" datasource="#Application.DataSrc#">
				INSERT INTO #Request.prefix_db_agency#.pOASIS_QA
				(
					Assmt_ID, Emp_ID, Approved,Resolved, QA_Type, Questions_label, Message,
					QA_answerlabel,QA_answer
				) 
				VALUES
				(							
					<cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="CF_SQL_INTEGER">,
					<cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">,
					<cfqueryparam value = "0" CFSQLType ="CF_SQL_INTEGER">,
					<cfqueryparam value = "#arguments.Resolved#" CFSQLType ="CF_SQL_INTEGER">,
					<cfqueryparam value="#arguments.QA_Type#"  cfsqltype="cf_sql_varchar">,
					<cfqueryparam value=""  cfsqltype="cf_sql_varchar">,
					<cfqueryparam value="More evaluations expected?"  cfsqltype="cf_sql_varchar">,
					<cfqueryparam value=""  cfsqltype="cf_sql_varchar">,
					<cfqueryparam value=""  cfsqltype="cf_sql_varchar">	
				)
			</cfquery>
		</cfif> --->

		<cfset message =  #getpOASIS.recordcount# />		
		<cfreturn  message/>	      
	</cffunction>		
	


	<cffunction name="pOASIS_QAupdate"  access="remote" output="Yes" returnformat="plain" returntype="string"> 
		<cfargument name="QA_IDS" required="yes" default="">
		<cfargument name="Assmt_ID" required="yes" default="0">
		<cfargument name="Resolvedvalues" required="yes" default="0">
		<cfargument name="QA_Type" required="no" default="step1">
		<cfset Resolvedlist=ListToArray(arguments.Resolvedvalues,"~",false,true) />
		<cfset QA_IDS=ListToArray(arguments.QA_IDS,"~",false,true) />
		<cfset QAID_yes = "">
		<cfquery  name="getass" datasource="#Application.DataSrc#">
	           SELECT * FROM #Request.prefix_db_agency#.pAssessments
	           WHERE Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="cf_sql_integer">
	           AND status =  0
		</cfquery>


	    <cfloop from="1" to="#ArrayLen(Resolvedlist)#" index="i">
			<cfquery  name="updatepOASIS" datasource="#Application.DataSrc#">
		           UPDATE #Request.prefix_db_agency#.pOASIS_QA
		           SET Resolved =  <cfqueryparam value = "#Resolvedlist[i]#" CFSQLType ="cf_sql_integer">
		           WHERE Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="cf_sql_integer">
		           AND QA_Type =  <cfqueryparam value = "#arguments.QA_Type#" CFSQLType ="cf_sql_varchar">
		           AND QA_ID = 	   <cfqueryparam value = "#QA_IDS[i]#" CFSQLType ="cf_sql_integer">
			</cfquery>	
			<cfif Resolvedlist[i] EQ 1 >
				<cfset listappend(QAID_yes,#Resolvedlist[i]#) />
			</cfif>
		</cfloop>


		<cfif QAID_yes NEQ ''>
			<cfquery  name="getpOASIS" datasource="#Application.DataSrc#">
		           SELECT * FROM #Request.prefix_db_agency#.pOASIS_QA
		           WHERE QA_ID IN (<cfqueryparam value = "#QAID_yes#" CFSQLType ="cf_sql_integer" list="yes">)
			</cfquery>
			<cfloop query="getpOASIS">

				<cfif Questions_label contains 'GG0170%' OR Questions_label contains 'GG0130%' >
					<cfset originalanswer = #Left(getpOASIS.QA_answer,2)# />
				<cfelse>
					<cfset originalanswer = #getpOASIS.QA_answer# />
				</cfif>
				<cfquery  name="getAssessments" datasource="#Application.DataSrc#">
			           SELECT * FROM #Request.prefix_db_agency#.pAssessments
			           WHERE Admit_ID =  <cfqueryparam value = "#getass.Admit_ID#" CFSQLType ="cf_sql_integer">
			           AND F26 IN (SELECT assessment_reason FROM Assmt_Update
			           WHERE question_label =  '#getpOASIS.Questions_label#') 
				</cfquery>
				<cfset AssignedSKILL =  getAssessments.F27 />

				<cfquery  name="updatepAssessments" datasource="#Application.DataSrc#">
			           UPDATE #Request.prefix_db_agency#.pAssessments
			           SET #getpOASIS.QA_answerlabel# =  <cfqueryparam value = "#originalanswer#" CFSQLType ="cf_sql_varchar">
			           WHERE Assmt_ID = <cfqueryparam value = "#getpOASIS.Assmt_ID#" CFSQLType ="cf_sql_integer">
			           AND status = 0	  
				</cfquery>


				<cfquery  name="updatepProblem" datasource="#Application.DataSrc#">
			           UPDATE #Request.prefix_db_agency#.pProblem
			           SET Answer =  <cfqueryparam value = "#getpOASIS.QA_answer#" CFSQLType ="cf_sql_varchar">,
			           	<cfif AssignedSKILL NEQ ''>
			           	  Skill = <cfqueryparam value = "#AssignedSKILL#" CFSQLType ="cf_sql_varchar">,
			           	</cfif>
			           	Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
					Change_by 	=   <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">
			           WHERE ques_id IN 
			           	    (SELECT ques_id FROM #Request.prefix_db_lookup#.assessment_questions_lookup  
			                WHERE assessment_reason = <cfqueryparam value = "#getass.F26#" CFSQLType ="cf_sql_varchar">
			                AND answer_label = <cfqueryparam value = "#getpOASIS.QA_answerlabel#" CFSQLType ="cf_sql_varchar">
			                	AND deleted = 0
			                	)
			            AND Assmt_ID = <cfqueryparam value = "#getpOASIS.Assmt_ID#" CFSQLType ="cf_sql_integer">
			           AND status = 0	  
				</cfquery> 		
				<cfset counts = counts + 1 />
			</cfloop>
			
		</cfif>

		<cfquery  name="getpOASIScounts" datasource="#Application.DataSrc#">
	           SELECT * FROM #Request.prefix_db_agency#.pOASIS_QA
	           WHERE Assmt_ID = <cfqueryparam value = "#arguments.Assmt_ID#" CFSQLType ="cf_sql_integer">
	           AND QA_Type =  <cfqueryparam value = "#QA_Type#" CFSQLType ="cf_sql_varchar">
	           AND Resolved = 2	           
		</cfquery>

		<cfset message =  #getpOASIScounts.recordcount# />		
		<cfreturn  message/>

	</cffunction>
		 	   



	<cffunction name="update_submitter"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		 <cfargument name="Assmt_ID" required="yes" default="0">
		 <cfargument name="dropdowntype" required="yes" default="0">
		 <cfargument name="Answer" required="yes" default="0">
		
			<cfquery  name="updatepAssessments" datasource="#Application.DataSrc#">
			    UPDATE #Request.prefix_db_agency#.pAssessments SET 
			    <cfif dropdowntype EQ 'Submitter'>
			    	Submitter_ID = <cfqueryparam value="#arguments.Answer#"  cfsqltype="CF_SQL_INTEGER">,
			    <cfelseif dropdowntype EQ 'Sub_Status'>
			    	F292 = <cfqueryparam value="#arguments.Answer#"  cfsqltype="CF_SQL_VARCHAR">,
			    <cfelseif dropdowntype EQ 'UTN_1'>
			    	F290 = <cfqueryparam value="#arguments.Answer#"  cfsqltype="CF_SQL_VARCHAR">,
			    <cfelseif dropdowntype EQ 'UTN_2'>
			    	F291 = <cfqueryparam value="#arguments.Answer#"  cfsqltype="CF_SQL_VARCHAR">,
			   <cfelseif dropdowntype EQ 'Episode'>
			    	F293 = <cfqueryparam value="#arguments.Answer#"  cfsqltype="CF_SQL_VARCHAR">,
			    <cfelseif dropdowntype EQ 'Date_Sent'>
			    	F200 = <cfqueryparam value="#arguments.Answer#"  cfsqltype="CF_SQL_DATE">,	
			    <cfelseif dropdowntype EQ 'Date_Received'>
			    	F199 = <cfqueryparam value="#arguments.Answer#"  cfsqltype="CF_SQL_DATE">,						    	
			    </cfif>
			 	Record_Mod_Date = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
				Record_Mod_By	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
				WHERE Assmt_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER" value="#arguments.Assmt_ID#"  >
			</cfquery>
			<cfreturn 'success' />	     
	</cffunction>	

	<cffunction name="More_evaluations"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		 <cfargument name="Assmt_ID" required="yes" default="0">
		  <cfargument name="F24" required="yes" default="0">
		
			<cfquery  name="updatepAssessments" datasource="#Application.DataSrc#">
			    UPDATE #Request.prefix_db_agency#.pAssessments SET 
			    F24 = <cfqueryparam value="#arguments.F24#"  cfsqltype="CF_SQL_INTEGER">,
			   	Record_Mod_Date = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
				Record_Mod_By	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
				WHERE Assmt_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER" value="#arguments.Assmt_ID#"  >
			</cfquery>
			<cfreturn 'success' />	     
	</cffunction>	

	<cffunction name="updatepWoundsVitals"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		<cfargument name="Assmt_ID" required="yes" default="0">
		<cfargument name="VitalOrWound" required="yes" default="0">
		<cfargument name="Location" required="no" default="0">
		<cfargument name="Length" required="no" default="0">
		<cfargument name="Width" required="no" default="0">
		<cfargument name="Depth" required="no" default="0">
		<cfargument name="Description" required="no" default="0">
		
		<cfif arguments.VitalOrWound EQ 'wound'>
			<cfquery  name="insertpWoundsVitals" datasource="#Application.DataSrc#">
			    INSERT INTO  #Request.prefix_db_agency#.pWoundsVitals (Assmt_ID, Status, 
			    		 VitalOrWound, Description, Location, Length, Width, Depth,Date_Create,Created_by,
			    		 Date_Change,Change_by)
			    VALUES 
			    		(<cfqueryparam value="#arguments.Assmt_ID#"  cfsqltype="CF_SQL_INTEGER">,
			    		<cfqueryparam value="0"  cfsqltype="CF_SQL_INTEGER">,
			    		<cfqueryparam value="#arguments.VitalOrWound#"  cfsqltype="CF_SQL_VARCHAR">,
			    		<cfqueryparam value="#arguments.Description#"  cfsqltype="CF_SQL_VARCHAR">,
			    		<cfqueryparam value="#arguments.Location#"  cfsqltype="CF_SQL_VARCHAR">,
			    		<cfqueryparam value="#arguments.Length#"  cfsqltype="CF_SQL_VARCHAR">,
			    		<cfqueryparam value="#arguments.Width#"  cfsqltype="CF_SQL_VARCHAR">,
			    		<cfqueryparam value="#arguments.Depth#"  cfsqltype="CF_SQL_VARCHAR">,
			    		<cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
			    		<cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">,
			    		<cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
			    		<cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER">)
			</cfquery>
		</cfif>
		<cfreturn 'success' />	     
	</cffunction>


	<cffunction name="WoundDelete"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		 <cfargument name="WoundID" required="yes" default="0">
		
			<cfquery  name="updatepAssessments" datasource="#Application.DataSrc#">
			    UPDATE #Request.prefix_db_agency#.pWoundsVitals SET 
			      Status = <cfqueryparam value="2"  cfsqltype="CF_SQL_INTEGER">,
			   	Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
				Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
				WHERE ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER" value="#arguments.WoundID#"  >
			</cfquery>
			<cfreturn 'success' />	     
	</cffunction>



	<cffunction name="update_4857"  access="remote" output="Yes" returnformat="plain" returntype="string">   
		 <cfargument name="Order_ID" required="yes" default="0">
		 <cfargument name="Form_Status" required="yes" default="0">	
		
			<cfquery  name="updatepAssessments" datasource="#Application.DataSrc#">
			    UPDATE #Request.prefix_db_agency#.pCMS4857 SET 
			      Form_Status = <cfqueryparam value="#arguments.Form_Status#"  cfsqltype="CF_SQL_VARCHAR">,
			   	Date_Change = <cfqueryparam value="#now()#" cfsqltype="cf_sql_timestamp">,
				  Change_by	= <cfqueryparam value = "#session.employeeid#" CFSQLType ="CF_SQL_INTEGER"> 
				WHERE Order_ID =  <cfqueryparam CFSQLType="CF_SQL_INTEGER" value="#arguments.Order_ID#"  >
			</cfquery>
			<cfreturn 'success' />	     
	</cffunction>

	


</cfcomponent>