<cfcomponent output="false">

	<cffunction name="recertupin1" access="remote" returntype="string">
		<cfargument name="M0110" required="yes" hint="SOC Step 1">
			
		<cfquery  name="recert1" datasource="#Application.DataSrc#">
				UPDATE #Request.prefix_db_agency#.Assessment_New SET 
					M0110 = '#M0110#'
				WHERE Assessment_ID = '#session.cs.AssessmentId#'
			   </cfquery>
		  <cfreturn 'step2'>
	</cffunction>
	
	<cffunction name="recertupin2" access="remote" returntype="string">
		
			     <cfargument name="checkIntravenous" required="yes" hint="Recertification Step 2">
				<cfargument name="checkOverweight" required="yes" hint="Recertification Step 2">
				<cfargument name="checkhomeother" required="yes" hint="Recertification Step 2">		
				<cfargument name="checkHyperglycemiFZaSleeping" required="yes" hint="Recertification Step 2">	
				<cfset ChkIn=replace(checkIntravenous,'!',',','All') />
				<cfset ChkOvr=replace(checkOverweight,'!',',','All') />
				<cfset ChkHo=replace(checkhomeother,'!',',','All') />
				<cfset ChkSleep=replace(checkHyperglycemiFZaSleeping,'!',',','All') />
		
		<cfquery  name="recert2" datasource="#Application.DataSrc#">
				UPDATE #Request.prefix_db_agency#.Assessment_New SET 
					Therapies_Home_M0250 = '#ChkIn#',
					M0250_Assess = '#ChkOvr#',
					Home_Safety_Assess = '#ChkHo#',
					Endocrine_Assess = '#ChkSleep#'
					
				WHERE Assessment_ID = '#session.cs.AssessmentId#'
			   </cfquery>
		  <cfreturn 'step3'>
	</cffunction>
	
	
	<cffunction name="recertupin3" access="remote" returntype="string">
		
			     <cfargument name="checkpainlevel" required="yes" hint="Recertification Step 3">
				<cfargument name="checkcolor" required="yes" hint="Recertification Step 3">
				
				<cfargument name="M1306" required="yes" hint="Recertification Step 3">
				<cfargument name="M1242" required="yes" hint="Recertification Step 3">
				<cfargument name="M1200" required="yes" hint="Recertification Step 3">	
				<cfset Chkpain=replace(checkpainlevel,'!',',','All') />
				<cfset Chkcolor=replace(checkcolor,'!',',','All') />
		
		<cfquery  name="recert3" datasource="#Application.DataSrc#">
				UPDATE #Request.prefix_db_agency#.Assessment_New SET 
						
						M0420_Assess = '#Chkpain#',
						M0440_Assess = '#Chkcolor#',
						M1306_Unhealed_Pressure = '#M1306#',
						Freq_of_Pain_M0420 = '#M1242#',
						Vision_M0390 = '#M1200#'
						
				WHERE Assessment_ID = '#session.cs.AssessmentId#'
			   </cfquery>
		  <cfreturn 'step4'>
	</cffunction>
	

	
		<cffunction name="recertupin4" access="remote" returntype="string">
	
			     <cfargument name="drpstage2" required="yes" hint="Recertification Step 4">
				<cfargument name="drpstage2value" required="yes" hint="Recertification Step 4">
				<cfargument name="drpstage3" required="yes" hint="Recertification Step 4">
				<cfargument name="drpstage3value" required="yes" hint="Recertification Step 4">
				<cfargument name="drpstage4" required="yes" hint="Recertification Step 4">
				<cfargument name="drpstage4value" required="yes" hint="Recertification Step 4">
				<cfargument name="drpd1" required="yes" hint="Recertification Step 4">
				<cfargument name="drpd1value" required="yes" hint="Recertification Step 4">
				
				 <cfargument name="drpd2" required="yes" hint="Recertification Step 4">
				<cfargument name="drpd2value" required="yes" hint="Recertification Step 4">
				<cfargument name="drpd3" required="yes" hint="Recertification Step 4">
				<cfargument name="drpd3value" required="yes" hint="Recertification Step 4">
			
		
		<cfquery  name="recert4" datasource="#Application.DataSrc#">
				UPDATE #Request.prefix_db_agency#.Assessment_New SET 
							Pressure_Ulcer_b_M0450 = '#drpstage2#',
							Pressure_Ulcer_c_M0450 = '#drpstage3#',
							Pressure_Ulcer_d_M0450 = '#drpstage4#',
							Pressure_Ulcer_e_M0450 = '#drpd1#',
							M1308_d_2_Pressure = '#drpd2#',
							M1308_d_3_Pressure = '#drpd3#',
							M1308_d_32_Pressure = '#drpstage3value#',
							M1308_d_22_Pressure = '#drpd2value#',
							M1308_d_12_Pressure = '#drpd1value#',
							M1308_c_12_Pressure = '#drpstage4value#',
							M1308_b_12_Pressure = '#drpd3value#',
							M1308_a_12_Pressure = '#drpstage2value#'
				WHERE Assessment_ID = '#session.cs.AssessmentId#'
			   </cfquery>
		  <cfreturn 'step5'>
	</cffunction>
	
		<cffunction name="recertupin5" access="remote" returntype="string">
		
			     <cfargument name="M1322" required="yes" hint="Recertification Step 5">
				<cfargument name="M1324" required="yes" hint="Recertification Step 5">
			

		<cfquery  name="recert5" datasource="#Application.DataSrc#">
				UPDATE #Request.prefix_db_agency#.Assessment_New SET 
					Pressure_Ulcer_a_M0450 = '#M1322#',
					Pressure_Ulcer_Stage_M0460 = '#M1324#'
				WHERE Assessment_ID = '#session.cs.AssessmentId#'
			   </cfquery>
		  <cfreturn 'step6'>
	</cffunction>
	
	
	<cffunction name="recertupin6" access="remote" returntype="string">
	
				<cfargument name="M1330" required="yes" hint="Recertification Step 6">	
			     <cfargument name="M1332" required="yes" hint="Recertification Step 6">
				<cfargument name="M1334" required="yes" hint="Recertification Step 6">
				<cfargument name="M1342" required="yes" hint="Recertification Step 6">
				<cfargument name="M1350" required="yes" hint="Recertification Step 6">

		<cfquery  name="recert6" datasource="#Application.DataSrc#">
				UPDATE #Request.prefix_db_agency#.Assessment_New SET 
					Stasis_Ulcer_Num_M0470 = '#M1332#',
					Stasis_Ulcer_Status_M0476 = '#M1334#',
					Stasis_Ulcer_M0468 ='#M1330#',
					Surgical_Wound_Status_M0488 = '#M1342#',
					M1350_Other_Wounds = '#M1350#'
					WHERE Assessment_ID = '#session.cs.AssessmentId#'
			   </cfquery>
		  <cfreturn 'step7'>
	</cffunction>
	
		<cffunction name="recertupin7" access="remote" returntype="string">
	
				<cfargument name="checkurinecolor" required="yes" hint="Recertification Step 7">	
			     <cfargument name="checkdyspnea" required="yes" hint="Recertification Step 7">
				<cfargument name="M1400" required="yes" hint="Recertification Step 7">
				<cfargument name="M1620" required="yes" hint="Recertification Step 7">
				<cfargument name="M1610" required="yes" hint="Recertification Step 7">
				<cfargument name="M1630" required="yes" hint="Recertification Step 7">
				<cfset Chkurinecol=replace(checkurinecolor,'!',',','All') />
				<cfset Chkdys=replace(checkdyspnea,'!',',','All') />
				
		<cfquery  name="recert7" datasource="#Application.DataSrc#">
				UPDATE #Request.prefix_db_agency#.Assessment_New SET 
					Breathing_M0490 = '#M1400#', 
					M0490_Assess = '#Chkdys#', 
					M0520_Assess = '#Chkurinecol#',
					Ostomy_for_Bowel_M0550 = '#M1630#',
					Urinary_INcont_M0520 = '#M1610#',
					Bowel_Incont_M0540 = '#M1620#'
					WHERE Assessment_ID = '#session.cs.AssessmentId#'
			   </cfquery>
		  <cfreturn 'step8'>
	</cffunction>
	
		<cffunction name="recertupin8" access="remote" returntype="string">
	
				<cfargument name="M1810" required="yes" hint="Recertification Step 8">	
			     <cfargument name="M1820" required="yes" hint="Recertification Step 8">
				<cfargument name="M1830" required="yes" hint="Recertification Step 8">
				<cfargument name="M1840" required="yes" hint="Recertification Step 8">
				<cfargument name="M1850" required="yes" hint="Recertification Step 8">
				<cfargument name="M1860" required="yes" hint="Recertification Step 8">
				
		<cfquery  name="recert8" datasource="#Application.DataSrc#">
				UPDATE #Request.prefix_db_agency#.Assessment_New SET 
					Dress_Upper_M0650 = '#M1810#',
					Dress_Lower_M0660 = '#M1820#',
					Bathing_M0670 = '#M1830#',
					M1840_Toilet = '#M1840#',
					Transferring_M0690 = '#M1850#',
					Ambulation_M0700 = '#M1860#'
					WHERE Assessment_ID = '#session.cs.AssessmentId#'
			   </cfquery>
		  <cfreturn 'step9'>
	</cffunction>
	
	
	<cffunction name="recertupin9" access="remote" returntype="string">
	
				<cfargument name="chkNA" required="yes" hint="Recertification Step 9">	
			     <cfargument name="chkWait" required="yes" hint="Recertification Step 9">
				<cfargument name="M2030" required="yes" hint="Recertification Step 9">
				<cfargument name="txtTher" required="yes" hint="Recertification Step 9">
				<cfargument name="dateass" required="yes" hint="Recertification Step 9">
				<cfargument name="M0230update" required="yes" hint="SOC M0230 Diagnosis Update">
				
				<cfquery  name="recert9" datasource="#Application.DataSrc#">
						UPDATE #Request.prefix_db_agency#.Assessment_New SET 
							<cfif len(#txtTher#) GT 0>
								M0826_Ther_Need = '#txtTher#',
								<cfelse>
								M0826_Ther_Need = 0,
							</cfif>
							
							M0826_NA = '#chkNA#',
							Waiting_For_Eval = '#chkWait#',
							Assessment_Completed_M0090 = #CreateODBCDate(dateass)#,
							Inject_Meds_M0800 ='#M2030#'
							
							WHERE Assessment_ID = '#session.cs.AssessmentId#'
			</cfquery>
		
			<cfif M0230update NEQ "">
			<cfloop index="First" list="#M0230update#" delimiters="!">
			<cfset Secondcount=0>
			<cfloop index="Second1" list="#First#" delimiters="-">
			<cfset Secondcount=Secondcount+1>
			<cfif Secondcount eq 1>
			<cfset Id=#Second1#>
			</cfif>
			<cfif Secondcount eq 2>
			<cfset severity=#Second1#>
			</cfif>
			<cfif Secondcount eq 3>
			<cfset dxorder=#Second1#>
			</cfif>
			<cfif Secondcount eq 4>
			<cfset primary=#Second1#>
			</cfif>
			<cfif Secondcount eq 5>
			<cfset secondary=#Second1#>
			</cfif>
			</cfloop>
				<cfoutput>
			<cfquery  name="M1020upd" datasource="#Application.DataSrc#">
			UPDATE IGNORE  #Request.prefix_db_agency#.Diagnosis SET Severity='#severity#',Primary_Diagnosis='#primary#',Secondary_Diagnosis='#secondary#',
			Dx_Order = '#dxorder#' where diagnosis.Assessment_ID=#session.cs.AssessmentId# and Diagnosis_ID=#Id#	
			</cfquery>
			</cfoutput>
			
			<cfset Secondcount=0>
			<cfset Id=''>
			<cfset severity=''>
			<cfset dxorder=''>
			<cfset primary=''>
			<cfset secondary=''>
			
			</cfloop>
			</cfif>
			   
		  <cfreturn 'Final'>	
	</cffunction>
	
	<cffunction  name="M0230Diagnosis" access="remote" returntype="string">
		<cfargument name="DiagnosisID" required="yes" hint="SOC M0230 Diagnosis">
		<cfargument name="M0230Primary" required="yes" hint="SOC M0230 Diagnosis">
		<cfargument name="M0230Secondary" required="yes" hint="SOC M0230 Diagnosis">
		<cfargument name="M0230Severity" required="yes" hint="SOC M0230 Diagnosis">
		<cfargument name="M0230Onset" required="yes" hint="SOC M0230 Diagnosis">
		
		<cfset DupDiagnosis="M0230">
		<cfset m02301='#session.cs.AssessmentId#'&' M0230'>
		
		<cfquery  name="AssID" datasource="#Application.DataSrc#">
		Select Assessment_Tracker_ID,Patient_ID,Agency_ID From #Request.prefix_db_agency#.Assessment_New where Assessment_ID= '#session.cs.AssessmentId#'
		</cfquery>
		
		<cfquery  name="new" datasource="#Application.DataSrc#">
     SELECT Assessment_Completed_M0090 FROM #Request.prefix_db_agency#.Assessment_New where Assessment_ID = '#session.cs.AssessmentId#'
        </cfquery>
		<cfif new.Assessment_Completed_M0090 gt '2015-09-30'>
		<cfquery  name="M0230fetch" datasource="#Application.DataSrc#">	    
			<cfsetting requesttimeout="1000">
				select Diagnosis,ICD,Code_Type,Pathway_Type,Short_Diagnosis,Other_DG from #Request.prefix_db_lookup#.Dx_list_ICD10 WHERE 
					Dx_list_ICD10.id=#DiagnosisID# 	
			</cfquery>
		<cfelse>
		<cfquery  name="M0230fetch" datasource="#Application.DataSrc#">	    
			select Diagnosis,ICD,Code_Type,Pathway_Type,Short_Diagnosis,Other_DG from #Request.prefix_db_lookup#.Diagnosis_List WHERE 
			Diagnosis_List.id=#DiagnosisID# 	
		</cfquery>
		</cfif>
		
		<cfquery  name="M0230count" datasource="#Application.DataSrc#">	     	   
	     select Count(diagnosis.Diagnosis_ID) as M0230RecordCount from #Request.prefix_db_agency#.Diagnosis where 
		diagnosis.Assessment_ID='#session.cs.AssessmentId#' and diagnosis.Diagnosis LIKE '%#M0230fetch.Diagnosis#%' 
		and M0230_Link LIKE '%#m02301#%'
		</cfquery>
		

		<cfif M0230count.M0230RecordCount eq 0>	
		
		<cfquery  name="M0230Insert" datasource="#Application.DataSrc#">
		INSERT INTO #Request.prefix_db_agency#.Diagnosis(Assessment_ID,Assessment_Tracker_ID,Patient_ID,Agency_ID,Diagnosis,ICD,Code_Type,Pathway_Type,
		Short_Diagnosis,Text_ICD,M0230_Link,Severity,Primary_Diagnosis,Secondary_Diagnosis,Dx_Order,DG_Type) VALUES 	
		('#session.cs.AssessmentId#','#AssID.Assessment_Tracker_ID#','#AssID.Patient_ID#',
		'#AssID.Agency_ID#','#M0230fetch.Diagnosis#','#M0230fetch.ICD#','#M0230fetch.Code_Type#','#M0230fetch.Pathway_Type#',
		'#M0230fetch.Short_Diagnosis#','#M0230fetch.ICD#','#m02301#','#M0230Severity#','#M0230Primary#',
		'#M0230Secondary#','1','#M0230fetch.Other_DG#')		
		</cfquery>
				
		<cfset DupDiagnosis="M0230Added">
		<cfelse>
		<cfset DupDiagnosis="M0230DUP">		
		</cfif>		
       
    <cfreturn DupDiagnosis>
    </cffunction>
	
	<cffunction  name="M0230Delete" access="remote" returntype="string">
		<cfargument name="DiagnosisID" required="yes" hint="SOC M0230 Diagnosis Delete">
		<cfargument name="M0230update" required="yes" hint="SOC M0230 Diagnosis Update"> 
				
		<cfquery  name="M0230Delete" datasource="#Application.DataSrc#">
			 delete from #Request.prefix_db_agency#.Diagnosis where diagnosis.Assessment_ID=#session.cs.AssessmentId# and Diagnosis_ID=#DiagnosisID#
		</cfquery>
		
		<cfloop index="First" list="#M0230update#" delimiters="!">
		<cfset Secondcount=0>
		<cfloop index="Second1" list="#First#" delimiters="-">
		<cfset Secondcount=Secondcount+1>
		<cfif Secondcount eq 1>
		<cfset Id=#Second1#>
		</cfif>
		<cfif Secondcount eq 2>
		<cfset severity=#Second1#>
		</cfif>
		<cfif Secondcount eq 3>
		<cfset dxorder=#Second1#>
		</cfif>
		<cfif Secondcount eq 4>
		<cfset primary=#Second1#>
		</cfif>
		<cfif Secondcount eq 5>
		<cfset secondary=#Second1#>
		</cfif>
		</cfloop>
		
		<cfoutput>
		<cfquery  name="M1020upd" datasource="#Application.DataSrc#">
		 UPDATE IGNORE  #Request.prefix_db_agency#.Diagnosis SET Severity='#severity#',Primary_Diagnosis='#primary#',Secondary_Diagnosis='#secondary#',
		 Dx_Order = '#dxorder#' where diagnosis.Assessment_ID=#session.cs.AssessmentId# and Diagnosis_ID=#Id#	
		</cfquery>
		</cfoutput>
		
		<cfset Secondcount=0>
		<cfset Id=''>
		<cfset severity=''>
		<cfset dxorder=''>
		<cfset primary=''>
		<cfset secondary=''>
		
		</cfloop>
       
    <cfreturn 'M0230Delete'>
    </cffunction>
	
	<cffunction  name="StartCareUPRisk" access="remote" returntype="string">
			<cfargument name="drlPresureUlcersSensory" required="yes" hint="SOC Step Risk">
			<cfargument name="drlPresureUlcersMoisture" required="yes" hint="SOC Step Risk">
			<cfargument name="drlPresureUlcersActivity" required="yes" hint="SOC Step Risk">
			<cfargument name="drlPresureUlcersMobility" required="yes" hint="SOC Step Risk">
			<cfargument name="drlPresureUlcersNutrition" required="yes" hint="SOC Step Risk">
			<cfargument name="drlPresureUlcersFriction" required="yes" hint="SOC Step Risk">
			 <cfquery  name="RiskForm" datasource="#Application.DataSrc#">
					UPDATE #Request.prefix_db_agency#.Assessment_New SET
					Braden_1_Sensory='#drlPresureUlcersSensory#',
					Braden_2_Moisture='#drlPresureUlcersMoisture#',
					Braden_3_Activity='#drlPresureUlcersActivity#',
					Braden_4_Mobility='#drlPresureUlcersMobility#',
					Braden_5_Nutrition='#drlPresureUlcersNutrition#',
					Braden_6_Friction='#drlPresureUlcersFriction#'
			  		Where Assessment_New.Assessment_ID= '#session.cs.AssessmentId#'
			</cfquery>       
        <cfreturn 'Risk'>
    </cffunction>
	
	<cffunction name="StartCareUPWound" access="remote" returntype="string">
			<cfargument name="wndtype" required="yes" hint="SOC Step Wound">
			<cfargument name="wndsurr" required="yes" hint="SOC Step Wound">
			<cfargument name="wndchar" required="yes" hint="SOC Step Wound">
			<cfargument name="location" required="yes" hint="SOC Step Wound">
			<cfargument name="stage" required="yes" hint="SOC Step Wound">
			<cfargument name="status" required="yes" hint="SOC Step Wound">
			<cfargument name="lengh1" required="yes" hint="SOC Step Wound">
			<cfargument name="lengh2" required="yes" hint="SOC Step Wound">
			<cfargument name="width1" required="yes" hint="SOC Step Wound">
			<cfargument name="width2" required="yes" hint="SOC Step Wound">
			<cfargument name="depth1" required="yes" hint="SOC Step Wound">
			<cfargument name="depth2" required="yes" hint="SOC Step Wound">
			<cfargument name="notes" required="yes" hint="SOC Step Wound">
			
			<cfset WS=replace(wndsurr,'!',',','All') />
			<cfset WC=replace(wndchar,'!',',','All') />
			
			<cfquery  name="InsertPathway" datasource="#Application.DataSrc#">
			INSERT INTO #Request.prefix_db_agency#.Pathway_Details(Agency_ID,Patient_ID,Assessment_ID,Description,Type,Skill,Care_PathWay) VALUES                      ('#session.AgencyId#','#session.cs.patientid#','#session.cs.AssessmentId#','#wndtype#','Wound','SSN','25')
			</cfquery>
			<cfquery  name="LastPath" datasource="#Application.DataSrc#">
					select LAST_INSERT_ID() as keyvalue
			</cfquery>   
						          
		   <cfquery  name="WoundForm1" datasource="#Application.DataSrc#">
				   insert into #Request.prefix_db_agency#.PatientVisitDetails
				    			(Wnd_Type,
								Wnd_Location,
								Wnd_Stage,
								Wnd_Status,
								Wnd_Len_1,
								Wnd_Len_2,
								Wnd_Wid_1,
								Wnd_Wid_2,
								Wnd_Dep_1,
								Wnd_Dep_2,
								Wnd_Surr_Tiss,
								Wnd_Chara,
								Notes,
								Agency_ID,
								Patient_ID,
								Assessment_ID,
								Record_Creation_Date,
								Pathway_Details_ID)
								values('#wndtype#',
									   '#location#',
									   '#stage#',
									   '#status#',
									   '#lengh1#',
									   '#lengh2#',
									   '#width1#',
									   '#width2#',
									   '#depth1#',                         								                                   	   '#depth2#',
									   '#WS#',
									   '#WC#',
									   '#notes#',
									   '#session.AgencyId#',									   			                                       '#session.cs.patientid#',
									   '#session.cs.AssessmentId#',
									   '#DateFormat(now(),"yyyy-mm-dd")#',
									   '#LastPath.keyvalue#')                                 
		   </cfquery>
		      <cfquery  name="ViewWnd" datasource="#Application.DataSrc#">
			SELECT count(Wnd_Type) as CouNt from #Request.prefix_db_agency#.PatientVisitDetails 
			where Patient_ID='#session.cs.patientid#' and Assessment_ID='#session.cs.AssessmentId#' 
			and Wnd_Location<>'' and Wnd_Type<>''
		   </cfquery>
		   <cfoutput><cfset cookie.WoundCount='#ViewWnd.CouNt#'></cfoutput>
        <cfreturn 'Wound'>
     </cffunction>
	 
	 
	 <cffunction  name="WoundDelete" access="remote" returntype="string">
		<cfargument name="WoundID" required="yes" hint="SOC Wound Delete">		
				
		<cfquery  name="WoundDelete" datasource="#Application.DataSrc#">
			   delete from #Request.prefix_db_agency#.PatientVisitDetails where Progress_Details_ID='#WoundID#'
		</cfquery>
    <cfreturn 'WoundDel'>
    </cffunction>
	
	<cffunction  name="Medication" access="remote" returntype="string">
		<cfargument name="tradeid" required="yes" hint="SOC Medication">
		<cfargument name="doseid" required="yes" hint="SOC Medication">
						
		 <cfquery  name="MDose" datasource="#Application.DataSrc#"> 
		 SELECT Dose FROM #Request.prefix_db_lookup#.meds_new_dose WHERE Dose_ID='#doseid#'
		 </cfquery>
		 <cfquery  name="MName" datasource="#Application.DataSrc#">
		 SELECT Name FROM #Request.prefix_db_lookup#.meds_new WHERE Trade_ID='#tradeid#'
		 </cfquery>
		  
		 <cfif MDose.Dose NEQ '' and MName.Name NEQ ''>	
		 <cfquery  name="Insertpatientmeds" datasource="#Application.DataSrc#">
		 INSERT INTO #Request.prefix_db_agency#.PatientMeds(Patient_ID,Medication_ID,Drug_Name,Dose,DateOrdered,Med_Status) VALUES 	
				('#session.cs.patientid#','#tradeid#','#MName.Name#','#MDose.Dose#',CURDATE(),'active') 
		 </cfquery>
		 </cfif>
		
    <cfreturn 'AMedication'>
    </cffunction>
	
	<cffunction  name="MedicationOwn1" access="remote" returntype="string">
		<cfargument name="typeown1" required="yes" hint="SOC Medication">
		
						
		<cfif typeown1 EQ '????'> 
		<cfquery  name="Insertpatientmeds" datasource="#Application.DataSrc#">
		   INSERT INTO #Request.prefix_db_agency#.PatientMeds(Patient_ID,Drug_Name,DateOrdered) VALUES ('#session.cs.patientid#','????',CURDATE()) 
		</cfquery>
		</cfif>
		
    <cfreturn 'ATypeOwn1'>
    </cffunction>
	
	
	<cffunction  name="MedicationOwn2" access="remote" returntype="string">		
		<cfargument name="tradeid" required="yes" hint="SOC Medication">
								
		<cfif tradeid NEQ ''>	      
	       <cfquery  name="TypeMName" datasource="#Application.DataSrc#">
			 SELECT Name FROM #Request.prefix_db_lookup#.meds_new WHERE Trade_ID='#tradeid#'
		   </cfquery>			 			 
		   <cfquery  name="InsertTypepatientmeds" datasource="#Application.DataSrc#">
			 INSERT INTO #Request.prefix_db_agency#.PatientMeds(Patient_ID,Medication_ID,Drug_Name,DateOrdered,Med_Status) VALUES 	
					('#session.cs.patientid#','#tradeid#','#TypeMName.Name#',CURDATE(),'active') 
		   </cfquery>
	    </cfif>
		
    <cfreturn 'ATypeOwn2'>
    </cffunction>
	
	
	<cffunction  name="UpMedication" access="remote" returntype="string">		
		<cfargument name="hdnPatientMedsID" required="yes" hint="SOC Update Medication">
		<cfargument name="hdnPatientMedsUpdate" required="yes" hint="SOC Update Medication">
		<cfargument name="hdnPatientMedsInsert" required="yes" hint="SOC Update Medication">
		
		<cfif isdefined('hdnPatientMedsID') and isdefined('hdnPatientMedsInsert') and isdefined('hdnPatientMedsUpdate')>
		
		<cfif hdnPatientMedsID neq ''>
		<cfquery  name="DeletePatientMedsID" datasource="#Application.DataSrc#">
		delete from #Request.prefix_db_agency#.PatientMeds where Patient_ID='#session.cs.patientid#' and PatientMeds_ID not in(#hdnPatientMedsID#)
		</cfquery>
		</cfif>
		
		<cfif hdnPatientMedsUpdate NEQ "">
		<cfloop index="ContentUpdate" list ='#hdnPatientMedsUpdate#' delimiters=",">
		
		<cfset Medscount=0>
		<cfloop index="PatientMedsUpdate" list=#ContentUpdate# delimiters="*~*">
		<cfset Medscount=Medscount+1>
		
		
		<cfif Medscount EQ 1>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset Pmedid=''>
		<cfelse>
		<cfset Pmedid=#PatientMedsUpdate#>
		</cfif>
		</cfif>
				 
		<cfif Medscount EQ 2>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset PName=''>
		<cfelse>
		<cfset PName=#PatientMedsUpdate#>
		</cfif>
		</cfif>
		
		<cfif Medscount EQ 3>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset PDose=''>
		<cfelse>
		<cfset PDose=#PatientMedsUpdate#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 4>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset PUnitType=''>
		<cfelse>
		<cfset PUnitType=#PatientMedsUpdate#>
		</cfif>	
		</cfif>
		
		<cfif Medscount EQ 5>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset PRoute=''>
		<cfelse>
		<cfset PRoute=#PatientMedsUpdate#>
		</cfif>	
		</cfif>
		
		<cfif Medscount EQ 6>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset PFreq=''>
		<cfelse>
		<cfset PFreq=#PatientMedsUpdate#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 7>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset PNotes=''>
		<cfelse>
		<cfset PNotes=#PatientMedsUpdate#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 8>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset POrdered=''>
		<cfelse>
		<cfset POrdered=#PatientMedsUpdate#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 9>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset PDiscontinued=''>
		<cfelse>
		<cfset PDiscontinued=#PatientMedsUpdate#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 10>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset PTnewChange=''>
		<cfelse>
		<cfset PTnewChange=#PatientMedsUpdate#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 11>
		<cfif PatientMedsUpdate EQ '00'>
		<cfset Pactive=''>
		<cfelse>
		<cfset Pactive=#PatientMedsUpdate#>
		</cfif>	
		</cfif>			 
		</cfloop> 
			
		 
		<cfquery  name="UpdatePatientMeds" datasource="#Application.DataSrc#">
		UPDATE #Request.prefix_db_agency#.PatientMeds SET Notes='#PNotes#',Med_Status='#Pactive#',DateOrdered=<cfif POrdered EQ ''>NULL<cfelse>
		'#DateFormat(POrdered,"yyyy-mm-dd")#'</cfif>,Dose='#PDose#',Route='#PRoute#', Freq='#PFreq#',Drug_Name='#PName#',
		DateDCed=<cfif PDiscontinued EQ ''>NULL<cfelse>'#DateFormat(PDiscontinued,"yyyy-mm-dd")#'</cfif>
		,Dose_Units='#PUnitType#',NewChanged='#PTnewChange#' WHERE Patient_ID='#session.cs.patientid#' and
		PatientMeds_ID='#Pmedid#' 
		</cfquery>
		<cfset Medscount=0>
		</cfloop>
		</cfif>
		
		<cfif hdnPatientMedsInsert NEQ "00*~*00*~*00*~*00*~*00*~*00*~*00*~*00*~*00*~*00*~*active" and hdnPatientMedsInsert NEQ ''>
		<cfloop index="ContentInsert" list ='#hdnPatientMedsInsert#' delimiters=",">
		<cfif ContentInsert NEQ "00*~*00*~*00*~*00*~*00*~*00*~*00*~*00*~*00*~*00*~*active">		
		<cfset Medscount=0>
		<cfloop index="PatientMedsInsert" list=#ContentInsert# delimiters="*~*">
		<cfset Medscount=Medscount+1>
		
		
		<cfif Medscount EQ 1>
		<cfif PatientMedsInsert EQ '00'>
		<cfset Pmedid=''>
		<cfelse>
		<cfset Pmedid=#PatientMedsInsert#>
		</cfif>
		</cfif>
				 
		<cfif Medscount EQ 2>
		<cfif PatientMedsInsert EQ '00'>
		<cfset PName=''>
		<cfelse>
		<cfset PName=#PatientMedsInsert#>
		</cfif>
		</cfif>
		
		<cfif Medscount EQ 3>
		<cfif PatientMedsInsert EQ '00'>
		<cfset PDose=''>
		<cfelse>
		<cfset PDose=#PatientMedsInsert#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 4>
		<cfif PatientMedsInsert EQ '00'>
		<cfset PUnitType=''>
		<cfelse>
		<cfset PUnitType=#PatientMedsInsert#>
		</cfif>	
		</cfif>
		
		<cfif Medscount EQ 5>
		<cfif PatientMedsInsert EQ '00'>
		<cfset PRoute=''>
		<cfelse>
		<cfset PRoute=#PatientMedsInsert#>
		</cfif>	
		</cfif>
		
		<cfif Medscount EQ 6>
		<cfif PatientMedsInsert EQ '00'>
		<cfset PFreq=''>
		<cfelse>
		<cfset PFreq=#PatientMedsInsert#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 7>
		<cfif PatientMedsInsert EQ '00'>
		<cfset PNotes=''>
		<cfelse>
		<cfset PNotes=#PatientMedsInsert#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 8>
		<cfif PatientMedsInsert EQ '00'>
		<cfset POrdered=''>
		<cfelse>
		<cfset POrdered=#PatientMedsInsert#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 9>
		<cfif PatientMedsInsert EQ '00'>
		<cfset PDiscontinued=''>
		<cfelse>
		<cfset PDiscontinued=#PatientMedsInsert#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 10>
		<cfif PatientMedsInsert EQ '00'>
		<cfset PTnewChange=''>
		<cfelse>
		<cfset PTnewChange=#PatientMedsInsert#>
		</cfif>	 
		</cfif>
		
		<cfif Medscount EQ 11>
		<cfif PatientMedsInsert EQ '00'>
		<cfset Pactive=''>
		<cfelse>
		<cfset Pactive=#PatientMedsInsert#>
		</cfif>	
		</cfif>			 
		</cfloop>	 
		
		
		<cfquery  name="InsertPatientMeds" datasource="#Application.DataSrc#">
		INSERT INTO #Request.prefix_db_agency#.PatientMeds(Patient_ID,Notes,Med_Status,DateOrdered,Dose,Route,Freq,Drug_Name,DateDCed,Dose_Units,NewChanged)
		VALUES ('#session.cs.patientid#','#PNotes#','#Pactive#',<cfif POrdered EQ ''>NULL<cfelse>'#DateFormat(POrdered,"yyyy-mm-dd")#'
		</cfif>,'#PDose#','#PRoute#','#PFreq#','#PName#',<cfif PDiscontinued EQ ''>NULL<cfelse>
		'#DateFormat(PDiscontinued,"yyyy-mm-dd")#'</cfif>,'#PUnitType#','#PTnewChange#') 
		</cfquery>
		
		<cfset Medscount=0>
		</cfif>	  
		</cfloop>
		</cfif>
		
		
		
		</cfif>
								
		
		
    <cfreturn 'AUpMedication'>
    </cffunction>
	
</cfcomponent>