<!--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,M1308_a_12_Pressure,M1308_b_12_Pressure,
	   M1308_c_12_Pressure,M1308_d_12_Pressure,M1308_d_22_Pressure,
	   M1308_d_32_Pressure,M1040_Influ,M1050_Pneu,M1055_Pneu,M1307_Date,
	   M1307_Oldest,M1500_Symptoms,M1510_Hrt_FU,M2004_Med_Int,M2015_Drug_Edu,
	   M2400a_Diabetic,M2400b_FallsPrev,M2400c_Depress,M2400d_Pain,M2400e_PressUlc,
	   M2400f_PressUlcMoist
FROM 
	   #Request.prefix_db_agency#.Assessment_New 
WHERE  Assessment_ID='158481'
</cfquery>

<cfquery name="Datasets" datasource="#Application.DataSrc#">
SELECT HHA_Record_Data
FROM   #Request.prefix_db_agency#.Datasets 
WHERE  Assessment_ID='158481'
</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='158481' 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="B1  2011081700        C-072009    02.001        02.02040581                                                                067212                 N         DB8585              20110503        1DAVINA       BROWN                CO80917      111222333A  05238583830Y315729       019920527 217604477670012011050301011000 0101000000000           201105030 480.9  730.00  707.05 249.21 385.32 250.20010000000 730.0003 795.1402 249.0100 707.0703 385.3200 385.35011000      000010                                                       00  01     00       NA              020010NA02  0000000403             0000001031  00  01  02                  01  00                  NA                " />
<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 M1308_a_12_Pressure = "" />
<cfset M1308_b_12_Pressure = "" />
<cfset M1308_c_12_Pressure = "" />
<cfset M1308_d_12_Pressure = "" />
<cfset M1308_d_22_Pressure = "" />
<cfset M1308_d_32_Pressure = "" />
<cfset M1040_Influ = "" />
<cfset M1050_Pneu = "" />
<cfset M1055_Pneu = "" />
<cfset M1307_Date = "" />
<cfset M1307_Oldest = "" />
<cfset M1500_Symptoms = "" />
<cfset M1510_Hrt_FU = "" />
<cfset M2004_Med_Int = "" />
<cfset M2015_Drug_Edu = "" />
<cfset M2400a_Diabetic = "" />
<cfset M2400b_FallsPrev = "" />
<cfset M2400c_Depress = ""  />
<cfset M2400d_Pain = ""  />
<cfset M2400e_PressUlc = "" />
<cfset M2400f_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 M1308_a_12_Pressure = Assessment_New.M1308_a_12_Pressure />
<cfset M1308_b_12_Pressure = Assessment_New.M1308_b_12_Pressure />
<cfset M1308_c_12_Pressure = Assessment_New.M1308_c_12_Pressure />
<cfset M1308_d_12_Pressure = Assessment_New.M1308_d_12_Pressure />
<cfset M1308_d_22_Pressure = Assessment_New.M1308_d_22_Pressure />
<cfset M1308_d_32_Pressure = Assessment_New.M1308_d_32_Pressure />
<cfset M1040_Influ = Assessment_New.M1040_Influ />
<cfset M1050_Pneu = Assessment_New.M1050_Pneu />
<cfset M1055_Pneu = Assessment_New.M1055_Pneu />
<cfset M1307_Date = Assessment_New.M1307_Date />
<cfset M1307_Oldest = Assessment_New.M1307_Oldest />
<cfset M1500_Symptoms = Assessment_New.M1500_Symptoms />
<cfset M1510_Hrt_FU = Assessment_New.M1510_Hrt_FU />
<cfset M2004_Med_Int = Assessment_New.M2004_Med_Int />
<cfset M2015_Drug_Edu = Assessment_New.M2015_Drug_Edu />
<cfset M2400a_Diabetic = Assessment_New.M2400a_Diabetic />
<cfset M2400b_FallsPrev = Assessment_New.M2400b_FallsPrev />
<cfset M2400c_Depress = Assessment_New.M2400c_Depress  />
<cfset M2400d_Pain = Assessment_New.M2400d_Pain  />
<cfset M2400e_PressUlc = Assessment_New.M2400e_PressUlc />
<cfset M2400f_PressUlcMoist = Assessment_New.M2400f_PressUlcMoist />


<cfset M0246 = Diagnosis.M0245_ICD />
<cfset Natl_Provider_ID = Agency.Natl_Provider_ID />
<cfset M1100_Living_Situation = patient.M1100_Living_Situation />
<!--=================================================================================================================================================				                                                      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(M1314_Depth,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 = M1314_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 
==================================================================================================================================================-->						

<!--=================================================================================================================================================		                                             	Create Data Record thru 4, 5 869-END NEW Datasets 
==================================================================================================================================================-->						


<cfif OASIS_Version_Code_1.indexOf("C") neq "-1">
	<!---#869-989 C --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,121) />
	<!---#990-991 M1242 --->
	<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Freq_of_Pain_M0420,1) />
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,3) />
	<!---#995-995 M1306 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(M1306_Unhealed_Pressure,1) />
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,10) />
	
	<!---#1006-1009 M1308 ---->
	<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>
	<cfif len(M1308_a_12_Pressure) eq 1>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_a_12_Pressure,1) />
	</cfif>
	<cfif len(M1308_a_12_Pressure) eq 2>
		<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_a_12_Pressure,2) />
	</cfif>
	<cfif M1308_a_12_Pressure eq ''>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	
	<!---#1010-1013 M1308 --->
	<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>
	<cfif len(M1308_b_12_Pressure) eq 1>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_b_12_Pressure,1) />
	</cfif>
	<cfif len(M1308_b_12_Pressure) eq 2>
		<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_b_12_Pressure,2) />
	</cfif>
	<cfif M1308_b_12_Pressure eq ''>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	
	<!---#1014-1017 M1308 --->
	<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>
	<cfif len(M1308_c_12_Pressure) eq 1>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_c_12_Pressure,1) />
	</cfif>
	<cfif len(M1308_c_12_Pressure) eq 2>
		<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_c_12_Pressure,2) />
	</cfif>
	<cfif M1308_c_12_Pressure eq ''>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	
	<!---#1018-1021 M1308 ---->
	<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>
	<cfif len(M1308_d_12_Pressure) eq 1>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_d_12_Pressure,1) />
	</cfif>
	<cfif len(M1308_d_12_Pressure) eq 2>
		<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_d_12_Pressure,2) />
	</cfif>
	<cfif M1308_d_12_Pressure eq ''>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
		
	<!---#1022-1025 M1308 D2 --->
	<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>
	<cfif len(M1308_d_22_Pressure) eq 1>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_d_22_Pressure,1) />
	</cfif>
	<cfif len(M1308_d_22_Pressure) eq 2>
		<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_d_22_Pressure,2) />
	</cfif>
	<cfif M1308_d_22_Pressure eq ''>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	
	<!---#1026-1029 M1308 D3 --->
	<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>
	<cfif len(M1308_d_32_Pressure) eq 1>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_d_32_Pressure,1) />
	</cfif>
	<cfif len(M1308_d_32_Pressure) eq 2>
		<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_d_32_Pressure,2) />
	</cfif>
	<cfif M1308_d_32_Pressure eq ''>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	
	<!---#1030-1043 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,14) />
	
	<!---#1044-1045 M1330 --->
	<cfset HHA_Record_Data = HHA_Record_Data & 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_M0482,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-1072 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,16) />
	<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 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	
	<!---#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 --->
<cfset CheckDate1="10/1/2009" />
<cfif M0826_NA.indexOf("NA") eq "-1">
	<cfif OASIS_Version_Code_1.indexOf("C") eq "-1">
		<cfif Assessment_Completed_M0090 lt CheckDate1>
			<cfset HHA_Record_Data = HHA_Record_Data & "V2308" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "V2409" />
		</cfif>
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "V3210" />
	</cfif>
<cfelse>
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,5) />
</cfif>

<!---#1096-1116 --->
<cfif OASIS_Version_Code_1.indexOf("C") neq "-1">
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,21) />
	<cfif Inject_Meds_M0800 neq ''>
		<cfif Inject_Meds_M0800.indexOf("NA - ") neq "-1" >
			<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
		<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>
	
	<!---#1120-End --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,327) />
	<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 4, 5 869-END NEW Datasets  
==================================================================================================================================================-->						

<!--=================================================================================================================================================		                                             	Create Data Record thru 6, 7, 8, 9 869-END Datasets
==================================================================================================================================================-->						

<cfif OASIS_Version_Code_1.indexOf("C") neq "-1" and Assessment_Reason_M0100.indexOf("8 -") eq "-1" >
	<!---#869-974 C --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,106) />
	
	<!---#975-976 M1040 --->
	<cfif M1040_Influ.indexOF("NA -") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1040_Influ,1) />
	</cfif>
	
	<!---#977-978 M1045 --->
	<cfif M1040_Influ neq ''>
		<cfif M1040_Influ.indexOF("NA -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1040_Influ,1) />
		</cfif>
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	
	<!---#979-979 M1050 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(M1050_Pneu,1) />
	
	<!---#980-981 M1055 ---->
	<cfif M1055_Pneu neq ''>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1055_Pneu,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,8) />
	
	<!---#990-991 M1242 ---->	
	<cfif Assessment_Reason_M0100.indexOf("9 -") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Freq_of_Pain_M0420,1) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	
	<!---#992-994 Filler --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,3) />
	
	<!---#995-1005 --->
	<cfif Assessment_Reason_M0100.indexOf("9 -") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & left(M1306_Unhealed_Pressure,1) />
		<cfif M1306_Unhealed_Pressure.indexOf("1 -") neq "-1">
			<cfif M1307_Date neq ''>
				<cfset M1307_Date_year = "" />
				<cfset M1307_Date_month = "" />
				<cfset M1307_Date_Day = "" />
				<cfset M1307_Date_year = year(M1307_Date) />
				<cfif len(month(M1307_Date)) lt 2>
					<cfset M1307_Date_month = "0" & month(M1307_Date) />
				<cfelse>
					<cfset M1307_Date_month = month(M1307_Date) />
				</cfif>
				<cfif len(day(M1307_Date)) lt 2>
					<cfset M1307_Date_Day = "0" & day(M1307_Date) />
				<cfelse>
					<cfset M1307_Date_Day = day(M1307_Date) />
				</cfif>
				<cfset HHA_Record_Data = HHA_Record_Data & M1307_Date_year & M1307_Date_month & M1307_Date_Day />
			<cfelse>
			<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,8) />
			</cfif>	
			<cfif M1307_Oldest.indexOF("NA -") neq "-1">
				<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
			<cfelse>
				<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1307_Oldest,1) />
			</cfif>
		<cfelse>
			<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,10) />
		</cfif>
	<cfelse>
		<cfset HHA_Record_Data= HHA_Record_Data & left(gHHA_Record_Padding,11) />
	</cfif>
	
	<!----#1006-1009 M1308 ---->
	<cfif Assessment_Reason_M0100.indexOf("9 -") neq "-1">
		<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>
		<cfif len(M1308_a_12_Pressure) eq 1>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_a_12_Pressure,1) />
		</cfif>
		<cfif len(M1308_a_12_Pressure) eq 2>
			<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_a_12_Pressure,2) />
		</cfif>
		<cfif M1308_a_12_Pressure eq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
		</cfif>
		
		<!---#1010-1013 M1308 --->
		<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>
		<cfif len(M1308_b_12_Pressure) eq 1>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_b_12_Pressure,1) />
		</cfif>
		<cfif len(M1308_b_12_Pressure) eq 2>
			<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_b_12_Pressure,2) />
		</cfif>
		<cfif M1308_b_12_Pressure eq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
		</cfif>
		
		<!---#1014-1017 M1308 --->
		<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>
		<cfif len(M1308_c_12_Pressure) eq 1>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_c_12_Pressure,1) />
		</cfif>
		<cfif len(M1308_c_12_Pressure) eq 2>
			<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_c_12_Pressure,2) />
		</cfif>
		<cfif M1308_c_12_Pressure eq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
		</cfif>

		<!---#1018-1021 M1308 --->
		<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>
		<cfif len(M1308_d_12_Pressure) eq 1>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_d_12_Pressure,1) />
		</cfif>
		<cfif len(M1308_d_12_Pressure) eq 2>
			<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_d_12_Pressure,2) />
		</cfif>
		<cfif M1308_d_12_Pressure eq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
		</cfif>
		
		<!----#1022-1025 M1308 D2 --->		
		<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>
		<cfif len(M1308_d_22_Pressure) eq 1>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_d_22_Pressure,1) />
		</cfif>
		<cfif len(M1308_d_22_Pressure) eq 2>
			<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_d_22_Pressure,2) />
		</cfif>
		<cfif M1308_d_22_Pressure eq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
		</cfif>
		
		<!---#1026-1029 M1308 D3 --->
		<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>
		<cfif len(M1308_d_32_Pressure) eq 1>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1308_d_32_Pressure,1) />
		</cfif>
		<cfif len(M1308_d_32_Pressure) eq 2>
			<cfset HHA_Record_Data = HHA_Record_Data & left(M1308_d_32_Pressure,2) />
		</cfif>
		<cfif M1308_d_32_Pressure eq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
		</cfif>
		
		<!---#1030-1043 ---->
		<!---Perform Script [ “Create wound measurement for Discharge Datasets *U” ] ---->
		
		<!---#1030-1033 M1310 --->
		<cfif M1310_Length neq '' or M1310_1 neq ''>
			<cfset gTemp = "" />
	  		<cfset gDisplay_File_Name = "" />
			<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>
		 
		<!---End Perform Script [ “Create wound measurement for Discharge Datasets *U” ] ---->
		
		<!---#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) />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,49) />
	</cfif>
	
	<!---#1055-1056 M1500 ---->
	<cfif M1500_Symptoms.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	<cfelse>
		 <cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M1500_Symptoms,1) />
	</cfif>
	
	<!---#1057-1062 M1510 --->
	<cfif M1510_Hrt_FU neq ''>
		<cfif M1510_Hrt_FU.indexOf("0 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif M1510_Hrt_FU.indexOf("1 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif M1510_Hrt_FU.indexOf("2 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif M1510_Hrt_FU.indexOf("3 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif M1510_Hrt_FU.indexOf("4 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		<cfif M1510_Hrt_FU.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,6) />
	</cfif>
	
	<cfif Assessment_Reason_M0100.indexOf("9 -") neq "-1">
		<!---#1063-1064 --->
		<cfif Urinary_INcont_when_M0530 neq ''>
			<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--->
		<cfif M1730_Depression neq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(HHA_Record_Data,1) />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />	
		</cfif>
		
		<cfif M1730_Depression.indexOf("1 -") neq "-1">
			<!---#1067-1068 --->
			<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>
			<cfif M1730a eq ''>
				<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
			</cfif>
			<!---#1069-1070 --->
			<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>
			<cfif M1730b eq ''>
				<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,4) />
		</cfif>
		
		<!---#1071-1072 --->
		<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--->
		<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,18) />
	</cfif>
	
	<!---#1081-1108 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,28) />
	
	<!---#1109-1110 M2004 --->
	<cfif M2004_Med_Int.indexOf("NA -") eq "-1" >
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2004_Med_Int,1) />
	</cfif>
	<cfif M2004_Med_Int.indexOf("NA -") neq "-1" >
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	</cfif>
	<cfif M2004_Med_Int eq '' >
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	
	<!---#1111-1112 M2010 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	
	<!---#1113-1114 M2015 --->
	<cfif M2015_Drug_Edu.indexOf("NA -") eq "-1" >
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2015_Drug_Edu,1) />
	</cfif>
	<cfif M2015_Drug_Edu.indexOf("NA -") neq "-1" >
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	</cfif>
	<cfif M2015_Drug_Edu eq '' >
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,2) />
	</cfif>
	
	<!---#1115-1118 M2020-30 --->
	<cfif Assessment_Reason_M0100.indexOf("9 -") neq "-1">
		<cfif Oral_Meds_M0780 neq ''>
			<cfif Oral_Meds_M0780.indexOf("NA -") neq "-1" >
				<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
			<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>
		<cfif Oral_Meds_M0780 neq ''>
			<cfif Inject_Meds_M0800.indexOf("NA -") neq "-1" >
				<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
			<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>
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,4) />
	</cfif>
	
	<!---#1119-1122 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,4) />
	
	<!---#1123-1138 M2100-2110 --->
	<cfif Assessment_Reason_M0100.indexOf("9 -") neq "-1">
		<!----#1123-1124 --->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100a_Equip,1) />
		
		<!--- #1125-1126 ---->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100b_Equip,1) />
		
		<!--- #1127-1128 ---->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100c_Equip,1) />
		
		<!--- #1129-1130 ---->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100d_Equip,1) />
		
		<!--- #1131-1132 ---->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100e_Equip,1) />
		
		<!--- #1133-1134 ---->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100f_Equip,1) />
		
		<!--- #1135-1136 ---->
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2100g_Equip,1) />
		
		<!---#1137-1138  --->
		<cfif M2110_Assist_Freq.indexOf("UK - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "UK" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2110_Assist_Freq,1) />
		</cfif>
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,16) />
	</cfif>
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,14) />
	
	<!---#1153-1154 M2300 --->
	<cfif Emergent_Care_M0830.indexOf("UK - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "UK" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(Emergent_Care_M0830,1) />
	</cfif>
	
	<cfif Emergent_Care_M0830.indexOf("1 -") neq "-1" or Emergent_Care_M0830.indexOf("2 -") neq "-1">
	
		<!---#1155-1155 M2310 2--->
		<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>
		
		<!---#1156-1156 M2310 3 --->
		<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>
		
		<!---#1157-1157 M2310 4 --->
		<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>
		
		<!---#1158-1158 M2310 5  --->
		<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>
		
		<!---#1159-1159 M2310 6 --->
		<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>
		
		<!---#1160-1160 M2310 7  --->
		<cfif Emergent_Care_Reason_M0840.indexOf("7 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!---#1161-1161 M2310 8   --->
		<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>
		
		<!---#1162-1162 M2310 9   --->
		<cfif 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>
		
		<!---#1163-1163 M2310 11  --->
		<cfif Emergent_Care_Reason_M0840.indexOf("11 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!---#1164-1164 M2310 12    --->
		<cfif Emergent_Care_Reason_M0840.indexOf("12 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!---#1165-1165 M2310 13 --->
		<cfif Emergent_Care_Reason_M0840.indexOf("13 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!---#1166-1166 M2310 14 --->
		<cfif Emergent_Care_Reason_M0840.indexOf("14 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!---#1167-1167 M2310 15   --->
		<cfif Emergent_Care_Reason_M0840.indexOf("15 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!---#1168-1168 M2310 16 --->
		<cfif Emergent_Care_Reason_M0840.indexOf("16 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!---#1169-1169 M2310 17   --->
		<cfif Emergent_Care_Reason_M0840.indexOf("17 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!---#1170-1170 M2310 18 --->
		<cfif Emergent_Care_Reason_M0840.indexOf("18 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!---#1171-1171 M2310 19 --->
		<cfif Emergent_Care_Reason_M0840.indexOf("19 -") 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,17) />
	</cfif>
		
	<!---#1172-1173 M2400 --->
	<cfif M2400a_Diabetic.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2400a_Diabetic,1) />
	</cfif>
	
	<!---#1174-1175 M2400 --->
	<cfif M2400b_FallsPrev.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2400b_FallsPrev,1) />
	</cfif>
	
	<!---#1176-1177 M2400 --->
	<cfif M2400c_Depress.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2400c_Depress,1) />
	</cfif>
	
	<!---#1178-1179 M2400 --->
	<cfif M2400d_Pain.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2400d_Pain,1) />
	</cfif>
	
	<!---#1180-1181 M2400 --->
	<cfif M2400e_PressUlc.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2400e_PressUlc,1) />
	</cfif>
	
	<!---#1182-1183 M2400 --->
	<cfif M2400f_PressUlcMoist.indexOf("NA - ") neq "-1">
		<cfset HHA_Record_Data = HHA_Record_Data & "NA" />
	<cfelse>
		<cfset HHA_Record_Data = HHA_Record_Data & "0" & left(M2400f_PressUlcMoist,1) />
	</cfif>
	
	<!---#1184-1185 2420 --->
	<cfif Assessment_Reason_M0100.indexOf("9 -") neq "-1">
		<cfif Discharge_Disposition_M0870 eq ''>
			<cfset HHA_Record_Data = HHA_Record_Data & "00" />
		</cfif>
		<cfif Discharge_Disposition_M0870.indexOf("UK - ") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "UK" />
		<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>
	
	<cfif (Assessment_Reason_M0100.indexOf("6") neq "-1" or Assessment_Reason_M0100.indexOf("7") neq "-1") and Inpatient_Facility_M0855.indexOf("1 -") neq "-1" >
	
		<!---#1186-1186 2430 --->
		<cfif Hospital_Reason_List_M0895.indexOf("2 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1187-1187 2430  --->
		<cfif Hospital_Reason_List_M0895.indexOf("3 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1188-1188 2430 --->
		<cfif Hospital_Reason_List_M0895.indexOf("4 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1189  --->
		<cfif Hospital_Reason_List_M0895.indexOf("5 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1190 --->
		<cfif Hospital_Reason_List_M0895.indexOf("6 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1191 --->
		<cfif Hospital_Reason_List_M0895.indexOf("7 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1192  --->
		<cfif Hospital_Reason_List_M0895.indexOf("8 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1193  --->
		<cfif Hospital_Reason_List_M0895.indexOf("9 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1194  --->
		<cfif Hospital_Reason_List_M0895.indexOf("11 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!---#1195  --->
		<cfif Hospital_Reason_List_M0895.indexOf("12 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1196  --->
		<cfif Hospital_Reason_List_M0895.indexOf("14 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1197  --->
		<cfif Hospital_Reason_List_M0895.indexOf("15 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1198  --->
		<cfif Hospital_Reason_List_M0895.indexOf("17 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1199   --->
		<cfif Hospital_Reason_List_M0895.indexOf("19 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1200  --->
		<cfif Hospital_Reason_List_M0895.indexOf("20 -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
		
		<!--- #1201  --->
		<cfif Hospital_Reason_List_M0895.indexOf("UK -") neq "-1">
			<cfset HHA_Record_Data = HHA_Record_Data & "1" />
		<cfelse>
			<cfset HHA_Record_Data = HHA_Record_Data & "0" />
		</cfif>
	<cfelse>
		<!---#1201 --->
		<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,16) />
	</cfif>
	
	<!---#1445 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,244) />
	
	<!---#1446 --->
	<cfset HHA_Record_Data = HHA_Record_Data & "%" />
<cfelse>
	<!---#Append Agency Use Filler to 1445 --->
	<cfset HHA_Record_Data = HHA_Record_Data & left(gHHA_Record_Padding,577) />
	
	<!---#Append Data End to 1446 ---->
	<cfset HHA_Record_Data = HHA_Record_Data & "%" />
</cfif>
<!--=================================================================================================================================================		                                             	End Create Data Record thru 6, 7, 8, 9 869-END Datasets 
==================================================================================================================================================-->						



<cfform name="samop" id="123">
<table>

	<tr>
	<td>
<cftextarea rows="10" 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="10" 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>