<!---
This file is Copyright � 1998-2009 by Home Care Business Services. This work may not be reproduced, in whole or in part, 
using any medium, including, but not limited to, electronic transmission, CD-ROM or published in print, without the express 
permission of Home Care Business Services.

$Revision: 1.2 $
$Id: CAHPS_CSV.cfm,v 1.2 2010/07/09 13:32:36 melissa Exp $
$Date: 2010/07/09 13:32:36 $
--->

<cfif isDefined("FORM.submit")>

 <cftry>

  <cfparam default='y' name='form.singlequotes' />
	<cfset SubmittedPatients=0>
    <cfset SampleYear = Left(#FORM.monthYear#, 4)>
    <cfset TotalPatients = #FORM.TotalPatients#>
    
    <cfquery  name="getAgencyInfo" datasource="#Application.DataSrc#">
	   SELECT Agency_Name, CAHPS, Agency_Medicare_ID, Natl_Provider_ID, Agency_Branch_ID
	         ,DATE_FORMAT('#FORM.monthYear#', "%m") AS trueMonth
	   FROM #Request.prefix_db_lookup#.Agency
	   WHERE  Agency_ID = '#session.AgencyId#'
    </cfquery>

	<cfoutput query="getAgencyInfo">
		   <cfset CAHPSid = #getAgencyInfo.CAHPS#>
		   <cfset AgencyNameOf = #getAgencyInfo.Agency_Name#>
		   <cfset AgencyMedicareID = #getAgencyInfo.Agency_Medicare_ID#>
		   <cfset AgencyProviderID = #getAgencyInfo.Natl_Provider_ID#>
		   <cfset AgencyBranchID = #getAgencyInfo.Agency_Branch_ID#>
		   <cfset SampleMonth = #getAgencyInfo.trueMonth#>
	</cfoutput>

	<cfloop list=#Form["schedule_id[]"]# index="ListItem" delimiters=",;">
		<cfset SubmittedPatients = #SubmittedPatients# + 1 />
	</cfloop>
	<cfset csvFileContent = "">
	<cfset TemplatePath="#getDirectoryFromPath(getCurrentTemplatePath())#CSVTemplate/#CAHPSid#.csv">
    <cfset csvHeaderTemplate = '' />

    <cfif #FileExists(TemplatePath)# eq "YES">
	   <cffile action = "read" file = "#getDirectoryFromPath(getCurrentTemplatePath())#CSVTemplate/#CAHPSid#.csv" variable = "csvHeaderTemplate">
    <cfelse>
	   <cffile action = "read" file = "#getDirectoryFromPath(getCurrentTemplatePath())#CSVTemplate/Default.csv"  variable="csvHeaderTemplate" >
    </cfif>

    <cfset date4mat = "mmddyyyy" />

    <cfif CAHPSid eq '58'> <!--- Arbor Associates --->
	   <cfset date4mat = "mmddyyyy" />
    <cfelseif CAHPSid eq '81'> <!--- Press Ganey --->
       <cfset date4mat = "mm/dd/yyyy" />
    </cfif>


    <cfset PaySrcMissing = "M" />

    <cfif CAHPSid eq '81'> <!--- Press Ganey --->
    	<cfset PaySrcMissing = "0" />
    </cfif>
   	<cfif CAHPSid eq '79'> <!--- OCS HomeCare --->
    	<cfset PaySrcMissing = "0" />
    </cfif>


    <cfset AdmissionMissing = "M" />

    <cfif CAHPSid eq '81'> <!--- Press Ganey --->
       <cfset AdmissionMissing = "0" />
    </cfif>
    <cfif CAHPSid eq '79'> <!--- OCS HomeCare --->
       <cfset AdmissionMissing = "0" />
    </cfif>


  	<cfset LanguageNum = 'EN' />

    <cfif CAHPSid eq '66'> <!--- DSS --->
    	<cfset LanguageNum = '1' />
   	</cfif>
   	<cfif CAHPSid eq '79'> <!--- OCS HomeCare --->
    	<cfset LanguageNum = '1' />
   	</cfif>


  <cfset EOR = "$" /> <!--- End of Record indidicator - Normally just CRLF, but use this IF needed --->


 <!--- <cfoutput>#csvHeaderTemplate#</cfoutput>--->

    <cfset csvFileContent="#csvFileContent##csvHeaderTemplate#">
	<cfset SkilledVisitTotal = 0 />
    <cfset ctr = 0 />

	<cfloop list=#Form["schedule_id[]"]# index="ListItem" delimiters=",;">
	    <cfset ctr = ctr + 1 />
	    <cfset LookBack_visits =  0 >
	    <cfset SkilledVisitTotal =  0 >
   	    <cfquery  name="LookBackTotal" datasource="#Application.DataSrc#">
			SELECT  ifnull(count(Schedule_ID),0) as LookBack  FROM 
			#Request.prefix_db_agency#.pSchedules 
			INNER JOIN #Request.prefix_db_agency#.pPatients ON pSchedules.Patient_ID = pPatients.Patient_ID
			AND pPatients.Status In (0,1,4)
			INNER JOIN #Request.prefix_db_agency#.pAssessments ON pSchedules.Assmt_ID = pAssessments.Assmt_ID
			AND pAssessments.status = 0
			INNER JOIN #Request.prefix_db_lookup#.Agency ON pPatients.Loc_ID = Agency.Agency_ID
		    LEFT OUTER JOIN #Request.prefix_db_lookup#.pEmployee ON pSchedules.Emp_ID = pEmployee.Emp_ID 
		    WHERE  pPatients.Patient_ID = #ListItem#
			AND pSchedules.Visit_Date < DATE_ADD('#FORM.monthYear#', INTERVAL 1 MONTH)
            AND pSchedules.Status = 0
           <!--- And pAssessments.F26 IN ('1 - Start of care - further visits planned','4 - Recertification (follow-up) reassessment')--->
            AND pSchedules.Visit_Type <> 'Assessment'
			GROUP BY pPatients.Patient_ID			
	    </cfquery>
	 	<cfoutput query="LookBackTotal">
			<cfset LookBack_visits = #LookBack#>
		</cfoutput>
	 
	 
	 	<cfquery  name="SkilledVisitsTotal" datasource="#Application.DataSrc#">
			SELECT  ifnull(count(Schedule_ID),0) as SkilledVisitsTotalCount  FROM 
			#Request.prefix_db_agency#.pSchedules 
			INNER JOIN #Request.prefix_db_agency#.pPatients ON pSchedules.Patient_ID = pPatients.Patient_ID
			AND pPatients.Status In (0,1,4)
			INNER JOIN #Request.prefix_db_agency#.pAssessments ON pSchedules.Assmt_ID = pAssessments.Assmt_ID
			AND pAssessments.status = 0
			INNER JOIN #Request.prefix_db_lookup#.Agency ON pPatients.Loc_ID = Agency.Agency_ID
		    LEFT OUTER JOIN #Request.prefix_db_lookup#.pEmployee ON pSchedules.Emp_ID = pEmployee.Emp_ID 
		    WHERE  pPatients.Patient_ID = #ListItem#
			AND pSchedules.Visit_Date < DATE_ADD('#FORM.monthYear#', INTERVAL 1 MONTH)
            AND pSchedules.Status = 0
            <!--- And pAssessments.F26 IN ('1 - Start of care - further visits planned','4 - Recertification (follow-up) reassessment') --->
            AND pSchedules.Skill IN ('SN','PT','OT','ST') 
			GROUP BY pPatients.Patient_ID			
		 </cfquery>
		<cfoutput query="SkilledVisitsTotal">
			<cfset SkilledVisitTotal = #SkilledVisitsTotalCount#>
		</cfoutput>

      <cfquery  name="GetP" datasource="#Application.DataSrc#">
		    SELECT pPatients.Pt_Last, pPatients.Pt_First, pEmployee.Emp_Last, pPatients.Patient_ID,
		    pSchedules.Visit_Date, pSchedules.StartTime, pSchedules.EndTime, pSchedules.Total_Units, pSchedules.Schedule_ID,
		    pAssessments.F26, "" AS Current_Payment_Sources_M0150,pAssessments.Assmt_ID,
		    pPatients.Pt_Middle, pPatients.Pt_Suffix, pPatients.Pt_Street, pPatients.Email,
		    pPatients.Pt_City, pPatients.Pt_State, pPatients.Pt_Zip, pPatients.Pt_Gender, pPatients.Pt_DOB,
		    pPatients.Pt_Phone, pPatients.Pt_Agy_ID, "" AS Financial_Factors_M0150, pSchedules.Skill AS Visit_Type,
		    pAdmit.Admission_Source AS Source_of_Admission, pAssessments.F26 AS Assessment_Reason_M0100,
		    pAdmit.M0030_START_CARE_DT AS Start_of_Care_M0030, pAssessments.F181 AS Date_Discharge_M0906,
		    pAssessments.F33 AS Discharged_From_M0175, pAssessments.F78 AS Dress_Upper_M0650,
		    pAssessments.F79 AS Dress_Lower_M0660, pAssessments.F80 AS Bathing_M0670,
		    pAssessments.F81 AS M1840_Toilet, pAssessments.F83 AS Transferring_M0690,
		    pAssessments.F163 AS Eating_M0710, "" AS M1016_DX_NA, pAssessments.F77 AS Grooming_M0640,
		    pAssessments.F82 AS Toileting_M0680, pAssessments.F84 AS Ambulation_M0700,
		    "" AS Meal_Prep_M0720, pAssessments.F29 AS Transport_M0730, "" AS Laundry_M0740,
		    "" AS Shopping_M0760, "" AS Housekeeping_M0750, "" AS Use_Phone_M0770,
		    pAssessments.F82 AS M1845_Toilet, COUNT(pSchedules.Schedule_ID) as LookBack
		    FROM #Request.prefix_db_agency#.pSchedules
		    INNER JOIN #Request.prefix_db_agency#.pPatients ON pSchedules.Patient_ID = pPatients.Patient_ID
		    INNER JOIN #Request.prefix_db_lookup#.pEmployee ON pSchedules.Emp_ID = pEmployee.Emp_ID
		    INNER JOIN #Request.prefix_db_agency#.pAssessments ON pSchedules.Assmt_ID = pAssessments.Assmt_ID
		    INNER JOIN #Request.prefix_db_agency#.pAdmit ON pAdmit.Admit_ID = pAssessments.Admit_ID
		    INNER JOIN #Request.prefix_db_lookup#.Agency ON pPatients.Loc_ID = Agency.Agency_ID
		    WHERE pPatients.Patient_ID = #ListItem#
		    AND pSchedules.Status = 0 
		    AND LEFT(pAssessments.F26,1) IN ( '1','4','9')
		    AND pAssessments.Status = 0
		    <cfif application.NoEmptyDates>
				AND pAssessments.F177 <> '0000-00-00'
				AND pAssessments.F178 <> '0000-00-00'
			</cfif>
		    AND pSchedules.Visit_Date > DATE_SUB('#FORM.monthYear#', INTERVAL 1 MONTH)
			AND pSchedules.Visit_Date < DATE_ADD('#FORM.monthYear#', INTERVAL 1 MONTH)
			AND pSchedules.Emp_ID <> 0
			AND pPatients.Status IN (0,1,4)
			AND pAdmit.Status = 0
			<!--- CAHPS Requirements --->
			<!--- 1. Patient's age ≥ 18 years - calculate age from pPatients table using Pt_DOB --->
			<!--- AND pPatients.Pt_DOB IS NOT NULL 
			AND pPatients.Pt_DOB <> '0000-00-00'
			AND TIMESTAMPDIFF(YEAR, pPatients.Pt_DOB, CURDATE()) >= 18--->
			
			<!--- 2. At least 2 skilled visits (SN/PT/OT/SLP) - verify using pschedules table --->
			AND pPatients.Patient_ID IN (
			    SELECT ps2.Patient_ID 
			    FROM #Request.prefix_db_agency#.pSchedules ps2
			    INNER JOIN #Request.prefix_db_agency#.pAssessments pa2 ON ps2.Assmt_ID = pa2.Assmt_ID
			    WHERE ps2.Status = 0 
			    AND pa2.Status = 0
			    AND ps2.Skill IN ('SN', 'PT', 'OT', 'SLP')
			    AND ps2.Visit_Date > DATE_SUB('#FORM.monthYear#', INTERVAL 1 MONTH)
			    AND ps2.Visit_Date < DATE_ADD('#FORM.monthYear#', INTERVAL 1 MONTH)
			    GROUP BY ps2.Patient_ID
			    HAVING COUNT(DISTINCT ps2.Schedule_ID) >= 2
			)
			
			<!--- 3. Primary payer is Medicare or Medicaid - verify patient has "Primary Payer" --->
			AND pPatients.Patient_ID IN (
			    SELECT pp.Patient_ID 
			    FROM #Request.prefix_db_agency#.pPtPayer pp
			    INNER JOIN #Request.prefix_db_agency#.pPayer p ON pp.Payer_ID = p.Pay_ID
			    WHERE pp.Payer_Responsibility = 'P - Primary'
			    AND (LEFT(p.M0150, 1) IN (1,3))
			    AND pp.Status < 2
			    AND p.Status = 0
			)
			GROUP BY pPatients.Patient_ID
		</cfquery>
		


		<cfoutput query="GetP">

		   <cfquery  name="GetPayer" datasource="#Application.DataSrc#">
		       SELECT *,pPayer.Output AS payoutput FROM #Request.prefix_db_agency#.pPtPayer
				 JOIN #Request.prefix_db_agency#.pPayer ON pPtPayer.Payer_ID = pPayer.Pay_ID
				 WHERE Patient_ID  =  #Patient_ID#
		   </cfquery>

		    <cfquery  name="getmedicare"  dbtype="query">
		       SELECT * FROM GetPayer  WHERE payoutput  =  'Medicare'
		   </cfquery>

			<cfset Current_Payment_Sources_M0150 =  '#GetPayer.M0150#' />
			<cfset Medicare_Number_M0063  =  '#getmedicare.Sub_HIC#' />
			<cfset Medicaid_Number_M0065  =  '#GetPayer.Sub_HIC#' />

			<cfset HHRG_175_Score = "" />
			<cfset HHRG_230_Score = "" />
			<cfset HHRG_250_Score = "" />
			<cfset HHRG_390_Score = "" />
			<cfset HHRG_420_Score = "" />
			<cfset HHRG_440_Score = "" />

			<cfquery  name="problems" datasource="#Application.DataSrc#">
				   SELECT *  FROM #Request.prefix_db_agency#.pProblem 
				   JOIN #Request.prefix_db_agency#.pAssessments ON pProblem.Assmt_ID = pAssessments.Assmt_ID
				   WHERE  <!--- Assmt_ID = <cfqueryparam value="#Assmt_ID#"  cfsqltype="CF_SQL_INTEGER"> AND  --->
				   pProblem.status = <cfqueryparam value="0"  cfsqltype="CF_SQL_INTEGER">
				    AND pAssessments.status = <cfqueryparam value="0"  cfsqltype="CF_SQL_INTEGER">
				   AND pAssessments.Patient_ID = <cfqueryparam value="#Patient_ID#"  cfsqltype="CF_SQL_INTEGER">
				   AND LEFT(pAssessments.F26,1) IN ( '1','4' )
				   AND (M0_No  like 'M1021%' OR M0_No  like 'M1023%')
                 
				   GROUP BY Problem_ID
			</cfquery>
		   <cfquery  name="getprimary" dbtype="query">
		       SELECT * FROM problems
				  WHERE  M0_No like 'M1021%' 
               and Status = 0 
              
		   </cfquery>
           <cfset HHRG_175_Score = #Trim(Replace(getprimary.Description,',','','all'))# />   
		   <!---<cfset HHRG_175_Score = "#getprimary.Description#" />--->
		   <cfquery  name="getothers" dbtype="query">
		       SELECT * FROM problems
				  WHERE  M0_No like 'M1023%'  
               and Status = 0
              
		   </cfquery>
		   <cfif getothers.recordcount GTE 1 >
		   		<!---<cfset HHRG_230_Score = #getothers["Description"][1]# />--->
               <cfset HHRG_230_Score = '#Trim(Replace(getothers["Description"][1],',','','all'))#' />
		   </cfif>
		   <cfif getothers.recordcount GTE 2 >
					
               <cfset HHRG_250_Score = '#Trim(Replace(getothers["Description"][2],',','','all'))#' />
			</cfif>
		   <cfif getothers.recordcount GTE 3 >
					
               <cfset HHRG_390_Score =  '#Trim(Replace(getothers["Description"][3],',','','all'))#' />
               
			</cfif>
		   <cfif getothers.recordcount GTE 4 >
					
               <cfset HHRG_420_Score =  '#Trim(Replace(getothers["Description"][4],',','','all'))#' />
			</cfif>
		   <cfif getothers.recordcount GTE 5 >
					
               <cfset HHRG_440_Score =  '#Trim(Replace(getothers["Description"][5],',','','all'))#' />
               
			</cfif>
			<!--- <cfif  Patient_ID EQ '52'>
				<cfdump var="#problems#"> <cfdump var="#getprimary#"><cfdump var="#getothers#"><cfabort>
				</cfif> --->
		
			<cfset Gender="M">
			<cfif #Pt_Gender# eq "">
			<cfelse>
				<cfset Gender=#LEFT(Pt_Gender, 1)#>
			</cfif>
			<cfset HMO="M">
			<cfif #find("HMO",UCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset HMO="1">
			<cfelse>
				<cfset HMO="2">
			</cfif>
			<cfset MedEligible="M">
			<cfif #Financial_Factors_M0150# eq "">
				<cfset MedEligible="M">
			<cfelseif #find("medicaid",LCase(Financial_Factors_M0150))# gt 0 AND #find("medicare",LCase(Financial_Factors_M0150))# gt 0>
				<cfset MedEligible="1">
			<cfelseif #find("medicaid",LCase(Financial_Factors_M0150))# gt 0 AND #find("medicare",LCase(Financial_Factors_M0150))# eq 0>
				<cfset MedEligible="2">
			<cfelseif #find("medicaid",LCase(Financial_Factors_M0150))# eq 0 AND #find("medicare",LCase(Financial_Factors_M0150))# gt 0>
				<cfset MedEligible="2">
			<cfelseif #find("medicaid",LCase(Financial_Factors_M0150))# eq 0 AND #find("medicare",LCase(Financial_Factors_M0150))# eq 0>
				<cfset MedEligible="3">
			</cfif>
			<cfset PayerHMO="M">
			<cfif #Financial_Factors_M0150# eq "">
				<cfset PayerHMO="M">
			<cfelseif #find("medicare",LCase(Financial_Factors_M0150))# gt 0>
				<cfset PayerHMO="1">
			<cfelseif #find("medicaid",LCase(Financial_Factors_M0150))# gt 0 AND #find("medicare",LCase(Financial_Factors_M0150))# eq 0>
				<cfset PayerHMO="2">
			<cfelseif #find("medicaid",LCase(Financial_Factors_M0150))# eq 0 AND #find("medicare",LCase(Financial_Factors_M0150))# eq 0 AND #find("self pay",LCase(Financial_Factors_M0150))# eq 0>
				<cfset PayerHMO="3">
			<cfelseif #find("medicaid",LCase(Financial_Factors_M0150))# eq 0 AND #find("medicare",LCase(Financial_Factors_M0150))# eq 0 AND #find("self pay",LCase(Financial_Factors_M0150))# > 0>
				<cfset PayerHMO="4">
			</cfif>

			<cfset PaySrc0 = PaySrcMissing>
			<cfif #find("0",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc0="1">
			</cfif>
			
			<cfset PaySrc1 = PaySrcMissing>
			<cfif #find("medicare",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc1="1">
			</cfif>
			<cfset PaySrc2 = PaySrcMissing>
			<cfif #find("2",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc2="1">
			</cfif>
			
			<cfset PaySrc3 = PaySrcMissing>
			<cfif #find("3",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc3="1">
			</cfif>

			<cfset PaySrc4 = PaySrcMissing>
			<cfif #find("4",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc4="1">
			</cfif>
	
			<cfset PaySrc5 = PaySrcMissing>
			<cfif #find("5",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc5="1">
			</cfif>

			<cfset PaySrc6 = PaySrcMissing>
			<cfif #find("6",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc6="1">
			</cfif>
	
			<cfset PaySrc7 = PaySrcMissing>
			<cfif #find("7",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc7="1">
			</cfif>
	
			<cfset PaySrc8 = PaySrcMissing>
			<cfif #find("8",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc8="1">
			</cfif>
	
			<cfset PaySrc9 = PaySrcMissing>
			<cfif #find("9",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc9="1">
			</cfif>
	
			<cfset PaySrc10 = PaySrcMissing>
			<cfif #find("10",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc10="1">
			</cfif>
			<cfset PaySrc11 = PaySrcMissing>
			<cfif #find("11",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrc11="1">
			</cfif>

			<cfset PaySrcUK = PaySrcMissing>
			<cfif #find("Unknown",LCase(Current_Payment_Sources_M0150))# gt 0>
				<cfset PaySrcUK="1">
			</cfif>
			
			<!--- Discharged_From_M0175 Set AdmissionSource --->
			<cfset AdmissionSource = AdmissionMissing>
			<cfif #LEFT(Discharged_From_M0175,1)# GT 0 AND #LEFT(Discharged_From_M0175,1)# LT 7>
				<cfset AdmissionSource = #LEFT(Discharged_From_M0175,1)#>
			</cfif>

			<!--- Nursing Facility --->
			<cfset AdmissionSourceNF = AdmissionMissing>
			<cfif #find("1",LCase(Discharged_From_M0175))# gt 0>
				<cfset AdmissionSourceNF="1">
			</cfif>

			<!--- Skilled Nursing Facility --->
			<cfset AdmissionSourceSNF = AdmissionMissing>
			<cfif #find("2",LCase(Discharged_From_M0175))# gt 0>
				<cfset AdmissionSourceSNF="1">
			</cfif>

			<cfset AdmissionSourceIPPS = AdmissionMissing>
			<cfif #find("3",LCase(Discharged_From_M0175))# gt 0>
				<cfset AdmissionSourceIPPS="1">
			</cfif>
	
			<cfset AdmissionSourceLTCH = AdmissionMissing>
			<cfif #find("4",LCase(Discharged_From_M0175))# gt 0>
				<cfset AdmissionSourceLTCH="1">
			</cfif>

			<cfset AdmissionSourceIRF = AdmissionMissing>
			<cfif #find("5",LCase(Discharged_From_M0175))# gt 0>
				<cfset AdmissionSourceIRF="1">
			</cfif>

			<cfset AdmissionSourcePsych = AdmissionMissing>
			<cfif #find("6",LCase(Discharged_From_M0175))# gt 0>
				<cfset AdmissionSourcePsych="1">
			</cfif>
	
			<cfset AdmissionSourceOther = AdmissionMissing>
			<cfif #find("7",LCase(Discharged_From_M0175))# gt 0>
				<cfset AdmissionSourceOther="1">
			</cfif>

			<cfset AdmissionSourceNone = AdmissionMissing>
			<cfif #find("NA -",LCase(Discharged_From_M0175))# gt 0>
				<cfset AdmissionSourceNone="1">
			</cfif>



		    <cfset esrd = "2" />
		    <cfif #find("N18.6", LCASE(HHRG_175_Score))# gt 0
		         or #find("N18.6", LCASE(HHRG_230_Score))# gt 0
		         or #find("N18.6", LCASE(HHRG_250_Score))# gt 0
		         or #find("N18.6", LCASE(HHRG_390_Score))# gt 0
		         or #find("N18.6", LCASE(HHRG_420_Score))# gt 0
		         or #find("N18.6", LCASE(HHRG_440_Score))# gt 0
		         or #find("585.6", LCASE(HHRG_175_Score))# gt 0
		         or #find("585.6", LCASE(HHRG_230_Score))# gt 0
		         or #find("585.6", LCASE(HHRG_250_Score))# gt 0
		         or #find("585.6", LCASE(HHRG_390_Score))# gt 0
		         or #find("585.6", LCASE(HHRG_420_Score))# gt 0
		         or #find("585.6", LCASE(HHRG_440_Score))# gt 0>
		       <cfset esrd = "1" />
		     </cfif>

			<!---
			for these fields: Grooming_M0640, Dress_Upper_M0650, Dress_Lower_M0660, Bathing_M0670, Toileting_M0680, Transferring_M0690, Ambulation_M0700, 
			Eating_M0710, Meal_Prep_M0720, Transport_M0730, Laundry_M0740, Shopping_M0760, Housekeeping_M0750, Use_Phone_M0770, M1845_Toilet
			if the left-justified number > 0 (and not blank) - that is counted as a deficit towards the total deficits for this patient
			--->
			<cfset ADLDeficits = 0 />
			<cfif #LEFT(Grooming_M0640, 1)# neq "" AND IsNumeric(#LEFT(Grooming_M0640, 1)#) AND #LEFT(Grooming_M0640, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Dress_Upper_M0650, 1)# neq "" AND IsNumeric(#LEFT(Dress_Upper_M0650, 1)#) AND #LEFT(Dress_Upper_M0650, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Dress_Lower_M0660, 1)# neq "" AND IsNumeric(#LEFT(Dress_Lower_M0660, 1)#) AND #LEFT(Dress_Lower_M0660, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Bathing_M0670, 1)# neq "" AND IsNumeric(#LEFT(Bathing_M0670, 1)#) AND #LEFT(Bathing_M0670, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Toileting_M0680, 1)# neq "" AND IsNumeric(#LEFT(Toileting_M0680, 1)#) AND #LEFT(Toileting_M0680, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Transferring_M0690, 1)# neq "" AND IsNumeric(#LEFT(Transferring_M0690, 1)#) AND #LEFT(Transferring_M0690, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Ambulation_M0700, 1)# neq "" AND IsNumeric(#LEFT(Ambulation_M0700, 1)#) AND #LEFT(Ambulation_M0700, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Eating_M0710, 1)# neq "" AND IsNumeric(#LEFT(Eating_M0710, 1)#) AND #LEFT(Eating_M0710, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Meal_Prep_M0720, 1)# neq "" AND IsNumeric(#LEFT(Meal_Prep_M0720, 1)#) AND #LEFT(Meal_Prep_M0720, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Transport_M0730, 1)# neq "" AND IsNumeric(#LEFT(Transport_M0730, 1)#) AND #LEFT(Transport_M0730, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Laundry_M0740, 1)# neq "" AND IsNumeric(#LEFT(Laundry_M0740, 1)#) AND #LEFT(Laundry_M0740, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Shopping_M0760, 1)# neq "" AND IsNumeric(#LEFT(Shopping_M0760, 1)#) AND #LEFT(Shopping_M0760, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Housekeeping_M0750, 1)# neq "" AND IsNumeric(#LEFT(Housekeeping_M0750, 1)#) AND #LEFT(Housekeeping_M0750, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(Use_Phone_M0770, 1)# neq "" AND IsNumeric(#LEFT(Use_Phone_M0770, 1)#) AND #LEFT(Use_Phone_M0770, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>
			<cfif #LEFT(M1845_Toilet, 1)# neq "" AND IsNumeric(#LEFT(M1845_Toilet, 1)#) AND #LEFT(M1845_Toilet, 1)# gt 0>
				<cfset ADLDeficits=#ADLDeficits#+1>
			</cfif>

			<cfif #M1016_DX_NA# eq "">
				<cfset SurgicalDischarge="1">	
			<cfelse>
				<cfset SurgicalDischarge="2">
			</cfif>
			
			<cfset TelephoneNumber=#Replace(#Pt_Phone#, "-", "", "all")#>
	
	      <cfset DeathDate = "" />
	      <cfset MaternityOnly = "" />
	      <cfset HospicePatient = "" />
	      <cfset PatientsServed = "" />
	      <cfset NoPublicity = "" />
	      <cfset SOCClinical = "" />
	      <cfset DCClinical = "" />
	      <cfset CaseManager = "" />
	      <cfset ReferringPhysician = "" />
	      <cfset ReferringFacility = "" />

	      <cfset HomeHealthVisitType = "" />
	      <cfset ReferralSource = "" />
	      <cfset PhysicalTherapy = "" />
	      <cfset HomeHealthAide = "" />
	      <cfset SocialService = "" />
	      <cfset OccupationalTherapy = "" />
	      <cfset CompanionHomemaker = "" />
	      <cfset SpeechTherapy = "" />
			
			<cfset tempTemplate=#csvHeaderTemplate#>
	  		<cfset blank = "" />
			<cfset tempTemplate=#Replace(#tempTemplate#,"DeathDate", #DeathDate#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"MaternityOnly", #MaternityOnly#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"HospicePatient", #HospicePatient#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"PatientsServed", #PatientsServed#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"NoPublicity", #NoPublicity#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"SOCClinical", #SOCClinical#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"DCClinical", #DCClinical#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"CaseManager", #CaseManager#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"ReferringPhysician", #ReferringPhysician#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"ReferringFacility", #ReferringFacility#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"HomeHealthVisitType", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"ReferralSource", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"PhysicalTherapy", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"HomeHealthAide", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"SocialService", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"OccupationalTherapy", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"CompanionHomemaker", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"SpeechTherapy", #blank#)#>
	      	<!--- Header Info --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"Survey Designator", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"Client Number", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"Provider Name", #Replace(AgencyNameOf, ",", "", "ALL")#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"Provider Id", #AgencyMedicareID#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"Unit", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"Team", #blank#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"NPI", #AgencyProviderID#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"Branch ID Number", #AgencyBranchID#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"Sample Month", #SampleMonth#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"Sample Year", #SampleYear#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"Patients Served", #TotalPatients#)#>
			<cfset tempTemplate=#Replace(#tempTemplate#,"Submitted Patients", #SubmittedPatients#)#>

			<!--- First Name --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PatientFirstName", #Replace(Pt_First, ",", "", "ALL")#)#>
			<!--- Middle Initial --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PatientMiddleInitial", #Replace(LEFT(Pt_Middle,1), ",", "", "ALL")#)#>
			<!--- Last Name --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PatientLastName", #Replace(Pt_Last, ",", "", "ALL")#)#>
			<!--- Name Suffix --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PatientSuffix", #Pt_Suffix#)#>
			<!--- Address --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"Address", #Replace(Pt_Street, ",", "", "ALL")# )#>
			<!--- Address 2--->
			<cfset tempTemplate=#Replace(#tempTemplate#,"Address 2", #Replace(Email, ",", "", "ALL")# )#>
			<!---City --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"City", #Replace(Pt_City, ",", "", "ALL")#)#>
			<!---State --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"State", #Pt_State#)#>

			<!---Zip --->
			<cfif form.singlequotes eq 'y'>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"Zip", "'" & #Pt_Zip#)#>
			<cfelse>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"Zip", #Pt_Zip#)#>
			</cfif>
      
			<!--- Gender --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"Gender", #Gender#)#>
			
			<!--- Visit Type --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"VisitType", "3")#>

			<!--- SOC --->
			<cfif form.singlequotes eq 'y'>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"StartOfCare", "'" & #DateFormat(Start_of_Care_M0030,date4mat)#)#>
			<cfelse>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"StartOfCare", #DateFormat(Start_of_Care_M0030,date4mat)#)#>
			</cfif>
			
			<!--- Discharge Date --->
			<cfif form.singlequotes eq 'y'>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"DischargeDate", "'" & #DateFormat(Date_Discharge_M0906,date4mat)#)#>
			<cfelse>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"DischargeDate", #DateFormat(Date_Discharge_M0906,date4mat)#)#>
			</cfif>
			
			<!--- AssessmentReason --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"AssessmentReason", #LEFT(Assessment_Reason_M0100, 1)#)#>
			
			<!--- DOB --->
			<cfif form.singlequotes eq 'y'>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"PatientDOB", "'" & #DateFormat(Pt_DOB,date4mat)#)#>
			<cfelse>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"PatientDOB", #DateFormat(Pt_DOB,date4mat)#)#>
			</cfif>
			
			<!--- Patient Phone --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PatientPhone", #Replace(TelephoneNumber, ",", "", "ALL")#)#>
			
			<!--- MedicareNumber --->
			<cfif form.singlequotes eq 'y'>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"MedicareNumber", "'#Medicare_Number_M0063#")#>
			<cfelse>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"MedicareNumber", "#Medicare_Number_M0063#")#>
			</cfif>
      
			<!--- MedicaidNumber --->
			<cfif form.singlequotes eq 'y'>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"MedicaidNumber", "'#Medicaid_Number_M0065#")#>
			<cfelse>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"MedicaidNumber", "#Medicaid_Number_M0065#")#>
			</cfif>

			<!--- Language --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"Language", #LanguageNum#)#>
			
			<!--- MRN --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"MRN", #Pt_Agy_ID#)#>
			
			<!--- Skilled Visits --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"SkilledVisits", #SkilledVisitTotal#)#>
			
			<!--- Lookback Period Visits --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"LookbackPeriodVisits", #LookBack_visits#)#>
			
			<!--- Admission Source NF --->


			<!--- JDB 
			<cfoutput><br>Source_of_Admission: #Source_of_Admission#</cfoutput>
			<cfoutput><br>Source_of_Admission 1: #LEFT(Source_of_Admission, 1)#</cfoutput>
			--->			

			<!--- Payer --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"Payer", #Replace(PayerHMO, ",", "", "ALL")#)#>
			
			<!--- HMO --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"HMO", #Replace(HMO, ",", "", "ALL")#)#>
			
			<!--- MedElgible --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"MedEligible", #MedEligible#)#>
			
			<!--- PrimaryDiagnosis --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PrimaryDiagnosis", #HHRG_175_Score#)#>
			
            <!--- OtherDiagnosis --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"OtherDiagnosis1", #HHRG_230_Score#)#>
			
			<!--- OtherDiagnosis --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"OtherDiagnosis2", #HHRG_250_Score#)#>
			
			<!--- OtherDiagnosis --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"OtherDiagnosis3", #HHRG_390_Score#)#>
			
			<!--- OtherDiagnosis --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"OtherDiagnosis4", #HHRG_420_Score#)#>
			
			<!--- OtherDiagnosis --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"OtherDiagnosis5", #HHRG_440_Score#)#>
						
			<!--- SurgicalDischarge --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"SurgicalDischarge", #SurgicalDischarge#)#>
			
			<!--- ESRD --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"ESRD", #esrd#)#>
			

			<!--- ADL_Deficits BLANK--->
			<cfset tempTemplate=#Replace(#tempTemplate#,"ADL_Deficits_BLANK", #blank#)#>

			<!--- ADL_Deficits --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"ADL_Deficits", #ADLDeficits#)#>
			
			<!--- ADL_DressUpper --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"ADL_DressUpper", #LEFT(Dress_Upper_M0650, 1)#)#>
			
			<!--- ADL_DressLower --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"ADL_DressLower", #LEFT(Dress_Lower_M0660, 1)#)#>
			
			<!--- ADL_Bathing --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"ADL_Bathing", #LEFT(Bathing_M0670, 1)#)#>
			
			<!--- ADL_Toileting --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"ADL_Toileting", #LEFT(M1840_Toilet, 1)#)#>
			
			<!--- ADL_Transferring --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"ADL_Transferring", #LEFT(Transferring_M0690, 1)#)#>
			
			<!--- ADL_Feed --->

            <cfif CAHPSid eq '66'> <!--- DSS --->
			 <cfset tempTemplate=#Replace(#tempTemplate#,"ADL_Feed", #blank#)#>
			<cfelse>
			 <cfset tempTemplate=#Replace(#tempTemplate#,"ADL_Feed", #LEFT(Eating_M0710, 1)#)#>
			</cfif>

			<!--- PaySrcNone --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc0", #PaySrc0#)#>

			<!--- PaySrcMedicare --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc1", #PaySrc1#)#>

			<!--- PaySrcMedicareHMO --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc2", #PaySrc2#)#>

			<!--- PaySrcMedicaid --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc3", #PaySrc3#)#>

			<!--- PaySrcMedicaidHMO --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc4", #PaySrc4#)#>

			<!--- PaySrcWorkComp --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc5", #PaySrc5#)#>

			<!--- PaySrcTitle --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc6", #PaySrc6#)#>

			<!--- PaySrcOtherGov --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc7", #PaySrc7#)#>

			<!--- PaySrcPvtInsur --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc8", #PaySrc8#)#>

			<!--- PaySrcPvtHMO --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc9", #PaySrc9#)#>

			<!--- PaySrcSelf --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc10", #PaySrc10#)#>

			<!--- PaySrcOther --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrc11", #PaySrc11#)#>

			<!--- PaySrcUK --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"PaySrcUK", #PaySrcUK#)#>
			
			<!--- HMO --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"HMO", #HMO#)#>

			<!--- AdmissionSourceNF --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"AdmissionSourceNF", #AdmissionSourceNF#)#>

			<!--- AdmissionSourceSNF --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"AdmissionSourceSNF", #AdmissionSourceSNF#)#>

			<!--- AdmissionSourceIPPS --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"AdmissionSourceIPPS", #AdmissionSourceIPPS#)#>

			<!--- AdmissionSourceLTCH --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"AdmissionSourceLTCH", #AdmissionSourceLTCH#)#>

			<!--- AdmissionSourceIRF --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"AdmissionSourceIRF", #AdmissionSourceIRF#)#>

			<!--- AdmissionSourcePsych --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"AdmissionSourcePsych", #AdmissionSourcePsych#)#>

			<!--- AdmissionSourceOther --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"AdmissionSourceOther", #AdmissionSourceOther#)#>

			<!--- AdmissionSourceNone --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"AdmissionSourceNone", #AdmissionSourceNone#)#>

			<!--- AdmissionSource --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"AdmissionSource", #AdmissionSource#)#>
			
      <!--- End of Record --->
			<cfset tempTemplate=#Replace(#tempTemplate#,"EOR", #EOR#)#>

			<cfset csvFileContent="#csvFileContent##tempTemplate#">

		</cfoutput>
		
		<!---
	   #ListItem#
	   ---> 
	</cfloop>


<!--- JDB --->

    <cfif CAHPSid eq '58'> <!--- Arbor Associates --->
   			<cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Deficits_BLANK", "ADL_Deficits")#>
    <cfelseif CAHPSid eq "66"> <!--- DSS --->
			   <cfset csvFileContent=#Replace(#csvFileContent#,"Provider Name", "ProviderName")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"Branch ID Number", "Branch")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"Provider Id", "ProviderId")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"Sample Month", "SampleMonth")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"Sample Year", "SampleYear")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"Patients Served", "TotalPatientsServed")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"Submitted Patients", "TotalPatientsEligible")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"MRN", "MedicalRecordNumber")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientFirstName", "FirstName")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientMiddleInitial", "MiddleInitial")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientLastName", "LastName")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientDOB", "DOB")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"Address 2", "Address2")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"Address", "Address1")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientPhone", "PhoneNumber")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"SkilledVisits", "SkilledHomeVisits")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc1", "MedicarePayer")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc3", "MedicaidPayer")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc8", "PrivatePayer")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc11", "OtherPayer")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceLTCH", "SourceOfAdmissionHospital")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceIRF", "SourceOfAdmissionRehab")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceSNF", "SourceOfAdmissionSkilledNursingFacility")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNF", "SourceOfAdmissionNursingHome")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceIPPS", "SourceOfAdmissionOtherInpatient")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNone", "SourceOfAdmissionCommunity")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"HMO", "HMOIndicator")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"MedEligible", "DualEligible")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"SurgicalDischarge", "CareRelatedToSurgicalDischargeIndicator")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"ESRD", "EndStageRenalDisease")#>
			<!--- JDB: Removed per DSS <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Deficits", "ADLNonIndependent")#> --->
			<!--- JDB: Adding again per Zofia Dotson @ DSS and Kay Olsen @ Alert Home Health --->
			   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Deficits_BLANK", "ADLNonIndependent")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_DressUpper", "ADLDressUpper")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_DressLower", "ADLDressLower")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Bathing", "ADLBathing")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Toileting", "ADLToileting")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Transferring", "ADLTransferring")#>
			   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Feed", "ADLFeed")#>
   
    <cfelseif CAHPSid eq "67"> <!--- Home Town --->
  
		   <cfset csvFileContent=#Replace(#csvFileContent#,"SampleMonth", "SampleMonth")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"SampleYear", "SampleYear")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"CMSCertNum", "LocationCode")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"Provider Id", "CMSProviderID")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"NPI", "NPINumberID")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"Patients Served", "TotalServed")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientFirstName", "FirstName")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientMiddleInitial", "MiddleInitial")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientLastName", "LastName")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientDOB", "Birthday")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"Gender", "Gender")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"Address", "Address1")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"Address 2", "Address2")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"City", "Pt_City")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"State", "State")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"Zip", "ZipCode")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientPhone", "Pt_Phone")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"MRN", "MedicalRecord")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"Language", "Language")#> 
		   <cfset csvFileContent=#Replace(#csvFileContent#,"SkilledVisits", "SkilledVisits")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"LookbackPeriodVisits", "LookbackVisits")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc1", "MedicarePayer")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc3", "MedicaidPayer")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"HMO", "HMOIndicator")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc8", "PrivatePayer")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc11", "OtherPayerSource")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceLTCH", "AdminSourceHospital")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceIRF", "AdminSourceRehab")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceSNF", "AdminSourceSkilled")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNF", "AdminSourceNursing")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceIPPS", "AdminSourceInpatient")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNone", "AdminSourceCommunity")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"MedEligible", "CMSDualEligibility")#>
		    <cfset csvFileContent=#Replace(#csvFileContent#,"PrimaryDiagnosis", "ICD9PrimaryDiagnosis")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis1", "ICD9OtherDiagnosis1")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis2", "ICD9OtherDiagnosis2")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis3", "ICD9OtherDiagnosis3")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis4", "ICD9OtherDiagnosis4")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis5", "ICD9OtherDiagnosis5")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"SurgicalDischarge", "SurgicalDischarge")#>
		    <cfset csvFileContent=#Replace(#csvFileContent#,"ESRD", "EndStageRenalDisease")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_DressUpper", "DressUpperADL")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_DressLower", "DressLowerADL")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Bathing", "BathingADL")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Toileting", "ToiletingADL")#>
		   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Transferring", "TransferringADL")#>

  	<cfelseif CAHPSid eq '79'> <!--- OCS HomeCare --->
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Branch ID Number", "Location Name")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"MRN", "Medical Record Number")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"StartOfCare", "Start of Care")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"SkilledVisits", "Skilled Visits")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"LookbackPeriodVisits", "Lookback Period Visits")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNone", "Admission Source - NA (Community)")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNF", "Admission Source - NF")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceSNF", "Admission Source - SNF")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceLTCH", "Admission Source - LTCH")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceIRF", "Admission Source - IRF")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceOther", "Admission Source - Other")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNone", "Admission Source - NA (Community)")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSource", "Admission Source - Unknown")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc0", "Payer - None")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc1", "Payer - Medicare FFS")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc2", "Payer - Medicare HMO")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc3", "Payer - Medicaid FFS")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc4", "Payer - Medicaid HMO")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc5", "Payer - Workers' Comp")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc6", "Payer - Title Programs")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc7", "Payer - Other Government")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc8", "Payer - Private Ins")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc9", "Payer - Private HMO")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc10", "Payer - Self-pay")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc11", "Payer - Other")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrcUK", "Payer - Unknown")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"MedEligible", "Dually eligible for Medicare and Medicaid")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PrimaryDiagnosis", "Primary Diagnosis ICD_A2")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis1", "Other diagnosis_B2")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis2", "Other diagnosis_C2")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis3", "Other diagnosis_D2")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis4", "Other diagnosis_E2")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis5", "Other diagnosis_F2")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"SurgicalDischarge", "Surgical Discharge")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ESRD", "End-Stage Renal Disease (ESRD)")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Deficits_BLANK", "ADL_Deficits")#>

	<cfelseif CAHPSid eq "80"> <!--- Pinnacle --->
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Provider Name", "ProviderName")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Provider Id", "CMSCertNum")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Sample Month", "SampleMonth")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Sample Year", "SampleYear")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Patients Served", "TotalPatients")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Submitted Patients", "SubmittedPatients")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis1", "OtherDiagnosis")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Deficits_BLANK", "ADL_Deficits")#>

  	<cfelseif CAHPSid eq "81"> <!--- Press Ganey --->
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientFirstName", "First Name")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientMiddleInitial", "Middle Initial")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientLastName", "Last Name")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"DischargeDate", "Discharge Date")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientDOB", "Date of Birth")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Address 2", "Address 2")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Address", "Address 1")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientPhone", "Phone")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"StartOfCare", "Start of Care Date")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AssessmentReason", "Assessment Reason")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"MRN", "Patient ID Number")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"SurgicalDischarge", "Surgical Discharge")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ESRD", "End Stage Renal Disease")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc0", "Payment Source - None")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc1", "Payment Source - Medicare")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc2", "Payment Source - Medicare HMO")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc3", "Payment Source - Medicaid")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc4", "Payment Source - Medicaid HMO")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc5", "Payment Source - Workers Comp")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc6", "Payment Source - Title programs")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc7", "Payment Source - Other Government")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc8", "Payment Source - Private Ins")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc9", "Payment Source - Private HMO")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc10", "Payment Source - Self-pay")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc11", "Payment Source - Other")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrcUK", "Payment Source - Unknown")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceLTCH", "Source of Admission - LTCH")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceIRF", "Source of Admission - IRF")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceSNF", "Source of Admission - SNF")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNF", "Source of Admission - NF")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceIPPS", "Source of Admission - IPPS")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourcePsych", "Source of Admission - Psych")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceOther", "Source of Admission - Other")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNone", "Source of Admission - None")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"MedEligible", "Dual Eligibility")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"HomeHealthVisitType", "Home Health Visit Type")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ReferralSource", "Referral Source")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PhysicalTherapy", "Physical Therapy")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"HomeHealthAide", "Home Health Aide")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"SocialService", "Social Service")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OccupationalTherapy", "Occupational Therapy")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"CompanionHomemaker", "Companion/Homemaker")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"SpeechTherapy", "Speech Therapy")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Deficits_BLANK", "ADL_Deficits")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_DressUpper", "ADL - Dress Upper Body")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_DressLower", "ADL - Dress Lower Body")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Bathing", "ADL - Bathing")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Toileting", "ADL - Toileting")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Transferring", "ADL - Transferring")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Feed", "ADL - Feeding or Eating")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"SkilledVisits", "Skilled Visits in Month")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"LookbackPeriodVisits", "Skilled Visits in Two Months")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Branch ID Number", "Branch")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Patients Served", "Total Patients Served")#>


 	<cfelseif CAHPSid eq "86"> <!--- PCA ---> 
 
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Patients Served", "Total Patients Served")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Submitted Patients", "SubmittedPatients")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientFirstName", "First Name")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientMiddleInitial", "Middle Initial")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientLastName", "Last Name")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Gender", "Gender")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientDOB", "Date of Birth")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Address 2", "Address 2")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Address", "Address 1")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"City", "Pt_City")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"State", "State")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Zip", "Zip")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PatientPhone", "Phone")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"StartOfCare", "Start of Care Date")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AssessmentReason", "Assessment Reason")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"MRN", "Medical Record Number")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"MedicaidNumber", "SSN")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"SkilledVisits", "Number_Of_Skilled_Visits")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"LookbackPeriodVisits", "LookbackPeriodVisits")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceLTCH", "SourceOfAdmissionHospital")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceIRF", "SourceOfAdmissionRehab")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceSNF", "SourceOfAdmissionSkilledNursingFacility")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNF", "SourceOfAdmissionNursingHome")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceIPPS", "SourceOfAdmissionOtherInpatient")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"AdmissionSourceNone", "SourceOfAdmissionCommunity")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc1", "MedicarePayer")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc3", "MedicaidPayer")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc8", "PrivatePayer")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"PaySrc11", "OtherPayer")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"HMO", "HMOIndicator")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"MedEligible", "Dually eligible for Medicare and Medicaid")#>
	    <cfset csvFileContent=#Replace(#csvFileContent#,"PrimaryDiagnosis", "PrimaryDiagnosis")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis1", "OtherDiagnosis1")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis2", "OtherDiagnosis2")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis3", "OtherDiagnosis3")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis4", "OtherDiagnosis4")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"OtherDiagnosis5", "OtherDiagnosis5")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"SurgicalDischarge", "CareRelatedToSurgicalDischarge")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ESRD", "EndStageRenalDisease")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Deficits_BLANK", "ADL_Deficits")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_DressUpper", "ADL - Dress Upper Body")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_DressLower", "ADL - Dress Lower Body")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Bathing", "ADL - Bathing")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Toileting", "ADL - Toileting")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Transferring", "ADL - Transferring")#>
	   <cfset csvFileContent=#Replace(#csvFileContent#,"ADL_Feed", "ADL - Feed")#>
	  <!--- <cfset csvFileContent=#Replace(#csvFileContent#,"", "TypeOfSampling")#>--->
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Language", "Language")#>
	  <!--- <cfset csvFileContent=#Replace(#csvFileContent#,"", "PersistLevel")#>--->
	 <!---  <cfset csvFileContent=#Replace(#csvFileContent#,"", "CCN")#>--->
	   <cfset csvFileContent=#Replace(#csvFileContent#,"Branch ID Number", "BranchID")#>
   
  	</cfif> <!--- end CAHPSid check for varying Field Labels --->
  
	<cffile action="write"
	        file="#getDirectoryFromPath(getCurrentTemplatePath())#CSV/CAHPS_#session.AgencyID#_test.csv"
	        output="#csvFileContent#" >
	<cfheader name="Content-Disposition" value="attachment; filename=CAHPS_#session.AgencyID#_test.csv">
	<cfcontent 
	   type = "text/csv"
	   deleteFile = "yes"
	   file = "#getDirectoryFromPath(getCurrentTemplatePath())#CSV/CAHPS_#session.AgencyID#_test.csv"
	   reset = "no" >

  <cfcatch type='any'>
   <cfoutput>#cfcatch.Message# :: #cfcatch.Detail#</cfoutput>
  </cfcatch>
 </cftry>
	
<cfelse>
	<h1>CAHPS</h1>
	<h2>You reached this page by error. Plesae submit the CAHPS Form located <a href="index.cfm?page=reports&cat=patients&rpt=CAHPS_Form">Here</a></h2><br>
</cfif>
