<cfinclude template='/__Security-Block.cfm' />

<cfparam name="url.admitId" default="0">
<cfparam name="url.patientId" default="">
<cfparam name="url.startDate" default="">
<cfparam name="url.endDate" default="">

<cfif Len(url.patientId)>
	<cfset decryptedPatientId = decrypt(url.patientId, application.enckey, "AES", "Hex")>
<cfelse>
	<cfset decryptedPatientId = 0>
</cfif>

<cfif Val(decryptedPatientId) EQ 0 OR Val(url.admitId) EQ 0>
	<cfoutput>
		<html>
		<head><title>Error</title></head>
		<body>
			<h2>Error: Invalid patient or admission information</h2>
		</body>
		</html>
	</cfoutput>
	<cfabort>
</cfif>

<cfquery name="GetPatientDischarge" datasource="#Application.DataSrc#">
	SELECT pAssessments.Assmt_ID, pAssessments.F27, pAssessments.F25 AS admission_status, 
		pAssessments.F26 AS Assessment_Reason_M0100, pAssessments.F177 AS Certification_Start, 
		pAssessments.F178 AS Certification_End, pAssessments.F176 AS Assessment_Completed_M0090,
		(SELECT COUNT(DISTINCT ps.Schedule_ID) FROM #Request.prefix_db_agency#.pSchedules ps
			JOIN #Request.prefix_db_agency#.pAssessments pa ON ps.Assmt_ID = pa.Assmt_ID
			WHERE pa.Admit_ID = pAssessments.Admit_ID
			AND ps.Status = 0 AND ps.Missed = 0) AS total_admission_visits,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F147 ELSE pAssessments.F118 END AS M1400,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F74 ELSE pAssessments.F77 END AS M1800,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F75 ELSE pAssessments.F78 END AS M1810,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F76 ELSE pAssessments.F79 END AS M1820,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F77 ELSE pAssessments.F80 END AS M1830,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F78 ELSE pAssessments.F81 END AS M1840,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F79 ELSE pAssessments.F82 END AS M1845,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F80 ELSE pAssessments.F83 END AS M1850,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F81 ELSE pAssessments.F84 END AS M1860,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F156 ELSE pAssessments.F163 END AS M1870,
		CASE WHEN LEFT(pAssessments.F26,1) = 1 THEN pAssessments.F204 ELSE pAssessments.F135 END AS M2200,
		pPatients.Pt_First, pPatients.Pt_Last, Pt_Middle, pAssessments.*,
		pReferral.Referral_Name,
		CONCAT(pPhysicians.Phys_Last, ', ', pPhysicians.Phys_First) AS Physician_Name,
		pAdmit.M0030_START_CARE_DT AS Admission_Date
	FROM #Request.prefix_db_agency#.pAssessments
	JOIN #Request.prefix_db_agency#.pPatients ON pAssessments.Patient_ID = pPatients.Patient_ID AND pPatients.Status IN (0,1)
	JOIN #Request.prefix_db_agency#.pAdmit ON pAssessments.Admit_ID = pAdmit.Admit_ID AND pAdmit.Status = 0
	LEFT OUTER JOIN #Request.prefix_db_agency#.pReferral ON pAdmit.Referral_ID = pReferral.Referral_ID AND pReferral.status = 0
	LEFT OUTER JOIN #Request.prefix_db_lookup#.pPhysicians ON pAdmit.Render_Phys_ID = pPhysicians.Phys_ID
	WHERE pAssessments.Admit_ID = <cfqueryparam value="#url.admitId#" cfsqltype="CF_SQL_INTEGER">
		AND pAssessments.Patient_ID = <cfqueryparam value="#decryptedPatientId#" cfsqltype="CF_SQL_INTEGER">
		AND pAssessments.Status = 0
		AND pAssessments.F25 = 1
		AND LEFT(pAssessments.F26,1) IN (1,9)
	GROUP BY pAssessments.Assmt_ID
	ORDER BY pAssessments.F176 DESC
</cfquery>

<cfif GetPatientDischarge.recordcount EQ 0>
	<cfoutput>
		<html>
		<head><title>No Data</title></head>
		<body>
			<h2>No discharge data found for this patient</h2>
		</body>
		</html>
	</cfoutput>
	<cfabort>
</cfif>

<!--- Process outcomes - get SOC and Discharge assessments separately --->
<cfset patientName = "#GetPatientDischarge.Pt_Last#, #GetPatientDischarge.Pt_First#" />
<cfset totalBetterCount = 0 />
<cfset outcomeDetails = [] />
<cfset SOC_M1400 = "" />
<cfset SOC_M1800 = "" />
<cfset SOC_M1810 = "" />
<cfset SOC_M1820 = "" />
<cfset SOC_M1830 = "" />
<cfset SOC_M1840 = "" />
<cfset SOC_M1845 = "" />
<cfset SOC_M1850 = "" />
<cfset SOC_M1860 = "" />
<cfset SOC_M1870 = "" />
<cfset SOC_M2200 = "" />
<cfset Discharge_M1400 = "" />
<cfset Discharge_M1800 = "" />
<cfset Discharge_M1810 = "" />
<cfset Discharge_M1820 = "" />
<cfset Discharge_M1830 = "" />
<cfset Discharge_M1840 = "" />
<cfset Discharge_M1845 = "" />
<cfset Discharge_M1850 = "" />
<cfset Discharge_M1860 = "" />
<cfset Discharge_M1870 = "" />
<cfset Discharge_M2200 = "" />

<cfoutput query="GetPatientDischarge">
	<cfif LEFT(Assessment_Reason_M0100,1) EQ 1>
		<cfset SOC_M1400 = M1400 />
		<cfset SOC_M1800 = M1800 />
		<cfset SOC_M1810 = M1810 />
		<cfset SOC_M1820 = M1820 />
		<cfset SOC_M1830 = M1830 />
		<cfset SOC_M1840 = M1840 />
		<cfset SOC_M1845 = M1845 />
		<cfset SOC_M1850 = M1850 />
		<cfset SOC_M1860 = M1860 />
		<cfset SOC_M1870 = M1870 />
		<cfset SOC_M2200 = M2200 />
	<cfelseif LEFT(Assessment_Reason_M0100,1) EQ 9>
		<cfset Discharge_M1400 = M1400 />
		<cfset Discharge_M1800 = M1800 />
		<cfset Discharge_M1810 = M1810 />
		<cfset Discharge_M1820 = M1820 />
		<cfset Discharge_M1830 = M1830 />
		<cfset Discharge_M1840 = M1840 />
		<cfset Discharge_M1845 = M1845 />
		<cfset Discharge_M1850 = M1850 />
		<cfset Discharge_M1860 = M1860 />
		<cfset Discharge_M1870 = M1870 />
		<cfset Discharge_M2200 = M2200 />
	</cfif>
</cfoutput>

<!--- Compare SOC vs Discharge --->
<cfif Len(SOC_M1400) AND Len(Discharge_M1400)>
	<cfset Request.M1400 = LEFT(Discharge_M1400,1) />
	<cfset Request.SOC_M1400 = LEFT(SOC_M1400,1) />
	<cfif Request.M1400 LT Request.SOC_M1400><cfset M1400_status = 'Better' >
	<cfelseif Request.M1400 GT Request.SOC_M1400><cfset M1400_status = 'Worse' >
	<cfelseif Request.M1400 EQ Request.SOC_M1400><cfset M1400_status = 'Same' >
	<cfelse><cfset M1400_status = 'N/A' /></cfif>
	<cfif M1400_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M1400 Dyspnea", socAnswer = SOC_M1400, dischargeAnswer = Discharge_M1400, status = M1400_status}) />
</cfif>

<cfif Len(SOC_M1800) AND Len(Discharge_M1800)>
	<cfset Request.M1800 = LEFT(Discharge_M1800,1) />
	<cfset Request.SOC_M1800 = LEFT(SOC_M1800,1) />
	<cfif Request.M1800 LT Request.SOC_M1800><cfset M1800_status = 'Better' >
	<cfelseif Request.M1800 GT Request.SOC_M1800><cfset M1800_status = 'Worse' >
	<cfelseif Request.M1800 EQ Request.SOC_M1800><cfset M1800_status = 'Same' >
	<cfelse><cfset M1800_status = 'N/A' /></cfif>
	<cfif M1800_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M1800 Grooming", socAnswer = SOC_M1800, dischargeAnswer = Discharge_M1800, status = M1800_status}) />
</cfif>

<cfif Len(SOC_M1810) AND Len(Discharge_M1810)>
	<cfset Request.M1810 = LEFT(Discharge_M1810,1) />
	<cfset Request.SOC_M1810 = LEFT(SOC_M1810,1) />
	<cfif Request.M1810 LT Request.SOC_M1810><cfset M1810_status = 'Better' >
	<cfelseif Request.M1810 GT Request.SOC_M1810><cfset M1810_status = 'Worse' >
	<cfelseif Request.M1810 EQ Request.SOC_M1810><cfset M1810_status = 'Same' >
	<cfelse><cfset M1810_status = 'N/A' /></cfif>
	<cfif M1810_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M1810 Upper Body Dress", socAnswer = SOC_M1810, dischargeAnswer = Discharge_M1810, status = M1810_status}) />
</cfif>

<cfif Len(SOC_M1820) AND Len(Discharge_M1820)>
	<cfset Request.M1820 = LEFT(Discharge_M1820,1) />
	<cfset Request.SOC_M1820 = LEFT(SOC_M1820,1) />
	<cfif Request.M1820 LT Request.SOC_M1820><cfset M1820_status = 'Better' >
	<cfelseif Request.M1820 GT Request.SOC_M1820><cfset M1820_status = 'Worse' >
	<cfelseif Request.M1820 EQ Request.SOC_M1820><cfset M1820_status = 'Same' >
	<cfelse><cfset M1820_status = 'N/A' /></cfif>
	<cfif M1820_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M1820 Lower Body Dress", socAnswer = SOC_M1820, dischargeAnswer = Discharge_M1820, status = M1820_status}) />
</cfif>

<cfif Len(SOC_M1830) AND Len(Discharge_M1830)>
	<cfset Request.M1830 = LEFT(Discharge_M1830,1) />
	<cfset Request.SOC_M1830 = LEFT(SOC_M1830,1) />
	<cfif Request.M1830 LT Request.SOC_M1830><cfset M1830_status = 'Better' >
	<cfelseif Request.M1830 GT Request.SOC_M1830><cfset M1830_status = 'Worse' >
	<cfelseif Request.M1830 EQ Request.SOC_M1830><cfset M1830_status = 'Same' >
	<cfelse><cfset M1830_status = 'N/A' /></cfif>
	<cfif M1830_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M1830 Bathing", socAnswer = SOC_M1830, dischargeAnswer = Discharge_M1830, status = M1830_status}) />
</cfif>

<cfif Len(SOC_M1840) AND Len(Discharge_M1840)>
	<cfset Request.M1840 = LEFT(Discharge_M1840,1) />
	<cfset Request.SOC_M1840 = LEFT(SOC_M1840,1) />
	<cfif Request.M1840 LT Request.SOC_M1840><cfset M1840_status = 'Better' >
	<cfelseif Request.M1840 GT Request.SOC_M1840><cfset M1840_status = 'Worse' >
	<cfelseif Request.M1840 EQ Request.SOC_M1840><cfset M1840_status = 'Same' >
	<cfelse><cfset M1840_status = 'N/A' /></cfif>
	<cfif M1840_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M1840 Toilet Transfer", socAnswer = SOC_M1840, dischargeAnswer = Discharge_M1840, status = M1840_status}) />
</cfif>

<cfif Len(SOC_M1845) AND Len(Discharge_M1845)>
	<cfset Request.M1845 = LEFT(Discharge_M1845,1) />
	<cfset Request.SOC_M1845 = LEFT(SOC_M1845,1) />
	<cfif Request.M1845 LT Request.SOC_M1845><cfset M1845_status = 'Better' >
	<cfelseif Request.M1845 GT Request.SOC_M1845><cfset M1845_status = 'Worse' >
	<cfelseif Request.M1845 EQ Request.SOC_M1845><cfset M1845_status = 'Same' >
	<cfelse><cfset M1845_status = 'N/A' /></cfif>
	<cfif M1845_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M1845 Toilet Hygiene", socAnswer = SOC_M1845, dischargeAnswer = Discharge_M1845, status = M1845_status}) />
</cfif>

<cfif Len(SOC_M1850) AND Len(Discharge_M1850)>
	<cfset Request.M1850 = LEFT(Discharge_M1850,1) />
	<cfset Request.SOC_M1850 = LEFT(SOC_M1850,1) />
	<cfif Request.M1850 LT Request.SOC_M1850><cfset M1850_status = 'Better' >
	<cfelseif Request.M1850 GT Request.SOC_M1850><cfset M1850_status = 'Worse' >
	<cfelseif Request.M1850 EQ Request.SOC_M1850><cfset M1850_status = 'Same' >
	<cfelse><cfset M1850_status = 'N/A' /></cfif>
	<cfif M1850_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M1850 Transferring", socAnswer = SOC_M1850, dischargeAnswer = Discharge_M1850, status = M1850_status}) />
</cfif>

<cfif Len(SOC_M1860) AND Len(Discharge_M1860)>
	<cfset Request.M1860 = LEFT(Discharge_M1860,1) />
	<cfset Request.SOC_M1860 = LEFT(SOC_M1860,1) />
	<cfif Request.M1860 LT Request.SOC_M1860><cfset M1860_status = 'Better' >
	<cfelseif Request.M1860 GT Request.SOC_M1860><cfset M1860_status = 'Worse' >
	<cfelseif Request.M1860 EQ Request.SOC_M1860><cfset M1860_status = 'Same' >
	<cfelse><cfset M1860_status = 'N/A' /></cfif>
	<cfif M1860_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M1860 Locomotion", socAnswer = SOC_M1860, dischargeAnswer = Discharge_M1860, status = M1860_status}) />
</cfif>

<cfif Len(SOC_M1870) AND Len(Discharge_M1870)>
	<cfset Request.M1870 = LEFT(Discharge_M1870,1) />
	<cfset Request.SOC_M1870 = LEFT(SOC_M1870,1) />
	<cfif Request.M1870 LT Request.SOC_M1870><cfset M1870_status = 'Better' >
	<cfelseif Request.M1870 GT Request.SOC_M1870><cfset M1870_status = 'Worse' >
	<cfelseif Request.M1870 EQ Request.SOC_M1870><cfset M1870_status = 'Same' >
	<cfelse><cfset M1870_status = 'N/A' /></cfif>
	<cfif M1870_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M1870 Feeding/Eating", socAnswer = SOC_M1870, dischargeAnswer = Discharge_M1870, status = M1870_status}) />
</cfif>

<cfif Len(SOC_M2200) AND Len(Discharge_M2200)>
	<cfset Request.M2200 = LEFT(Discharge_M2200,1) />
	<cfset Request.SOC_M2200 = LEFT(SOC_M2200,1) />
	<cfif Request.M2200 LT Request.SOC_M2200><cfset M2200_status = 'Better' >
	<cfelseif Request.M2200 GT Request.SOC_M2200><cfset M2200_status = 'Worse' >
	<cfelseif Request.M2200 EQ Request.SOC_M2200><cfset M2200_status = 'Same' >
	<cfelse><cfset M2200_status = 'N/A' /></cfif>
	<cfif M2200_status EQ 'Better'><cfset totalBetterCount = totalBetterCount + 1 /></cfif>
	<cfset ArrayAppend(outcomeDetails, {label = "M2200 Oral Meds", socAnswer = SOC_M2200, dischargeAnswer = Discharge_M2200, status = M2200_status}) />
</cfif>

<cfset latestDischargeDate = "" />
<cfset latestCertStart = "" />
<cfset latestCertEnd = "" />
<cfoutput query="GetPatientDischarge">
	<cfif LEFT(Assessment_Reason_M0100,1) EQ 9>
		<cfif isDate(Assessment_Completed_M0090)>
			<cfset latestDischargeDate = Assessment_Completed_M0090 />
		</cfif>
		<cfif isDate(Certification_Start)>
			<cfset latestCertStart = Certification_Start />
		</cfif>
		<cfif isDate(Certification_End)>
			<cfset latestCertEnd = Certification_End />
		</cfif>
	</cfif>
</cfoutput>

<cfset starString = "" />
<cfloop from="1" to="#totalBetterCount#" index="i">
	<cfset starString = starString & "*" />
</cfloop>
<cfif starString EQ "">
	<cfset starString = "-" />
</cfif>

<cfdocument format="pdf" orientation="portrait" overwrite="yes" localUrl="yes">
	<table border="0" cellpadding="0" cellspacing="0" width="100%">
		<tr>
			<td colspan="2" style="font-family:Arial;font-size:20px;font-weight:bold;padding:10px;text-align:center;background-color:##333333;color:white;">
				<cfoutput>Patient Discharge Report</cfoutput>
			</td>
		</tr>
		<tr>
			<td colspan="2" style="font-family:Arial;font-size:12px;padding:5px;text-align:center;background-color:##f0f0f0;">
				<cfoutput>Generated: #DateFormat(now(), "mm/dd/yyyy")# at #TimeFormat(now(), "hh:mm tt")#</cfoutput>
			</td>
		</tr>
		<tr>
			<td colspan="2" height="15px"></td>
		</tr>
		<tr>
			<td colspan="2" style="font-family:Arial;font-size:16px;font-weight:bold;padding:10px;background-color:##e9ecef;">
				<cfoutput>Patient Information</cfoutput>
			</td>
		</tr>
		<tr>
			<td colspan="2" style="background-color:black;height:2px;"></td>
		</tr>
		<tr>
			<td style="font-family:Arial;font-size:12px;padding:8px;width:200px;font-weight:bold;">Patient Name:</td>
			<td style="font-family:Arial;font-size:12px;padding:8px;">
				<cfoutput><strong>#patientName#</strong></cfoutput>
			</td>
		</tr>
		<cfset admissionDateSet = false />
		<cfset patientInfoSet = false />
		<cfoutput query="GetPatientDischarge">
			<cfif NOT admissionDateSet AND isDate(Admission_Date)>
				<tr>
					<td style="font-family:Arial;font-size:12px;padding:8px;font-weight:bold;">Date Admitted:</td>
					<td style="font-family:Arial;font-size:12px;padding:8px;">#DateFormat(Admission_Date, "mm/dd/yyyy")#</td>
				</tr>
				<cfset admissionDateSet = true />
			</cfif>
			<cfif NOT patientInfoSet>
				<tr>
					<td style="font-family:Arial;font-size:12px;padding:8px;font-weight:bold;">Total Visits:</td>
					<td style="font-family:Arial;font-size:12px;padding:8px;">#total_admission_visits#</td>
				</tr>
				<cfif Len(Referral_Name)>
					<tr>
						<td style="font-family:Arial;font-size:12px;padding:8px;font-weight:bold;">Referral Source:</td>
						<td style="font-family:Arial;font-size:12px;padding:8px;">#Referral_Name#</td>
					</tr>
				</cfif>
				<cfif Len(Physician_Name)>
					<tr>
						<td style="font-family:Arial;font-size:12px;padding:8px;font-weight:bold;">Physician:</td>
						<td style="font-family:Arial;font-size:12px;padding:8px;">#Physician_Name#</td>
					</tr>
				</cfif>
				<cfset patientInfoSet = true />
			</cfif>
		</cfoutput>
		<cfif Len(latestDischargeDate) AND isDate(latestDischargeDate)>
			<tr>
				<td style="font-family:Arial;font-size:12px;padding:8px;font-weight:bold;">Date Discharged:</td>
				<td style="font-family:Arial;font-size:12px;padding:8px;">
					<cfoutput>#DateFormat(latestDischargeDate, "mm/dd/yyyy")#</cfoutput>
				</td>
			</tr>
		</cfif>
		<cfif Len(latestCertStart) AND isDate(latestCertStart) AND Len(latestCertEnd) AND isDate(latestCertEnd)>
			<tr>
				<td style="font-family:Arial;font-size:12px;padding:8px;font-weight:bold;">Certification Period:</td>
				<td style="font-family:Arial;font-size:12px;padding:8px;">
					<cfoutput>#DateFormat(latestCertStart, "mm/dd/yyyy")# - #DateFormat(latestCertEnd, "mm/dd/yyyy")#</cfoutput>
				</td>
			</tr>
		</cfif>
		<tr>
			<td style="font-family:Arial;font-size:12px;padding:8px;font-weight:bold;">Outcomes Achieved:</td>
			<td style="font-family:Arial;font-size:12px;padding:8px;">
				<cfoutput>
					<font color="##f1c40f" size="5" style="font-weight:bold;letter-spacing:2px;">#starString#</font>
					<cfif totalBetterCount GT 0>
						<span style="margin-left:8px;vertical-align:top;display:inline-block;font-size:12px;">(#totalBetterCount# Better outcomes)</span>
					</cfif>
				</cfoutput>
			</td>
		</tr>
		<tr>
			<td colspan="2" height="20px"></td>
		</tr>
		<cfif ArrayLen(outcomeDetails) GT 0>
			<tr>
				<td colspan="2" style="font-family:Arial;font-size:16px;font-weight:bold;padding:10px;background-color:##e9ecef;">
					Outcome Details
				</td>
			</tr>
			<tr>
				<td colspan="2" style="background-color:black;height:2px;"></td>
			</tr>
			<tr>
				<td colspan="2">
					<table border="1" cellpadding="5" cellspacing="0" width="100%" style="border-collapse:collapse;">
						<tr style="background-color:##333333;color:white;">
							<td style="font-family:Arial;font-size:12px;font-weight:bold;padding:8px;">Outcome Category</td>
							<td style="font-family:Arial;font-size:12px;font-weight:bold;padding:8px;">Start of Care</td>
							<td style="font-family:Arial;font-size:12px;font-weight:bold;padding:8px;">Discharge</td>
							<td style="font-family:Arial;font-size:12px;font-weight:bold;padding:8px;">Status</td>
						</tr>
						<cfoutput>
							<cfloop array="#outcomeDetails#" index="outcome">
								<tr>
									<td style="font-family:Arial;font-size:12px;padding:8px;">#outcome.label#</td>
									<td style="font-family:Arial;font-size:12px;padding:8px;">
										<cfif StructKeyExists(outcome, "socAnswer") AND Len(outcome.socAnswer)>
											#outcome.socAnswer#
										<cfelse>
											-
										</cfif>
									</td>
									<td style="font-family:Arial;font-size:12px;padding:8px;">
										<cfif StructKeyExists(outcome, "dischargeAnswer") AND Len(outcome.dischargeAnswer)>
											#outcome.dischargeAnswer#
										<cfelse>
											-
										</cfif>
									</td>
									<td style="font-family:Arial;font-size:12px;padding:8px;">
										<cfif outcome.status EQ 'Better'>
											<span style="color:##28a745;font-weight:bold;">Better</span>
										<cfelseif outcome.status EQ 'Worse'>
											<span style="color:##dc3545;font-weight:bold;">Worse</span>
										<cfelse>
											<span style="color:##6c757d;">Same</span>
										</cfif>
									</td>
								</tr>
							</cfloop>
						</cfoutput>
					</table>
				</td>
			</tr>
		</cfif>
		<tr>
			<td colspan="2" height="20px"></td>
		</tr>
		<tr>
			<td colspan="2" style="font-family:Arial;font-size:10px;padding:5px;text-align:center;color:##6c757d;border-top:1px solid ##ddd;">
				<cfoutput>
					<p>This report was generated on #DateFormat(now(), "mm/dd/yyyy")# at #TimeFormat(now(), "hh:mm tt")#</p>
				</cfoutput>
			</td>
		</tr>
	</table>
</cfdocument>
