
<!--Doubt fields-> gHHA_Record_Padding,  M0246(it is not in db) , HIPPS_Code_Text >
-->
<!--- Palani continue values --->
<cfset M0190 ="" />
<cfset M1012 ="" />
<cfset M0210 ="" />
<!--- --->
<cfquery name="Assessment_New" datasource="#Application.DataSrc#">
SELECT Assessment_Completed_M0090,Assessment_Reason_M0100,
	   Emergent_Care_M0830,Emergent_Care_Reason_M0840,
	   Inpatient_Facility_M0855,Discharge_Disposition_M0870,
	   After_Discharge_Services_M0880,Hospital_Reason_M0890,
	   Hospital_Reason_List_M0895,Nursing_Home_M0900,
	   Date_Most_Recent_M0903,Date_Discharge_M0906,
	   Agency_ID,M0110,M0826_NA,M0826_Ther_Need,
	   Discharged_From_M0175,M0102_Physician_SOC,
	   M0104_Date_of_Referral,M1012_Inpat_DX_NA,
	   M1012_Inpat_DX_UK,M1016_DX_NA,M1032_Frailty,
	   Rehab_Prognosis_M0270,Hearing_M0400,M1220_Verbal_Under,
	   M1240_Pain_Assess,Freq_of_Pain_M0420,M1300_Pressure,
	   M1302_Pressure,M1306_Unhealed_Pressure,
	   Pressure_Ulcer_b_M0450,Pressure_Ulcer_c_M0450,
	   Pressure_Ulcer_d_M0450,Pressure_Ulcer_e_M0450,
	   M1308_d_2_Pressure,M1308_d_3_Pressure,M1310_1,
	   M1310_Length,M1312_Width,M1312_1,M1314_Depth,
	   M1314_1,Pressure_Ulcer_Status_M0464,
	   Stasis_Ulcer_M0468,Stasis_Ulcer_Num_M0470,
	   Stasis_Ulcer_Status_M0476,Surgical_Wound_M0482,
	   Surgical_Wound_Status_M0488,M1350_Other_Wounds,
	   Urinary_INcont_M0520,Urinary_INcont_when_M0530,
	   M1730_Depression,M1730a,M1730b,Bathing_M0670,
	   M1840_Toilet,M1845_Toilet,Transferring_M0690,
	   Ambulation_M0700,M0826_NA,M1900a_SelfCare,M1900b_Amb,
	   M1900c_Transfer,M1900d_House,M1910_Fall_Risk,M2000_Adverse,
	   M2002_Med_FU,M2010_Med_Edu,Oral_Meds_M0780,Inject_Meds_M0800,
	   HIPPS_Code,Oral_Meds_M0780p,Inject_Meds_m0800p,M2100a_Equip,
	   M2100b_Equip,M2100c_Equip,M2100d_Equip,M2100e_Equip,M2100f_Equip,
	   M2100g_Equip,M2110_Assist_Freq,M2250a_PhysNot,M2250b_Diabetic,
  	   M2250c_FallsPrev,M2250d_Depress,M2250e_Pain,M2250f_PressUlc,
  	   M2250g_PressUlcMoist,Patient_ID
FROM 
	   #Request.prefix_db_agency#.Assessment_New 
WHERE  Assessment_ID='158482'
</cfquery>

<cfquery name="Datasets" datasource="#Application.DataSrc#">
SELECT HHA_Record_Data
FROM   #Request.prefix_db_agency#.Datasets 
WHERE  Assessment_ID='158482'
</cfquery>

<cfquery name="Agency" datasource="#Application.DataSrc#">
SELECT Natl_Provider_ID
FROM #Request.prefix_db_lookup#.Agency
WHERE Agency_ID='#Assessment_New.Agency_ID#'
</cfquery>

<cfquery name="Diagnosis" datasource="#Application.DataSrc#">
SELECT M0245_ICD
FROM	#Request.prefix_db_agency#.Diagnosis
WHERE Assessment_ID='158482' limit 0,1
</cfquery>

<cfquery name="patient" datasource="#Application.DataSrc#">
SELECT M1100_Living_Situation
FROM   #Request.prefix_db_agency#.patient
WHERE Patient_ID='#Assessment_New.Patient_ID#'
</cfquery>

<cfset OASIS_Version_Code_1="" />


<!--Values from previous script-->
<cfset HHA_Record_Data="" />

<cfset gHHA_Record_Padding="" />
<!--End--->
<cfset Assessment_Completed_M0090 = "" />
<cfset Assessment_Reason_M0100 = "" />
<cfset Emergent_Care_M0830 = "" />
<cfset Emergent_Care_Reason_M0840 = "" />
<cfset Inpatient_Facility_M0855 = "" />
<cfset Discharge_Disposition_M0870 = "" />
<cfset After_Discharge_Services_M0880 = "" />
<cfset Hospital_Reason_M0890 = "" />
<cfset Hospital_Reason_List_M0895 = "" />
<cfset Nursing_Home_M0900 = "" />
<cfset Date_Most_Recent_M0903 = "" />
<cfset Date_Discharge_M0906 = "" />
<cfset Natl_Provider_ID = "" />
<cfset M0110 = "" />
<cfset M0826_NA = "" />
<cfset M0826_Ther_Need = "" />
<cfset Discharged_From_M0175 = "" />
<cfset M0102_Physician_SOC = "" />
<cfset M0246 = "" />
<cfset M0104_Date_of_Referral = "" />
<cfset M1012_Inpat_DX_NA = "" />
<cfset M1012_Inpat_DX_UK = "" />
<cfset M1016_DX_NA = "" />
<cfset M1032_Frailty = "" />
<cfset Rehab_Prognosis_M0270 = "" />
<cfset M1100_Living_Situation = "" />
<cfset Hearing_M0400 = "" />
<cfset M1220_Verbal_Under = "" />
<cfset M1240_Pain_Assess = "" />
<cfset Freq_of_Pain_M0420 = "" />
<cfset M1300_Pressure = "" />
<cfset M1302_Pressure = "" />
<cfset M1306_Unhealed_Pressure = "" />
<cfset Pressure_Ulcer_b_M0450 = "" />
<cfset Pressure_Ulcer_c_M0450 = "" />
<cfset Pressure_Ulcer_d_M0450 = "" />
<cfset Pressure_Ulcer_e_M0450 = "" />
<cfset M1308_d_2_Pressure = "" />
<cfset M1308_d_3_Pressure = "" />
<cfset M1310_1 = "" />
<cfset M1310_Length = "" />
<cfset M1312_Width = "" />
<cfset M1312_1 = "" />
<cfset M1314_Depth = "" />
<cfset M1314_1 = "" />
<cfset Pressure_Ulcer_Status_M0464 = "" />
<cfset Stasis_Ulcer_M0468 = "" />
<cfset Stasis_Ulcer_Num_M0470 = "" /> 
<cfset Stasis_Ulcer_Status_M0476 = "" />
<cfset Surgical_Wound_M0482 = "" />
<cfset Surgical_Wound_Status_M0488 = "" />
<cfset M1350_Other_Wounds = "" />
<cfset Urinary_INcont_M0520 = "" />
<cfset Urinary_INcont_when_M0530 = "" />
<cfset M1730_Depression = "" />
<cfset M1730a = "" />
<cfset M1730b = "" />
<cfset Bathing_M0670 = "" />
<cfset M1840_Toilet = "" />
<cfset M1845_Toilet = "" />
<cfset Transferring_M0690 = "" />
<cfset Ambulation_M0700 = "" />
<cfset M0826_NA = "" />
<cfset M1900a_SelfCare ="" />
<cfset M1900b_Amb = "" />
<cfset M1900c_Transfer = "" />
<cfset M1900d_House = "" />
<cfset M1910_Fall_Risk = "" />
<cfset M2000_Adverse = "" />
<cfset M2002_Med_FU = "" />
<cfset M2010_Med_Edu = "" />
<cfset Oral_Meds_M0780 = "" />
<cfset Inject_Meds_M0800 = "" />
<cfset HIPPS_Code = "" />
<cfset Oral_Meds_M0780p = "" />
<cfset Inject_Meds_m0800p = "" />
<cfset M2100a_Equip = "" />
<cfset M2100b_Equip = "" />
<cfset M2100c_Equip = "" />
<cfset M2100d_Equip = "" />
<cfset M2100e_Equip = "" />
<cfset M2100f_Equip = "" />
<cfset M2100g_Equip = "" />
<cfset M2110_Assist_Freq ="" />
<cfset M2250a_PhysNot = "" />
<cfset M2250b_Diabetic = "" />
<cfset M2250c_FallsPrev = "" />
<cfset M2250d_Depress = "" />
<cfset M2250e_Pain = "" />
<cfset M2250f_PressUlc = "" />
<cfset M2250g_PressUlcMoist = "" />



<cfset Assessment_Completed_M0090 = Assessment_New.Assessment_Completed_M0090 />
<cfset Assessment_Reason_M0100 = Assessment_New.Assessment_Reason_M0100 />
<cfset Emergent_Care_M0830 = Assessment_New.Emergent_Care_M0830 />
<cfset Emergent_Care_Reason_M0840 = Assessment_New.Emergent_Care_Reason_M0840 />
<cfset Inpatient_Facility_M0855 = Assessment_New.Inpatient_Facility_M0855 />
<cfset Discharge_Disposition_M0870 = Assessment_New.Discharge_Disposition_M0870 />
<cfset After_Discharge_Services_M0880 = Assessment_New.After_Discharge_Services_M0880 />
<cfset Hospital_Reason_M0890 = Assessment_New.Hospital_Reason_M0890 />
<cfset Hospital_Reason_List_M0895 = Assessment_New.Hospital_Reason_List_M0895 />
<cfset Nursing_Home_M0900 = Assessment_New.Nursing_Home_M0900 />
<cfset Date_Most_Recent_M0903 = Assessment_New.Date_Most_Recent_M0903 />
<cfset Date_Discharge_M0906 = Assessment_New.Date_Discharge_M0906 />
<cfset M0110 = Assessment_New.M0110 />
<cfset M0826_NA = Assessment_New.M0826_NA />
<cfset M0826_Ther_Need = Assessment_New.M0826_Ther_Need />
<cfset Discharged_From_M0175 = Assessment_New.Discharged_From_M0175 />
<cfset M0102_Physician_SOC = Assessment_New.M0102_Physician_SOC />
<cfset M0104_Date_of_Referral = Assessment_New.M0104_Date_of_Referral />
<cfset M1012_Inpat_DX_NA = Assessment_New.M1012_Inpat_DX_NA />
<cfset M1012_Inpat_DX_UK = Assessment_New.M1012_Inpat_DX_NA />
<cfset M1016_DX_NA = Assessment_New.M1016_DX_NA />
<cfset M1032_Frailty = Assessment_New.M1032_Frailty />
<cfset Rehab_Prognosis_M0270 = Assessment_New.Rehab_Prognosis_M0270 />
<cfset Hearing_M0400 = Assessment_New.Hearing_M0400 />
<cfset M1220_Verbal_Under = Assessment_New.M1220_Verbal_Under />
<cfset M1240_Pain_Assess = Assessment_New.M1240_Pain_Assess />
<cfset Freq_of_Pain_M0420 = Assessment_New.Freq_of_Pain_M0420 />
<cfset M1300_Pressure = Assessment_New.M1300_Pressure />
<cfset M1302_Pressure = Assessment_New.M1302_Pressure />
<cfset M1306_Unhealed_Pressure = Assessment_New.M1306_Unhealed_Pressure />
<cfset Pressure_Ulcer_b_M0450 = Assessment_New.Pressure_Ulcer_b_M0450 />
<cfset Pressure_Ulcer_c_M0450 = Assessment_New.Pressure_Ulcer_c_M0450 />
<cfset Pressure_Ulcer_d_M0450 = Assessment_New.Pressure_Ulcer_d_M0450 />
<cfset Pressure_Ulcer_e_M0450 = Assessment_New.Pressure_Ulcer_e_M0450 />
<cfset M1308_d_2_Pressure = Assessment_New.M1308_d_2_Pressure />
<cfset M1308_d_3_Pressure = Assessment_New.M1308_d_3_Pressure />
<cfset M1310_1 = Assessment_New.M1310_1 />
<cfset M1310_Length = Assessment_New.M1310_Length />
<cfset M1312_Width = Assessment_New.M1312_Width />
<cfset M1312_1 = Assessment_New.M1312_1 />
<cfset M1314_Depth = Assessment_New.M1314_Depth />
<cfset M1314_1 = Assessment_New.M1314_1 />
<cfset Pressure_Ulcer_Status_M0464 = Assessment_New.Pressure_Ulcer_Status_M0464 />
<cfset Stasis_Ulcer_M0468 = Assessment_New.Stasis_Ulcer_M0468 />
<cfset Stasis_Ulcer_Num_M0470 = Assessment_New.Stasis_Ulcer_Num_M0470 /> 
<cfset Stasis_Ulcer_Status_M0476 = Assessment_New.Stasis_Ulcer_Status_M0476 />
<cfset Surgical_Wound_M0482 = Assessment_New.Surgical_Wound_M0482 />
<cfset Surgical_Wound_Status_M0488 = Assessment_New.Surgical_Wound_M0482 />
<cfset M1350_Other_Wounds = Assessment_New.M1350_Other_Wounds />
<cfset Urinary_INcont_M0520 = Assessment_New.Urinary_INcont_M0520 />
<cfset Urinary_INcont_when_M0530 = Assessment_New.Urinary_INcont_when_M0530 />
<cfset M1730_Depression = Assessment_New.M1730_Depression />
<cfset M1730a = Assessment_New.M1730a />
<cfset M1730b = Assessment_New.M1730b />
<cfset Bathing_M0670 = Assessment_New.Bathing_M0670 />
<cfset M1840_Toilet = Assessment_New.M1840_Toilet />
<cfset M1845_Toilet = Assessment_New.M1845_Toilet />
<cfset Transferring_M0690 = Assessment_New.Transferring_M0690 />
<cfset Ambulation_M0700 = Assessment_New.Ambulation_M0700 />
<cfset M0826_NA = Assessment_New.M0826_NA />
<cfset M1900a_SelfCare = Assessment_New.M1900a_SelfCare />
<cfset M1900b_Amb = Assessment_New.M1900b_Amb />
<cfset M1900c_Transfer = Assessment_New.M1900c_Transfer />
<cfset M1900d_House = Assessment_New.M1900d_House />
<cfset M1910_Fall_Risk = Assessment_New.M1910_Fall_Risk />
<cfset M2000_Adverse = Assessment_New.M2000_Adverse />
<cfset M2002_Med_FU = Assessment_New.M2002_Med_FU />
<cfset M2010_Med_Edu = Assessment_New.M2010_Med_Edu />
<cfset Oral_Meds_M0780 = Assessment_New.Oral_Meds_M0780 />
<cfset Inject_Meds_M0800 = Assessment_New.Inject_Meds_M0800 />
<cfset HIPPS_Code = Assessment_New.HIPPS_Code />
<cfset Oral_Meds_M0780p = Assessment_New.Oral_Meds_M0780p />
<cfset Inject_Meds_m0800p = Assessment_New.Inject_Meds_m0800p />
<cfset  M2100a_Equip = Assessment_New.M2100a_Equip />
<cfset  M2100b_Equip = Assessment_New.M2100b_Equip />
<cfset  M2100c_Equip = Assessment_New.M2100c_Equip />
<cfset  M2100d_Equip = Assessment_New.M2100d_Equip />
<cfset  M2100e_Equip = Assessment_New.M2100e_Equip />
<cfset  M2100f_Equip = Assessment_New.M2100f_Equip />
<cfset  M2100g_Equip = Assessment_New.M2100g_Equip />
<cfset M2110_Assist_Freq = Assessment_New.M2110_Assist_Freq />
<cfset M2250a_PhysNot = Assessment_New.M2250a_PhysNot />
<cfset M2250b_Diabetic = Assessment_New.M2250b_Diabetic />
<cfset M2250c_FallsPrev = Assessment_New.M2250c_FallsPrev />
<cfset M2250d_Depress = Assessment_New.M2250d_Depress />
<cfset M2250e_Pain = Assessment_New.M2250e_Pain />
<cfset M2250f_PressUlc = Assessment_New.M2250f_PressUlc />
<cfset M2250g_PressUlcMoist = Assessment_New.M2250g_PressUlcMoist />


<cfset M0246 = Diagnosis.M0245_ICD />
<cfset Natl_Provider_ID = Agency.Natl_Provider_ID />
<cfset M1100_Living_Situation = patient.M1100_Living_Situation />


<cfloop from="1" to="2101" index="i">
		<cfset gHHA_Record_Padding= gHHA_Record_Padding & " " />
</cfloop>


<!--=================================================================================================================================================				                                                      Create Data Record thru 682-698 M0855 Dataset
==================================================================================================================================================-->


<cfset CheckDate="12/31/2009" />
<cfif Assessment_Completed_M0090 gt CheckDate>
	<cfset OASIS_Version_Code_1 = "C-072009" />
<cfelse>
	<cfset OASIS_Version_Code_1 = "B1-1202" />
</cfif>

<!---#Append M0830 None --->
<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and ( Assessment_Reason_M0100.indexOf("6 - ") neq "-1" or Assessment_Reason_M0100.indexOf("7 - ") neq "-1" or Assessment_Reason_M0100.indexOf("9 - ") neq "-1") >
	<cfif Emergent_Care_M0830.indexOf("0") neq "-1">
		<cfset HHA_Record_Data=HHA_Record_Data & "1" />
	<cfelse>
		<cfset HHA_Record_Data=HHA_Record_Data & "0" />
	</cfif>
<cfelse>
	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>
	
<!--- #Append M0830 Emr Room --->

<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and  (Assessment_Reason_M0100.indexOf("6 - ") neq "-1" or Assessment_Reason_M0100.indexOf("7 - ") neq "-1" or Assessment_Reason_M0100.indexOf("9 - ") neq "-1") >
		<cfif Emergent_Care_M0830.indexOf("1") neq "-1">
			<cfset HHA_Record_Data=HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data=HHA_Record_Data & "0" />
		</cfif>
<cfelse>	
		<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />		
</cfif>
		
<!--- #Append M0830 MD OFF --->

<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and  Assessment_Reason_M0100.indexOf("6 - ") neq "-1" or Assessment_Reason_M0100.indexOf("7 - ") neq "-1" or Assessment_Reason_M0100.indexOf("9 - ") neq "-1" >
		<cfif Emergent_Care_M0830.indexOf("2") neq "-1">
			<cfset HHA_Record_Data=HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data=HHA_Record_Data & "0" />
		</cfif>
<cfelse>		
		<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>
		
<!--- #Append M0830 OUT  --->

<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and  Assessment_Reason_M0100.indexOf("6 - ") neq "-1" or Assessment_Reason_M0100.indexOf("7 - ") neq "-1" or Assessment_Reason_M0100.indexOf("9 - ") neq "-1" >
		<cfif Emergent_Care_M0830.indexOf("3") neq "-1">
			<cfset HHA_Record_Data=HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data=HHA_Record_Data & "0" />
		</cfif>
<cfelse>		
		<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>
		
<!--- #Append M0830 Unknown  --->

<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and  Assessment_Reason_M0100.indexOf("6 - ") neq "-1" or Assessment_Reason_M0100.indexOf("7 - ") neq "-1" or Assessment_Reason_M0100.indexOf("9 - ") neq "-1" >
		<cfif Emergent_Care_M0830.indexOf("UK ") neq "-1">
			<cfset HHA_Record_Data=HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data=HHA_Record_Data & "0" />
		</cfif>
<cfelse>		
		<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>

<!--- #Decide process for M0840 --->

<cfif (Assessment_Reason_M0100.indexOf("6 - ") neq "-1" or Assessment_Reason_M0100.indexOf("7 - ") neq "-1" or Assessment_Reason_M0100.indexOf("9 - ") neq "-1") and (Emergent_Care_M0830.indexOf("1") neq "-1" or Emergent_Care_M0830.indexOf("2") neq "-1")>

	<cfif Emergent_Care_Reason_M0840.indexOf("1 - ") neq "-1">
		<cfset HHA_Record_Data=HHA_Record_Data & "1" />
	<cfelse>
		<cfset HHA_Record_Data=HHA_Record_Data & "0" />
	</cfif>
	
	<!--- #Append M0840 Nausea --->
	
	<cfif OASIS_Version_Code_1.indexOf("B") neq "-1">
		<cfif Emergent_Care_Reason_M0840.indexOf("2 - ") neq "-1">
			<cfset HHA_Record_Data=HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data=HHA_Record_Data & "0" />
		</cfif>
	 <cfelse>
	 	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
	 </cfif>
	 
	 <!---#Append M0840 Injury --->
	 
	 <cfif OASIS_Version_Code_1.indexOf("B") neq "-1">
		<cfif Emergent_Care_Reason_M0840.indexOf("3 - ") neq "-1">
			<cfset HHA_Record_Data=HHA_Record_Data & "1" />
		 <cfelse>
			<cfset HHA_Record_Data=HHA_Record_Data & "0" />
		 </cfif>
	  <cfelse>
	 	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
	  </cfif>
	 
	 <!---#Append M0840 Resp --->
	 
	 <cfif OASIS_Version_Code_1.indexOf("B") neq "-1">
		<cfif Emergent_Care_Reason_M0840.indexOf("4 - ") neq "-1">
			<cfset HHA_Record_Data=HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data=HHA_Record_Data & "0" />
		</cfif>
	  <cfelse>
	 	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
	  </cfif>	 
	 
	 <!---#Append M0840 Wound --->
	 
	 <cfif OASIS_Version_Code_1.indexOf("B") neq "-1">
		 <cfif Emergent_Care_Reason_M0840.indexOf("5 - ") neq "-1">
			<cfset HHA_Record_Data=HHA_Record_Data & "1" />
		 <cfelse>
			<cfset HHA_Record_Data=HHA_Record_Data & "0" />
		 </cfif>
	  <cfelse>
	 	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
	  </cfif>	
	 
	  <!---#Append M0840 Cardiac  ---->
	 
	  <cfif OASIS_Version_Code_1.indexOf("B") neq "-1">
		<cfif Emergent_Care_Reason_M0840.indexOf("6 - ") neq "-1">
			<cfset HHA_Record_Data=HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data=HHA_Record_Data & "0" />
		</cfif>
	  <cfelse>
	 	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
	  </cfif>	
	 
	  <!--- #693-693 Append M0840 Hypo --->
	 
	  <cfif Emergent_Care_Reason_M0840.indexOf("10 - ") neq "-1" or Emergent_Care_Reason_M0840.indexOf("7 - ") neq "-1" or Emergent_Care_Reason_M0840.indexOf("9 - ") neq "-1">
	 	<cfset HHA_Record_Data=HHA_Record_Data & "1" />
	  <cfelse>
	 	<cfset HHA_Record_Data=HHA_Record_Data & "0" />
	  </cfif>
	
	  <!---#Append M0840 GI  ---->
	
	 <cfif OASIS_Version_Code_1.indexOf("B") neq "-1">
		 <cfif Emergent_Care_Reason_M0840.indexOf("8 - ") neq "-1">
			<cfset HHA_Record_Data=HHA_Record_Data & "1" />
		 <cfelse>
			<cfset HHA_Record_Data=HHA_Record_Data & "0" />
		 </cfif>
	  <cfelse>
	 	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
	  </cfif>
	  
	  <!---#696-696 Append M0840 Unknown --->
	  
	   <cfif Emergent_Care_Reason_M0840.indexOf("UK - ") neq "-1">
	 	<cfset HHA_Record_Data=HHA_Record_Data & "1" />
	   <cfelse>
	 	<cfset HHA_Record_Data=HHA_Record_Data & "0" />
	   </cfif>
	   
<cfelse>
	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
</cfif>

<!--- #697-698 Append M0855 Inpatient Facility  --->

<cfif Assessment_Reason_M0100.indexOf("6 - ") neq "-1" or Assessment_Reason_M0100.indexOf("7 - ") neq "-1" or Assessment_Reason_M0100.indexOf("7 - ") neq "-1">

	<cfif Inpatient_Facility_M0855.indexOf("NA - ") neq "-1" >
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(Inpatient_Facility_M0855,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Inpatient_Facility_M0855,1) />
	</cfif>
<cfelse>
	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
</cfif>

<!---<cfoutput>HHA_Record_Data = #HHA_Record_Data#</cfoutput>--->

<!--==================================================================================================================================================		                                                End  Create Data Record thru 682-698 M0855 Dataset
===================================================================================================================================================-->	   


<!--==================================================================================================================================================		                                                Create Data Record thru 699-700 M0870 Datasets
===================================================================================================================================================-->	


<!---- #Append M0870 Discharge Disposition --->

 <cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Assessment_Reason_M0100.indexOf("9") neq "-1">
		<cfif Inpatient_Facility_M0855.indexOf("NA - ") neq "-1">
			<cfif Discharge_Disposition_M0870.indexOf("UK - ") neq "-1">
			 	<cfset HHA_Record_Data = HHA_Record_Data & "UK - " & left(Discharge_Disposition_M0870,1) />
			<cfelse>
				<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Discharge_Disposition_M0870,1) />
			</cfif>
		<cfelse>
			<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
		</cfif>
  <cfelse>
  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
  </cfif>
  

<!--==================================================================================================================================================		                                                End  Create Data Record thru 699-700 M0870 Datasets
===================================================================================================================================================-->	 
  <!--==================================================================================================================================================		                                                Create Data Record thru 701-703 M0880 Datasets
===================================================================================================================================================-->	

<!---#Append M0880 Services or Assistance --->
 
 <cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Assessment_Reason_M0100.indexOf("9") neq "-1">
 		<cfif Inpatient_Facility_M0855.indexOf("NA - ") neq "-1">
			<cfif Discharge_Disposition_M0870.indexOf("1 - ") neq "-1">
				<cfif After_Discharge_Services_M0880.indexOf("1 - ") neq "-1">
					<cfset HHA_Record_Data = HHA_Record_Data & "1" />
				<cfelse>
					<cfset HHA_Record_Data = HHA_Record_Data & "0" />
				</cfif>
				<cfif After_Discharge_Services_M0880.indexOf("2 - ") neq "-1">
					<cfset HHA_Record_Data = HHA_Record_Data & "1" />
				<cfelse>
					<cfset HHA_Record_Data = HHA_Record_Data & "0" />
				</cfif>
				<cfif After_Discharge_Services_M0880.indexOf("3 - ") neq "-1">
					<cfset HHA_Record_Data = HHA_Record_Data & "1" />
				<cfelse>
					<cfset HHA_Record_Data = HHA_Record_Data & "0" />
				</cfif>
			<cfelse>
			<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,3) />
			</cfif>
		<cfelse>
		<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,3) />
		</cfif>
  <cfelse>
  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,3) />
  </cfif>
 <!--==================================================================================================================================================		                                                End Create Data Record thru 701-703 M0880 Datasets
===================================================================================================================================================-->				
				
<!--==================================================================================================================================================		                                             	Create Data Record thru 704-705 M0890 Datasets
===================================================================================================================================================-->						
			
<!--- #Append M0890 Hospital Reason ---->
	
<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and (Assessment_Reason_M0100.indexOf("6") neq "-1" or Assessment_Reason_M0100.indexOf("7") neq "-1")>
	<cfif Inpatient_Facility_M0855.indexOf("1 - ") neq "-1">
		<cfif Hospital_Reason_M0890.indexOf("1 - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "01" />
		</cfif>
		<cfif Hospital_Reason_M0890.indexOf("2 - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "02" />
		</cfif>
		<cfif Hospital_Reason_M0890.indexOf("3 - ") neq "-1">
				<cfset HHA_Record_Data = HHA_Record_Data & "03" />
			</cfif>
		<cfif Hospital_Reason_M0890.indexOf("UK - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "UK" />
		</cfif>
	<cfelse>
	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
</cfif>

<!--==================================================================================================================================================		                                             	End Create Data Record thru 704-705 M0890 Datasets
===================================================================================================================================================-->						


<!--==================================================================================================================================================		                                             	Create Data Record thru 706-721 M0895 Datasets
===================================================================================================================================================-->						

<!--- #Append M0895 Hospital Reasons --->

<cfif Assessment_Reason_M0100.indexOf("6") neq "-1" or Assessment_Reason_M0100.indexOf("7") neq "-1">
	<cfif Inpatient_Facility_M0855.indexOf("1 - ") neq "-1">
		<!---#706-706 Append M0895 Hospital Reasons --->
		<cfif Hospital_Reason_List_M0895.indexOf("1 - Imp") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("2 - Inj")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("3 - Res")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("4 - Wou")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<!---#710-710 Append M0895 Hospital Reasons --->
		<cfif Hospital_Reason_List_M0895.indexOf("Hypo") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("6 - GI")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("7 - ")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("8 - ")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("9 - ")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<!---#710-710 Append M0895 Hospital Reasons --->
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("10 - ")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("11 - ")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("12 - ")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<!---#716-716 Append M0895 Hospital Reasons --->
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("13 - ")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<!---#717-717 Append M0895 Hospital Reasons --->
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("14 - ")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("15 - ")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and Hospital_Reason_List_M0895.indexOf("16 - ")>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
	<cfelse>
	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,16) />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,16) />
</cfif>


<!--==================================================================================================================================================		                                             	End Create Data Record thru 706-721 M0895 Datasets
===================================================================================================================================================-->						

<!--==================================================================================================================================================		                                             	 Create Data Record thru 722-728 M0900 Datasets
===================================================================================================================================================-->						
<!--- #Append M0900 Nursing Home Reason --->

<cfif Assessment_Reason_M0100.indexOf("6") neq "-1" or Assessment_Reason_M0100.indexOf("7") neq "-1">
	<cfif Inpatient_Facility_M0855.indexOf("3 - ") neq "-1">
		<cfif Nursing_Home_M0900.indexOf("1 - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif Nursing_Home_M0900.indexOf("2 - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif Nursing_Home_M0900.indexOf("3 - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif Nursing_Home_M0900.indexOf("4 - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif Nursing_Home_M0900.indexOf("5 - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif Nursing_Home_M0900.indexOf("6 - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif Nursing_Home_M0900.indexOf("NA - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
	<cfelse>
	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,7) />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,7) />
</cfif>

<!--==================================================================================================================================================		                                             	End Create Data Record thru 722-728 M0900 Datasets
===================================================================================================================================================-->						

<!--==================================================================================================================================================		                                              Create Data Record thru 729-736 M0903 Datasets
===================================================================================================================================================-->						

<!---#Append M0903 Last Home Visit --->

<cfset Date_Most_Recent_M0903_year = "" />
<cfset Date_Most_Recent_M0903_month = "" />
<cfset Date_Most_Recent_M0903_Day = "" />


<cfif Assessment_Reason_M0100.indexOf("6") neq "-1" or Assessment_Reason_M0100.indexOf("7") neq "-1" or Assessment_Reason_M0100.indexOf("8") neq "-1" or Assessment_Reason_M0100.indexOf("9") neq "-1">
	
	<cfset Date_Most_Recent_M0903_year = year(Date_Most_Recent_M0903) />
	<cfif month(Date_Most_Recent_M0903) lt 10>
		<cfset Date_Most_Recent_M0903_month = "0" & month(Date_Most_Recent_M0903) />
	<cfelse>
		<cfset Date_Most_Recent_M0903_month = month(Date_Most_Recent_M0903) />
	</cfif>
	<cfif day(Date_Most_Recent_M0903) lt 10>
		<cfset Date_Most_Recent_M0903_Day = "0" & day(Date_Most_Recent_M0903) />
	<cfelse>
		<cfset Date_Most_Recent_M0903_Day = day(Date_Most_Recent_M0903) />
	</cfif>
	<cfset HHA_Record_Data = HHA_Record_Data & Date_Most_Recent_M0903_year & Date_Most_Recent_M0903_month & Date_Most_Recent_M0903_Day />
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,8) />
</cfif>


<!--==================================================================================================================================================		                                             	End Create Data Record thru 729-736 M0903 Datasets
===================================================================================================================================================-->						

<!--==================================================================================================================================================		                                             	Create Data Record thru 737-744 M0906 Datasets
===================================================================================================================================================-->						
<!---#Append M0906 Discharge Date --->

<cfset Date_Discharge_M0906_year = "" />
<cfset Date_Discharge_M0906_month = "" />
<cfset Date_Discharge_M0906_day = "" />

<cfif Assessment_Reason_M0100.indexOf("6") neq "-1" or Assessment_Reason_M0100.indexOf("7") neq "-1" or Assessment_Reason_M0100.indexOf("8") neq "-1" or Assessment_Reason_M0100.indexOf("9") neq "-1">

	<cfset Date_Discharge_M0906_year = year(Date_Discharge_M0906) />
	<cfif month(Date_Most_Recent_M0903) lt 10>
		<cfset Date_Discharge_M0906_month = "0" & month(Date_Discharge_M0906) />
	<cfelse>
		<cfset Date_Discharge_M0906_month = month(Date_Discharge_M0906) />
	</cfif>
	<cfif day(Date_Discharge_M0906) lt 10>
		<cfset Date_Discharge_M0906_day = "0" & day(Date_Discharge_M0906) />
	<cfelse>
		<cfset Date_Discharge_M0906_day = day(Date_Discharge_M0906) />
	</cfif>
	<cfset HHA_Record_Data = HHA_Record_Data & Date_Discharge_M0906_year & Date_Discharge_M0906_month & Date_Discharge_M0906_day />
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,8) />
</cfif>
	
<!--==================================================================================================================================================		                                             	End Create Data Record thru 737-744 M0906 Datasets
===================================================================================================================================================-->						

<!--==================================================================================================================================================		                                             	Create Data Record thru 745-868 M0826 Datasets
===================================================================================================================================================-->						
<!---#745-748 --->

<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,4) />

<!---#749-749 M0175 1 --->

<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and (Assessment_Reason_M0100.indexOf("1 - ") neq "-1" or Assessment_Reason_M0100.indexOf("3 - ") neq "-1")>
	<cfif Discharged_From_M0175.indexOf("1 - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>

<!--- #750   M0175 2 --->

<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and (Assessment_Reason_M0100.indexOf("1 - ") neq "-1" or Assessment_Reason_M0100.indexOf("3 - ") neq "-1")>
	<cfif Discharged_From_M0175.indexOf("2 - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>


<!--- #751  M0175 3 --->

<cfif  Assessment_Reason_M0100.indexOf("1 - ") neq "-1" or Assessment_Reason_M0100.indexOf("3 - ") neq "-1">
	<cfif OASIS_Version_Code_1.indexOf("C") neq "-1">
		<cfif Discharged_From_M0175.indexOf("2 - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
	<cfelse>
		<cfif Discharged_From_M0175.indexOf("3 - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>


<!---#752  M0175 4 --->

<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and (Assessment_Reason_M0100.indexOf("1 - ") neq "-1" or Assessment_Reason_M0100.indexOf("3 - ") neq "-1")>
	<cfif Discharged_From_M0175.indexOf("4 - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>

<!---#753  M0175 5 --->

<cfif OASIS_Version_Code_1.indexOf("B") neq "-1" and ( Assessment_Reason_M0100.indexOf("1 - ") neq "-1" or Assessment_Reason_M0100.indexOf("3 - ") neq "-1" or Assessment_Reason_M0100.indexOf("4 - ") neq "-1")>
	<cfif Discharged_From_M0175.indexOf("5 - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>

<!---#754  M0175 NA --->

<cfif Assessment_Reason_M0100.indexOf("3 - ") neq "-1" or Assessment_Reason_M0100.indexOf("1 - ") neq "-1" >
	<cfif Discharged_From_M0175.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>

<!--- #755-768 Filler --->

<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,7) />

<!--- #769-778 Filler --->

<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,7) />

<!--- #769-778 NPI --->

<cfif Natl_Provider_ID neq ''>
	<cfif len(Natl_Provider_ID) lt 10>
		<cfset HHA_Record_Data = HHA_Record_Data & UCase(Natl_Provider_ID) & left(gHHA_Record_Padding,10 - len(Natl_Provider_ID)) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & UCase(left(gHHA_Record_Padding,10)) />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,10) />
</cfif>

<!---#779-780 M0110 --->

<cfif Assessment_Reason_M0100.indexOf("1 - ") neq "-1" or Assessment_Reason_M0100.indexOf("3 - ") neq "-1" or Assessment_Reason_M0100.indexOf("4 - ") neq "-1" or Assessment_Reason_M0100.indexOf("5 - ") neq "-1" >

	<cfif M0110.indexOf("1") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "01" />
	</cfif>
	<cfif M0110.indexOf("2") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "02" />
	</cfif>
	<cfif M0110.indexOf("NA") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	</cfif>
	<cfif M0110.indexOf("UK") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "UK" />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
</cfif>

<!--- #781-864 M0246 --->


<cfif M0246 neq ''>
	<cfset HHA_Record_Data = HHA_Record_Data & M0246 />
<cfelse>
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,84) />
</cfif>

<!--- ---->

<!--- #865-867 M0826 --->

<cfif Assessment_Reason_M0100.indexOf("1 - ") neq "-1" or Assessment_Reason_M0100.indexOf("3 - ") neq "-1" or Assessment_Reason_M0100.indexOf("4 - ") neq "-1" or Assessment_Reason_M0100.indexOf("5 - ") neq "-1" >
	<cfif M0826_NA.indexOf("NA") eq "-1">
		<cfif len(M0826_Ther_Need) eq 3>
			<cfset HHA_Record_Data = HHA_Record_Data & M0826_Ther_Need />
		</cfif>
		<cfif len(M0826_Ther_Need) eq 2>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & M0826_Ther_Need />	
		</cfif>
		<cfif len(M0826_Ther_Need) eq 1>
			<cfset HHA_Record_Data = HHA_Record_Data & "00" & M0826_Ther_Need />
		</cfif>
	<cfelse>
		<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,3) />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,3) />
</cfif>


<!--- #868-868 M0826 NA --->

<cfif Assessment_Reason_M0100.indexOf("1 - ") neq "-1" or Assessment_Reason_M0100.indexOf("3 - ") neq "-1" or Assessment_Reason_M0100.indexOf("4 - ") neq "-1" or Assessment_Reason_M0100.indexOf("5 - ") neq "-1" >
	<cfif M0826_NA.indexOf("NA") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	</cfif>
<cfelse>
<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
</cfif>

<!--==================================================================================================================================================		                                             	End Create Data Record thru 745-868 M0826 Datasets
===================================================================================================================================================-->						

<!--==================================================================================================================================================		                                             	Create Data Record thru 1, 3 869-END Datasets 
===================================================================================================================================================-->						

<cfif OASIS_Version_Code_1.indexOf("C") neq "-1">
	<!--- #869-869 C ---->
	<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
	<!---#870-877 M0102 --->
	<cfset M0102_Physician_SOC_year = "" />
	<cfset M0102_Physician_SOC_month = "" />
	<cfset M0102_Physician_SOC_day = "" />
	
	<cfif M0102_Physician_SOC neq ''>
		<cfset M0102_Physician_SOC_year = year(M0102_Physician_SOC) />
		<cfif month(M0102_Physician_SOC) lt 10>
			<cfset M0102_Physician_SOC_month = "0" & month(M0102_Physician_SOC) />
		<cfelse>
			<cfset M0102_Physician_SOC_month = month(M0102_Physician_SOC) />
		</cfif>
		<cfif day(M0102_Physician_SOC) lt 10>
			<cfset M0102_Physician_SOC_day = "0" & day(M0102_Physician_SOC) />
		<cfelse>
			<cfset M0102_Physician_SOC_month = day(M0102_Physician_SOC) />
		</cfif>
		<cfset HHA_Record_Data = HHA_Record_Data & M0102_Physician_SOC_year & M0102_Physician_SOC_month & M0102_Physician_SOC_day />
	<cfelse>
		<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,8) />
	</cfif>
	<!--- #878-878 M0102 NA --->
	<cfif M0102_Physician_SOC eq ''>
		<cfset HHA_Record_Data= HHA_Record_Data & "1" />
	<cfelse>
		<cfset HHA_Record_Data= HHA_Record_Data & "0" />
	</cfif>
	<!---#879-886 M0104 --->
	<cfset M0104_Date_of_Referral_year = "" />
	<cfset M0104_Date_of_Referral_month = "" />
	<cfset M0104_Date_of_Referral_day = "" />
	
	<cfif M0102_Physician_SOC eq ''>
		<cfif M0104_Date_of_Referral neq ''>
			<cfset M0104_Date_of_Referral_year = year(M0104_Date_of_Referral) />
			<cfif month(M0104_Date_of_Referral) lt 10>
				<cfset M0104_Date_of_Referral_month = "0" & month(M0104_Date_of_Referral) />
			<cfelse>
				<cfset M0104_Date_of_Referral_month = month(M0104_Date_of_Referral) />
			</cfif>
			<cfif day(M0104_Date_of_Referral) lt 10>
				<cfset M0104_Date_of_Referral_day = "0" & day(M0104_Date_of_Referral) />
			<cfelse>
				<cfset M0104_Date_of_Referral_day = day(M0104_Date_of_Referral) />
			</cfif>
			<cfset HHA_Record_Data = HHA_Record_Data & M0104_Date_of_Referral_year & M0104_Date_of_Referral_month & M0104_Date_of_Referral_day />
		<cfelse>
			<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,8) />
		</cfif>
	 <cfelse>
	 <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,8) />
	 </cfif>
	 
	 <!---#887-887 M0175 1 --->
	 
	 <cfif Discharged_From_M0175.indexOf("1 - ") neq "-1">
	 	<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	 <cfelse>
	 	<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	 </cfif>
	 <!---#888-888 M0175 3 --->
	 <cfif Discharged_From_M0175.indexOf("3- ") neq "-1">
	 	<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	 <cfelse>
	 	<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	 </cfif>
	 <!---#889-889 M0175 4 --->
	 <cfif Discharged_From_M0175.indexOf("4 - ") neq "-1">
	 	<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	 <cfelse>
	 	<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	 </cfif>
	 <!---#890-890 M0175 5  --->
	 <cfif Discharged_From_M0175.indexOf("5 - ") neq "-1">
	 	<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	 <cfelse>
	 	<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	 </cfif>
	 <!---#891-891 M0175 6  --->
	 <cfif Discharged_From_M0175.indexOf("6 - ") neq "-1">
	 	<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	 <cfelse>
	 	<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	 </cfif>
	 <!---#892-892  M0175 7  --->
	 <cfif Discharged_From_M0175.indexOf("7 - ") neq "-1">
	 	<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	 <cfelse>
	 	<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	 </cfif>
	 <!---#893-920 Inpatient Codes 3-6 --->
	 <cfset HHA_Record_Data = HHA_Record_Data & M0190 />
	 <!---#921-948 M1012--->
	 <cfset HHA_Record_Data = HHA_Record_Data & M1012 />
	 <!---#949-949 Inpatient Procedures NA --->
	 <cfif Discharged_From_M0175.indexOf("NA -") eq "-1">
	 	<cfif M1012_Inpat_DX_NA eq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		</cfif>
		<cfif M1012_Inpat_DX_UK eq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		</cfif>
	  <cfelse>
		<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  </cfif>
	  <!---#951-964 Med Change ICD 5, 6 --->
	  <cfset HHA_Record_Data= HHA_Record_Data & M0210 />
	  <!---#965-965 Med Change NA --->
	  <cfif M1016_DX_NA eq ''>
	  	   <cfset HHA_Record_Data = HHA_Record_Data & "0" />
	  <cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	  </cfif>
	  <!---#966-966 M1032 1 --->
	  <cfif M1032_Frailty.indexOf("1 -") neq "-1">
	  		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	  <cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	  </cfif>
	  <!---#967-967 M1032 2 --->
	  <cfif M1032_Frailty.indexOf("2 -") neq "-1">
	  		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	  <cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	  </cfif>
	  <!---#968-968 M1032 3 --->
	  <cfif M1032_Frailty.indexOf("3 -") neq "-1">
	  		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	  <cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	  </cfif>
	  <!---#969-969 M1032 4 --->
	  <cfif M1032_Frailty.indexOf("4 -") neq "-1">
	  		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	  <cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	  </cfif>
	  <!---#970-970 M1032 5 --->
	  <cfif M1032_Frailty.indexOf("5 -") neq "-1">
	  		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	  <cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	  </cfif>
	  <!---#971-971 M1032 6 --->
	  <cfif M1032_Frailty.indexOf("6 -") neq "-1">
	  		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	  <cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	  </cfif>
	  <!---#972-972 M1032 7 --->
	  <cfif M1032_Frailty.indexOf("7 -") neq "-1">
	  		<cfset HHA_Record_Data = HHA_Record_Data & "1" />
	  <cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
	  </cfif>
	  <!---#973-974 M1034 --->
	  <cfif Rehab_Prognosis_M0270.indexOf("UK - ") neq "-1">
	  		<cfset HHA_Record_Data = HHA_Record_Data & "UK" & left(Rehab_Prognosis_M0270,1) />
	  <cfelse>
	  		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Rehab_Prognosis_M0270,1) />
	  </cfif>
	  <!---#982-983 M1100--->
	  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,7) />
	  <cfset HHA_Record_Data= HHA_Record_Data & left(M1100_Living_Situation,2) />
	  <!---#984-985 M1210 --->
	  <cfif Hearing_M0400.indexOf("UK - ") neq "-1">
	  		<cfset HHA_Record_Data = HHA_Record_Data & "UK" & left(Hearing_M0400,1) />
	  <cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Hearing_M0400,1) />
	  </cfif>
	  <!---#986-987 M1220 --->
	  <cfif M1220_Verbal_Under.indexOf("UK - ") neq "-1">
	  		<cfset HHA_Record_Data = HHA_Record_Data & "UK" & left(M1220_Verbal_Under,1) />
	  <cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1220_Verbal_Under,1) />
	  </cfif>
	  <!--- #988-989 M1240 --->
	  <cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1240_Pain_Assess,1) />
	  <!--- #990-991 M1242 --->
	  	  <cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Freq_of_Pain_M0420,1) />
	  <!--- #992-993 M1300 ---->
	  	  <cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1300_Pressure,1) />
	  <!--- #994-994 M1302 --->
	  <cfif M1300_Pressure.indexOf("1 -") neq "-1" or M1300_Pressure.indexOf("2 -") neq "-1">
	  	  <cfset HHA_Record_Data = HHA_Record_Data & left(M1302_Pressure,1) />
	  <cfelse>
	  	  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,1) />
	  </cfif>
	  <!---#995-995 M1306 --->
	  <cfset HHA_Record_Data = HHA_Record_Data & left(M1306_Unhealed_Pressure,1) />
	  <!---#1006-1007 M1308 --->
	  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,10) />
	  <cfif len(Pressure_Ulcer_b_M0450) eq 1>
	  	  <cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Pressure_Ulcer_b_M0450,1) />
	  </cfif>
	  <cfif len(Pressure_Ulcer_b_M0450) eq 2>
	  	<cfset HHA_Record_Data = HHA_Record_Data & left(Pressure_Ulcer_b_M0450,2) />
	  </cfif>
	  <cfif Pressure_Ulcer_b_M0450 eq ''>
	  	 <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  </cfif>
	  <!---#1010-1011 M1308 --->
	  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  <cfif len(Pressure_Ulcer_c_M0450) eq 1>
	  	  <cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Pressure_Ulcer_c_M0450,1) />
	  </cfif>
	  <cfif len(Pressure_Ulcer_c_M0450) eq 2>
	  	<cfset HHA_Record_Data = HHA_Record_Data & left(Pressure_Ulcer_c_M0450,2) />
	  </cfif>
	  <cfif Pressure_Ulcer_c_M0450 eq ''>
	  	 <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  </cfif>
	  <!---#1014-1015 M1308 --->
	  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  <cfif len(Pressure_Ulcer_d_M0450) eq 1>
	  	  <cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Pressure_Ulcer_d_M0450,1) />
	  </cfif>
	  <cfif len(Pressure_Ulcer_d_M0450) eq 2>
	  	<cfset HHA_Record_Data = HHA_Record_Data & left(Pressure_Ulcer_d_M0450,2) />
	  </cfif>
	  <cfif Pressure_Ulcer_d_M0450 eq ''>
	  	 <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  </cfif>
	  <!---#1018-1019 M1308 --->
	  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  <cfif len(Pressure_Ulcer_e_M0450) eq 1>
	  	  <cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Pressure_Ulcer_e_M0450,1) />
	  </cfif>
	  <cfif len(Pressure_Ulcer_e_M0450) eq 2>
	  	<cfset HHA_Record_Data = HHA_Record_Data & left(Pressure_Ulcer_e_M0450,2) />
	  </cfif>
	  <cfif Pressure_Ulcer_e_M0450 eq ''>
	  	 <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  </cfif>
	  <!---#1022-1023 M1308 D2 --->
	  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  <cfif len(M1308_d_2_Pressure) eq 1>
	  	  <cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_d_2_Pressure,1) />
	  </cfif>
	  <cfif len(M1308_d_2_Pressure) eq 2>
	  	<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_d_2_Pressure,2) />
	  </cfif>
	  <cfif M1308_d_2_Pressure eq ''>
	  	 <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  </cfif>
	  <!---#1026-1027 M1308 D3 --->
	  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  <cfif len(M1308_d_3_Pressure) eq 1>
	  	  <cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_d_3_Pressure,1) />
	  </cfif>
	  <cfif len(M1308_d_3_Pressure) eq 2>
	  	<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_d_3_Pressure,2) />
	  </cfif>
	  <cfif M1308_d_3_Pressure eq ''>
	  	 <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  </cfif>
	  <!---#1030-1033 M1310 --->
	  <cfset gTemp = "" />
	  <cfset gDisplay_File_Name = "" />
	  <cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,2) />
	  <cfif M1310_1 neq '' or M1310_Length neq ''>
	  		<cfif len(M1310_Length) eq 1>
				<cfset gTemp = "0" & left(M1310_Length,1) />
			</cfif>
			<cfif len(M1310_Length) eq 2>
				<cfset gTemp = M1310_Length />
			</cfif>
			<cfif M1310_Length eq ''>
				<cfset gTemp = "00" />
			</cfif>
			<cfif len(M1310_1) eq 1>
				<cfset gDisplay_File_Name = M1310_1 />
			</cfif>
			<cfif M1310_1 eq ''>
				<cfset gDisplay_File_Name = "0" />
			</cfif>
			<cfset HHA_Record_Data = HHA_Record_Data & gTemp &"." & gDisplay_File_Name />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,4) />
		</cfif>
		<!--- #1034-1037 M1312 ---->.
		<cfif M1312_Width neq '' or M1312_1 neq ''>
	  		<cfif len(M1312_Width) eq 1>
				<cfset gTemp = "0" & left(M1312_Width,1) />
			</cfif>
			<cfif len(M1312_Width) eq 2>
				<cfset gTemp = M1312_Width />
			</cfif>
			<cfif M1312_Width eq ''>
				<cfset gTemp = "00" />
			</cfif>
			<cfif len(M1312_1) eq 1>
				<cfset gDisplay_File_Name = M1312_1 />
			</cfif>
			<cfif M1312_1 eq ''>
				<cfset gDisplay_File_Name = "0" />
			</cfif>
			<cfset HHA_Record_Data = HHA_Record_Data & gTemp &"." & gDisplay_File_Name />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,4) />
		</cfif>
		<!---#1038-1041 M1314 --->
		<cfif M1314_Depth neq '' or M1314_1 neq ''>
	  		<cfif len(M1314_Depth) eq 1>
				<cfset gTemp = "0" & left(M1312_Width,1) />
			</cfif>
			<cfif len(M1314_Depth) eq 2>
				<cfset gTemp = M1312_Width />
			</cfif>
			<cfif M1314_Depth eq ''>
				<cfset gTemp = "00" />
			</cfif>
			<cfif len(M1314_1) eq 1>
				<cfset gDisplay_File_Name = M1312_1 />
			</cfif>
			<cfif M1314_1 eq ''>
				<cfset gDisplay_File_Name = "0" />
			</cfif>
			<cfset HHA_Record_Data = HHA_Record_Data & gTemp &"." & gDisplay_File_Name />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,4) />
		</cfif>
		<!---#1042-1043 M1320 --->
		<cfif Pressure_Ulcer_Status_M0464 eq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
		</cfif>
		<cfif Pressure_Ulcer_Status_M0464.indexOf("NA -") eq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(gHHA_Record_Padding,1) />
		</cfif>
		<cfif Pressure_Ulcer_Status_M0464.indexOf("NA -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
		</cfif>
		<!--- #1044-1045 M1330 ---->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Stasis_Ulcer_M0468,1) />
		<!---#1046-1047 M1332 ---->
		<cfif Stasis_Ulcer_M0468.indexOf("1 -") neq "-1" or Stasis_Ulcer_M0468.indexOf("2 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Stasis_Ulcer_Num_M0470,1) />
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Stasis_Ulcer_Status_M0476,1) />
		<cfelse>
	    	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,4) />
		</cfif>
		<!---#1050-1051 M1340 --->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Surgical_Wound_M0482,1) />
		<!---#1052-1053 M1342 --->
		<cfif Surgical_Wound_M0482.indexOf("1 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Surgical_Wound_Status_M0488,1) />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
		</cfif>
		<!---#1054-1054 M1350 --->
		<cfset 	HHA_Record_Data = HHA_Record_Data & left(M1350_Other_Wounds,1) />
		<!---#1063-1064 M1615 --->
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,8) />
		<cfif Urinary_INcont_M0520.indexOf("1 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Urinary_INcont_when_M0530,1) />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
		</cfif>
		<!---#1065-1066 M1730 --->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1730_Depression,1) />
		<cfif M1730_Depression.indexOf("1 -") neq "-1">
			<!---#1067-1068 M1730a --->
			<cfif M1730a.indexOf("NA -") eq "-1">
				<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1730a,1) />
			</cfif>
			<cfif M1730a.indexOf("NA -") neq "-1">
				<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
			</cfif>
			<!---#1069-1070 M1730b --->
			<cfif M1730b.indexOf("NA -") eq "-1">
				<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1730b,1) />
			</cfif>
			<cfif M1730b.indexOf("NA -") neq "-1">
				<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
			</cfif>
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,4) />
		</cfif>
		<!---#1071-1072 M1830 ---->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Bathing_M0670,1) />
		<!---#1073-1074 M1840 --->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1840_Toilet,1) />
		<!---#1075-1076 M1845  --->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1845_Toilet,1) />
		<!---#1077-1078 M1850 --->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Transferring_M0690,1) />
		<!---#1079-1080 M1860 --->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Ambulation_M0700,1) />
<cfelse>
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,212) />
</cfif>

<!---#1081-1085 HIPPS                                                                                            --->
<cfif M0826_NA.indexOf("NA") eq "-1">
	<cfset HHA_Record_Data = HHA_Record_Data & HIPPS_Code />
<cfelse>
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,5) />
</cfif>

<!---#1086-1090 Filler --->
<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,5) />
<!---#1091-1095 HIPPS Version  ---->
<cfif M0826_NA.indexOf("NA") eq "-1">
	<cfset HHA_Record_Data = HHA_Record_Data & "V3210" />
<cfelse>
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,5) />
</cfif>

<cfif OASIS_Version_Code_1.indexOf("C") neq "-1">
	<!---#1096-1097 M1900a --->
	<cfset HHA_Record_Data =HHA_Record_Data & "0" & left(M1900a_SelfCare,1) />
	<!---#1096-1097 M1900b --->
	<cfset HHA_Record_Data =HHA_Record_Data & "0" & left(M1900b_Amb,1) />
	<!---#1096-1097 M1900c --->
	<cfset HHA_Record_Data =HHA_Record_Data & "0" & left(M1900c_Transfer,1) />
	<!---#1096-1097 M1900d --->
	<cfset HHA_Record_Data =HHA_Record_Data & "0" & left(M1900d_House,1) />
	<!---#1104-1105 M1910 --->
	<cfset HHA_Record_Data =HHA_Record_Data & "0" & left(M1910_Fall_Risk,1) />
	<!---#1106-1107 M2000 --->
	<cfset HHA_Record_Data =HHA_Record_Data & "0" & left(M2000_Adverse,1) />

	<!---#1108-1108 M2002--->
	<cfif M2002_Med_FU neq ''>
		<cfset HHA_Record_Data = HHA_Record_Data & left(M2002_Med_FU,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,1) />
	</cfif>
	
	<!---#1111-1112 M2010 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	<cfif M2010_Med_Edu neq ''>
		<cfif M2010_Med_Edu.indexOf("NA - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(M2010_Med_Edu,1) />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2010_Med_Edu,1) />
		</cfif>
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	<!----#1115-1116 M2020 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	<cfif Oral_Meds_M0780 neq ''>
		<cfif Oral_Meds_M0780.indexOf("NA - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(Oral_Meds_M0780,1) />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Oral_Meds_M0780,1) />
		</cfif>
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	<!---#1117-1118 M2030 --->
	<cfif Inject_Meds_M0800 neq ''>
		<cfif Inject_Meds_M0800.indexOf("NA - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(Inject_Meds_M0800,1) />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Inject_Meds_M0800,1) />
		</cfif>
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	<!---#1119-1120 M2040 --->
	<cfif Oral_Meds_M0780p.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(Oral_Meds_M0780p,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Oral_Meds_M0780p,1) />
	</cfif>
	<!---#1121-1122 M2040 --->
	<cfif Inject_Meds_m0800p.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(Inject_Meds_m0800p,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Inject_Meds_m0800p,1) />
	</cfif>
	<!----#1123-1124 M2100a --->
	<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100a_Equip,1) />
	<!--- #1125-1126 M2100b ---->
	<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100b_Equip,1) />
	<!--- #1127-1128 M2100c  ---->
	<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100c_Equip,1) />
	<!--- #1129-1130 M2100d  ---->
	<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100d_Equip,1) />
	<!--- #1131-1132 M2100e ---->
	<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100e_Equip,1) />
	<!--- #1133-1134 M2100f  ---->
	<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100f_Equip,1) />
	<!--- #1135-1136 M2100g  ---->
	<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100g_Equip,1) />
	
	<!---#1137-1138 M2110 --->
	<cfif M2110_Assist_Freq.indexOf("UK - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "UK" & left(M2110_Assist_Freq,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2110_Assist_Freq,1) />
	</cfif>
	<!---#1139-1140 M2250 ---->
	<cfif M2250a_PhysNot.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(M2250a_PhysNot,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2250a_PhysNot,1) />
	</cfif>
	<!---#1141-1142 M2250b  --->
	<cfif M2250b_Diabetic.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(M2250b_Diabetic,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2250b_Diabetic,1) />
	</cfif>
	<!---#1143-1144 M2250c  --->
	<cfif M2250c_FallsPrev.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(M2250c_FallsPrev,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2250c_FallsPrev,1) />
	</cfif>
	<!---#1145-1146 M2250d --->
	<cfif M2250d_Depress.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(M2250d_Depress,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2250d_Depress,1) />
	</cfif>
	<!---#1147-1148 M2250e --->
	<cfif M2250e_Pain.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(M2250e_Pain,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2250e_Pain,1) />
	</cfif>
	<!---#1149-1150 M2250f  --->
	<cfif M2250f_PressUlc.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(M2250f_PressUlc,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2250f_PressUlc,1) />
	</cfif>
	<!---#1151-1152 M2250g --->
	<cfif M2250g_PressUlcMoist.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" & left(M2250g_PressUlcMoist,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2250g_PressUlcMoist,1) />
	</cfif>
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,293) />
	<cfset HHA_Record_Data = HHA_Record_Data & "%" />
<cfelse>
	<!---#Append State Use filler to 1395 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,300) />
	<!---#Append Agency Use Filler to 1445  --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,50) />
	<!---#Append Data End to 1446 --->
	<cfset HHA_Record_Data = HHA_Record_Data & "%" />
</cfif>

<!--=================================================================================================================================================		                                             	End Create Data Record thru 1, 3 869-END Datasets 
==================================================================================================================================================-->						


<cfset fullHHA_Record_Data = session.dset & HHA_Record_Data />


<cfform name="samop" id="123">
<table>

	<tr>
	<td>
<cftextarea rows="12" cols="100" name="hrdata" value="#HHA_Record_Data#" type="text"></cftextarea>
	</td>
	<td>
<cftextarea rows="1" cols="10" name="hrdatafdf" value="#len(HHA_Record_Data)#" type="text"></cftextarea>
	<td>
	</tr>


	<tr>
	<td>
<cftextarea rows="12" cols="100" name="hrdata" value="#fullHHA_Record_Data#" type="text"></cftextarea>
	</td>
	<td>
<cftextarea rows="1" cols="10" name="hrdatafdf" value="#len(fullHHA_Record_Data)#" type="text"></cftextarea>
	<td>
	</tr>




	<tr>
	<td>
<cftextarea rows="12" cols="100" name="hrold" value="#Datasets.HHA_Record_Data#" type="text"></cftextarea>
	</td>
	<td>
<cftextarea rows="1" cols="10" name="hrdataer" value="#len(Datasets.HHA_Record_Data)#" type="text"></cftextarea>
	<td>
	</tr>
</table>
</cfform>