<cfparam name="form.Patient_ID" default="0">

 <cfif Session.EmpLevel neq 1 and Session.EmpLevel neq 2 and Session.EmpLevel neq 3 and Session.EmpLevel neq 4 and Session.EmpLevel neq 5 and Session.EmpLevel neq 6 and Session.EmpLevel neq 7 and Session.EmpLevel neq 8 and Session.EmpLevel neq 9 >
<cfquery  name="GetAA" datasource="#Application.DataSrc#">
<cfsetting requesttimeout="5000">
	SELECT count(Assessment_New.Assessment_ID) as Rcount
	FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.Payer
	Where Assessment_New.Patient_ID = patient.Patient_ID
	AND  (patient.status = 'active' OR patient.status = 'inactive')
	AND Assessment_New.Payer_ID = Payer.Payer_ID
	AND Assessment_New.Agency_Number = '#Session.AgencyID#'
	<cfif Session.EmpLevel eq 6 or Session.EmpLevel eq 8>
		AND   
		(
			patient.Employee_ID = '
				#Session.EmployeeID#'
				OR
				   '#session.EmployeeId#' 
				IN (
					select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
					)
		)
	</cfif>
	<cfif form.Patient_ID neq '0'>AND Assessment_New.Patient_ID IN (#form.Patient_ID#)</cfif>
	AND Assessment_New.Deleted <> 1
	AND Assessment_New.Archive <> 1
	AND Assessment_New.Transmission_status = 'Ready to Lock'
  ORDER BY Payer.Payer_ID, Assessment_New.Assessment_Completed_M0090
</cfquery>

<cfquery  name="GetB" datasource="#Application.DataSrc#">
<cfsetting requesttimeout="5000">
		SELECT DISTINCT count(ScheduleItems.Visit_Date) as Rcount
		From  #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.ScheduleItems, #Request.prefix_db_lookup#.Employee
		Where Assessment_New.HHAC_Agency_ID = '#Session.AgencyLogin#'
		AND   Assessment_New.Patient_ID = patient.Patient_ID
		AND   patient.Status != 'deleted'
		AND   ScheduleItems.Assessment_Tracker_Id = Assessment_New.Assessment_Tracker_Id
		AND   ScheduleItems.Employee_Id = Employee.Employee_Id
		<cfif Session.EmpLevel eq 6 or Session.EmpLevel eq 8>
			AND   
			(
				patient.Employee_ID = '
					#Session.EmployeeID#'
					OR
					   '#session.EmployeeId#' 
					IN (
						select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
						)
			)
		</cfif>
		<cfif form.Patient_ID neq '0'>AND Assessment_New.Patient_ID IN (#form.Patient_ID#)</cfif>
		AND	(   ScheduleItems.Visit_Type like '1%'
		     or ScheduleItems.Visit_Type like '3%'
			 or ScheduleItems.Visit_Type like '4%'
			 or ScheduleItems.Visit_Type like '5%'
			 or ScheduleItems.Visit_Type like '6%'  
			 or ScheduleItems.Visit_Type like '7%'
			 or ScheduleItems.Visit_Type like '8%'
			 or ScheduleItems.Visit_Type like '9%'
			 or ScheduleItems.Visit_Type like 'Assessment%'
			)
		AND   Assessment_New.Admission_Status = 'In Progress'
		AND   Assessment_New.NotAdmitted != 1
		AND   Assessment_New.Archive <> 1
		AND   Assessment_New.Deleted <> 1
		AND   Assessment_New.Certification_Start < Now()
		ORDER BY ScheduleItems.Employee_ID, Assessment_New.Certification_Start
</cfquery>


<cfquery  name='ftf' datasource='#Application.DataSrc#'>
<cfsetting requesttimeout="5000">
 SELECT count(p.Patient_Id) as Rcount
 FROM #Request.prefix_db_agency#.patient p, #Request.prefix_db_agency#.Assessment_New an
 WHERE  p.Agency_Id = '#session.AgencyId#'
 AND    p.Status = 'Active'
 AND    an.Patient_Id = p.Patient_Id
 AND    SUBSTR(an.Start_of_Care_M0030, 1, 10) >= '2011-01-01'
 AND    an.Deleted <> 1
 AND    SUBSTR(an.Assessment_Reason_M0100, 1, 1) = '1'
 AND   (
        an.Physician_Last_Seen_Date IS NULL
         OR
        DATE_SUB(an.Start_of_Care_M0030, INTERVAL -30 DAY) <= SUBSTR(an.Physician_Last_Seen_Date, 1, 10)
         OR 
        DATE_SUB(an.Start_of_Care_M0030, INTERVAL  90 DAY) >= SUBSTR(an.Physician_Last_Seen_Date, 1, 10)
       )
	   <cfif Session.EmpLevel eq 8>
			AND   
			(
				p.Employee_ID = '
					#Session.EmployeeID#'
					OR
					   '#session.EmployeeId#' 
					IN (
						select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = p.Patient_Id and deleted <> 1
						)
			)
		</cfif>
 ORDER BY p.Last_Name_M0040 ASC, p.First_Name_M0040 ASC, an.Start_of_Care_M0030 ASC
</cfquery>


<cfquery  datasource="#Application.DataSrc#" name="No_Active">
<cfsetting requesttimeout="5000">
		SELECT count(patient.Patient_ID) as Rcount
		FROM #Request.prefix_db_agency#.patient
		WHERE NOT EXISTS (SELECT Assessment_New.Patient_ID 
		FROM #Request.prefix_db_agency#.Assessment_New
		WHERE Assessment_New.Patient_ID = patient.Patient_ID
		AND Assessment_New.Certification_End > NOW()
		AND Assessment_New.Deleted <> 1)
		AND patient.Agency_ID = #session.AgencyID#
		AND patient.Status = 'active'
		ORDER BY patient.Last_Name_M0040 ASC
	</cfquery>
	
	
<cfquery  datasource="#Application.DataSrc#" name="HCFA">
<cfsetting requesttimeout="5000">
		SELECT count(patient.Patient_ID) as Rcount
		FROM #Request.prefix_db_agency#.patient
		WHERE NOT EXISTS (SELECT Assessment_Forms.Patient_ID 
		FROM #Request.prefix_db_agency#.Assessment_Forms
		WHERE Assessment_Forms.Patient_ID = patient.Patient_ID
		AND Assessment_Forms.Form_Type = 'Form 485'
		AND Assessment_Forms.Cert_End_Item_3b >= NOW()
		AND Assessment_Forms.Form_Status <> 'Delete')
		AND patient.Agency_ID = #session.AgencyID#
		AND patient.Status = 'active'
		<cfif Session.EmpLevel eq 6 or Session.EmpLevel eq 8>
			AND   
			(
				patient.Employee_ID = '
					#Session.EmployeeID#'
					OR
					   '#session.EmployeeId#' 
					IN (
						select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
						)
			)
		</cfif>
		ORDER BY patient.Last_Name_M0040 ASC
	</cfquery>
	
	
<cfquery  datasource="#Application.DataSrc#" name="GetList">
<cfsetting requesttimeout="5000">
	SELECT count(patient.Patient_ID) as Rcount
	FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.ScheduleItems, #Request.prefix_db_lookup#.Employee
	WHERE	ScheduleItems.Assessment_Tracker_ID = Assessment_New.Assessment_Tracker_ID
	AND (Assessment_New.Deleted IS Null OR Assessment_New.Deleted = '0')
	AND patient.Patient_ID = ScheduleItems.Patient_ID
	AND	patient.Status = 'active'
	AND	patient.Agency_ID = #session.AgencyID#
	AND	(ScheduleItems.EClaimed <> 1) 
	AND ScheduleItems.Deleted <> 1
	AND ScheduleItems.Employee_ID <> 0
	AND ScheduleItems.Progress_Note = 'No'
	AND ScheduleItems.Missed = 'No'
	AND	ScheduleItems.Visit_Date <= NOW()
	AND ScheduleItems.Employee_ID = Employee.Employee_ID
	ORDER BY patient.Last_Name_M0040 ASC, patient.First_Name_M0040 ASC, Employee.Last_Name ASC, Employee.First_Name ASC,  ScheduleItems.Visit_Type ASC, ScheduleItems.Visit_Date ASC
</cfquery>



<cfquery  datasource="#Application.DataSrc#" name="GetListS">
<cfsetting requesttimeout="5000">
	SELECT count(patient.Patient_ID) as Rcount
	FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.ScheduleItems, #Request.prefix_db_lookup#.Employee
	WHERE	ScheduleItems.Assessment_Tracker_ID = Assessment_New.Assessment_Tracker_ID
	AND (Assessment_New.Deleted IS Null OR Assessment_New.Deleted = '0')
	AND patient.Patient_ID = ScheduleItems.Patient_ID
	AND	patient.Status = 'active'
	AND	patient.Agency_ID = #session.AgencyID#
	AND	(ScheduleItems.EClaimed <> 1) 
	AND ScheduleItems.Deleted <> 1
	AND ScheduleItems.Employee_ID <> 0
	AND ScheduleItems.Progress_Note = 'No'
	AND ScheduleItems.Missed = 'No'
	AND	ScheduleItems.Visit_Date <= NOW()
	AND ScheduleItems.Employee_ID = Employee.Employee_ID
	<cfif Session.EmpLevel eq 1 or Session.EmpLevel eq 3 or Session.EmpLevel eq 5 or Session.EmpLevel eq 6 or Session.EmpLevel eq 8 >
	AND   
	(
		patient.Employee_ID = '
			#Session.EmployeeID#'
			OR
			   '#session.EmployeeId#' 
			IN (
				select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
				)
	)
	</cfif>
	ORDER BY Employee.Last_Name ASC, Employee.First_Name ASC, patient.Last_Name_M0040 ASC, ScheduleItems.Visit_Type ASC, ScheduleItems.Visit_Date ASC
</cfquery>


<cfquery  datasource="#Application.DataSrc#" name="GetListN">
<cfsetting requesttimeout="5000">
	SELECT count(patient.Patient_ID) as Rcount
	FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.ScheduleItems, #Request.prefix_db_lookup#.Employee
	WHERE	ScheduleItems.Assessment_Tracker_ID = Assessment_New.Assessment_Tracker_ID
	AND (Assessment_New.Deleted IS Null OR Assessment_New.Deleted = '0')
	AND patient.Patient_ID = ScheduleItems.Patient_ID
	AND	patient.Status = 'active'
	AND	patient.Agency_ID = #session.AgencyID#
	AND	(ScheduleItems.Missed = 'yes') 
	AND ScheduleItems.Deleted <> 1
	AND ScheduleItems.Employee_ID <> 0
	AND	ScheduleItems.Visit_Date <= NOW()
	AND ScheduleItems.Employee_ID = Employee.Employee_ID
	<cfif Session.EmpLevel eq 8>
	AND   
	(
		patient.Employee_ID = '
			#Session.EmployeeID#'
			OR
			   '#session.EmployeeId#' 
			IN (
				select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
				)
	)
	</cfif>
	ORDER BY patient.Last_Name_M0040 ASC, patient.First_Name_M0040 ASC, Employee.Last_Name ASC, Employee.First_Name ASC,  ScheduleItems.Visit_Type ASC, ScheduleItems.Visit_Date ASC
</cfquery>



<cfquery  datasource="#Application.DataSrc#" name="GetListP">
<cfsetting requesttimeout="5000">
	SELECT count(patient.Patient_ID) as Rcount
	FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.ScheduleItems, #Request.prefix_db_lookup#.Employee
	WHERE	ScheduleItems.Assessment_Tracker_ID = Assessment_New.Assessment_Tracker_ID
	AND (Assessment_New.Deleted IS Null OR Assessment_New.Deleted = '0')
	AND patient.Patient_ID = ScheduleItems.Patient_ID
	AND	patient.Status = 'active'
	AND	patient.Agency_ID = #session.AgencyID#
	AND	(ScheduleItems.Missed = 'yes')
	AND ScheduleItems.Deleted <> 1
	AND ScheduleItems.Employee_ID <> 0
	AND	ScheduleItems.Visit_Date <= NOW()
	AND ScheduleItems.Employee_ID = Employee.Employee_ID
	ORDER BY ScheduleItems.Visit_Date ASC, patient.Last_Name_M0040 ASC, ScheduleItems.Visit_Type ASC 
</cfquery>



<cfquery  name="GetAExpire" datasource="#Application.DataSrc#">
<cfsetting requesttimeout="5000">
SELECT count(Assessment_New.Assessment_ID) as Rcount
FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient 
Where patient.Agency_ID = '#session.agencyid#'
AND Assessment_New.Patient_ID = patient.Patient_ID 
AND Assessment_New.HHAC_Agency_ID = '#Session.AgencyLogin#'
AND patient.Status = 'active' 
AND Assessment_Completed_M0090 != '' 
AND Assessment_New.Deleted = 0 
AND Assessment_New.Certification_End BETWEEN NOW() AND DATE_ADD(NOW(), INTERVAL 14 DAY) 
AND (Assessment_New.Assessment_Reason_M0100 LIKE '1%' OR Assessment_New.Assessment_Reason_M0100 LIKE '4%' OR Assessment_New.Assessment_Reason_M0100 LIKE '3%') 
<cfif Session.EmpLevel eq 1 or Session.EmpLevel eq 3 or Session.EmpLevel eq 5>
	AND   
	(
		patient.Employee_ID = '
			#Session.EmployeeID#'
			OR
			   '#session.EmployeeId#' 
			IN (
				select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
				)
	)
</cfif>
ORDER BY Assessment_New.Certification_End ASC
</cfquery>



<cfquery  datasource="#Application.DataSrc#" name="GetAShe">
<cfsetting requesttimeout="5000">
SELECT count(Assessment_New.Assessment_Tracker_ID) as Rcount
FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient
WHERE NOT EXISTS (SELECT ScheduleItems.Assessment_Tracker_ID
FROM #Request.prefix_db_agency#.ScheduleItems
WHERE Assessment_New.Assessment_Tracker_ID = ScheduleItems.Assessment_Tracker_ID)
AND patient.Patient_ID = Assessment_New.Patient_ID
AND (Assessment_New.Assessment_Reason_M0100 LIKE '1%' OR Assessment_New.Assessment_Reason_M0100 LIKE '4%')
AND patient.Agency_ID = #session.AgencyID#
<cfif application.NoEmptyDates>
	AND Assessment_New.Certification_Start <> '0000-00-00'
	AND Assessment_New.Certification_End <> '0000-00-00'
</cfif>
AND (Assessment_New.Deleted IS Null OR Assessment_New.Deleted = '0')
AND (Assessment_New.Archive IS Null OR Assessment_New.Archive = '0')
</cfquery>



<cfquery  datasource="#Application.DataSrc#" name="VtsNot">
<cfsetting requesttimeout="5000">
	SELECT count(Assessment_New.Assessment_Tracker_ID) as Rcount
	FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.ScheduleItems, #Request.prefix_db_agency#.Payer
	WHERE ScheduleItems.Agency_ID = #session.AgencyID#
	AND ScheduleItems.Patient_ID = patient.Patient_ID
	AND patient.Payer_ID = Payer.Payer_ID
	AND ScheduleItems.Assessment_Tracker_ID = Assessment_New.Assessment_Tracker_ID
  <cfif isdefined('url.pv') and url.pv eq 'n'>
	AND	ScheduleItems.Visit_Date >= NOW()
  </cfif>
	AND	ScheduleItems.EClaimed = 0
	AND ScheduleItems.Deleted <> 1
	AND (ScheduleItems.Employee_ID = 0 or ScheduleItems.Employee_ID IS NULL)
	AND (Assessment_New.Deleted IS Null OR Assessment_New.Deleted = '0')
	AND (Assessment_New.Archive IS Null OR Assessment_New.Archive = '0')	
</cfquery>


<cfquery  name="GetDataset" datasource="#Application.DataSrc#">
<cfsetting requesttimeout="5000">
	SELECT DISTINCT count(d.Datasets_ID) as Rcount
	From  #Request.prefix_db_agency#.Datasets d, #Request.prefix_db_agency#.patient p, #Request.prefix_db_agency#.Assessment_New an
	Where d.Agency_ID = '#Session.AgencyLogin#'
	AND  (d.DatasetCreated = 0 OR d.DatasetCreated = 1)
	AND   d.Patient_ID = p.Patient_ID
	AND   d.Assessment_Tracker_ID = an.Assessment_Tracker_ID
	AND   an.Transmission_Status LIKE '%ready to transmit%'	
</cfquery>


<cfquery  name="ReadytoPay" datasource="#Application.DataSrc#">
<cfsetting requesttimeout="5000">
 SELECT count(py.PayName) as Rcount
 FROM  #Request.prefix_db_agency#.ScheduleItems si, #Request.prefix_db_agency#.Payer py, #Request.prefix_db_agency#.Assessment_New an, #Request.prefix_db_lookup#.Agency a, #Request.prefix_db_agency#.patient p
 WHERE si.Agency_Id = '#session.AgencyId#'
 AND   si.Payer_Id IS NOT NULL
 AND   si.Deleted <> 1
 AND   si.EClaimed = 0
 AND   si.Visit_Date <= Now()
 AND   a.Agency_Id = '#session.AgencyId#'
 AND   py.Payer_Id = si.Payer_Id
 AND   py.Agency_Id = '#session.AgencyId#'
 AND   an.Assessment_Tracker_Id = si.Assessment_Tracker_Id
 AND  (an.Deleted IS Null OR an.Deleted = '0')
 AND  (an.Archive IS Null OR an.Archive = '0')
 AND   p.Patient_Id = si.Patient_Id
 AND   p.Status = 'active' 
</cfquery>

<cfelse>

<cfquery  name="GetAA" datasource="#Application.DataSrc#">
<cfsetting requesttimeout="5000">
	SELECT count(Assessment_New.Assessment_ID) as Rcount
	FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.Payer
	Where Assessment_New.Patient_ID = patient.Patient_ID
	AND  (patient.status = 'active' OR patient.status = 'inactive')
	AND Assessment_New.Payer_ID = Payer.Payer_ID
	AND Assessment_New.Agency_Number = '#Session.AgencyID#'
	<cfif Session.EmpLevel eq 6 or Session.EmpLevel eq 8>
		AND   
		(
			patient.Employee_ID = '
				#Session.EmployeeID#'
				OR
				   '#session.EmployeeId#' 
				IN (
					select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
					)
		)
	</cfif>
	<cfif form.Patient_ID neq '0'>AND Assessment_New.Patient_ID IN (#form.Patient_ID#)</cfif>
	AND Assessment_New.Deleted <> 1
	AND Assessment_New.Archive <> 1
	AND Assessment_New.Transmission_status = 'Ready to Lock'
  ORDER BY Payer.Payer_ID, Assessment_New.Assessment_Completed_M0090
</cfquery>

<cfquery  name="GetB" datasource="#Application.DataSrc#">
<cfsetting requesttimeout="5000">
		SELECT DISTINCT count(ScheduleItems.Visit_Date) as Rcount
		From  #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.ScheduleItems, #Request.prefix_db_lookup#.Employee
		Where Assessment_New.HHAC_Agency_ID = '#Session.AgencyLogin#'
		AND   Assessment_New.Patient_ID = patient.Patient_ID
		AND   patient.Status != 'deleted'
		AND   ScheduleItems.Assessment_Tracker_Id = Assessment_New.Assessment_Tracker_Id
		AND   ScheduleItems.Employee_Id = Employee.Employee_Id
		<cfif Session.EmpLevel eq 6 or Session.EmpLevel eq 8>
			AND   
			(
				patient.Employee_ID = '
					#Session.EmployeeID#'
					OR
					   '#session.EmployeeId#' 
					IN (
						select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
						)
			)
		</cfif>
		<cfif form.Patient_ID neq '0'>AND Assessment_New.Patient_ID IN (#form.Patient_ID#)</cfif>
		AND	(   ScheduleItems.Visit_Type like '1%'
		     or ScheduleItems.Visit_Type like '3%'
			 or ScheduleItems.Visit_Type like '4%'
			 or ScheduleItems.Visit_Type like '5%'
			 or ScheduleItems.Visit_Type like '6%'  
			 or ScheduleItems.Visit_Type like '7%'
			 or ScheduleItems.Visit_Type like '8%'
			 or ScheduleItems.Visit_Type like '9%'
			 or ScheduleItems.Visit_Type like 'Assessment%'
			)
		AND   Assessment_New.Admission_Status = 'In Progress'
		AND   Assessment_New.NotAdmitted != 1
		AND   Assessment_New.Archive <> 1
		AND   Assessment_New.Deleted <> 1
		AND   Assessment_New.Certification_Start < Now()
		ORDER BY ScheduleItems.Employee_ID, Assessment_New.Certification_Start
</cfquery>

<cfquery  datasource="#Application.DataSrc#" name="No_Active">
<cfsetting requesttimeout="5000">
		SELECT count(patient.Patient_ID) as Rcount
		FROM #Request.prefix_db_agency#.patient
		WHERE NOT EXISTS (SELECT Assessment_New.Patient_ID 
		FROM #Request.prefix_db_agency#.Assessment_New
		WHERE Assessment_New.Patient_ID = patient.Patient_ID
		AND Assessment_New.Certification_End > NOW()
		AND Assessment_New.Deleted <> 1)
		AND patient.Agency_ID = #session.AgencyID#
		AND patient.Status = 'active'
		ORDER BY patient.Last_Name_M0040 ASC
</cfquery>


<cfquery  datasource="#Application.DataSrc#" name="HCFA">
<cfsetting requesttimeout="5000">
		SELECT count(patient.Patient_ID) as Rcount
		FROM #Request.prefix_db_agency#.patient
		WHERE NOT EXISTS (SELECT Assessment_Forms.Patient_ID 
		FROM #Request.prefix_db_agency#.Assessment_Forms
		WHERE Assessment_Forms.Patient_ID = patient.Patient_ID
		AND Assessment_Forms.Form_Type = 'Form 485'
		AND Assessment_Forms.Cert_End_Item_3b >= NOW()
		AND Assessment_Forms.Form_Status <> 'Delete')
		AND patient.Agency_ID = #session.AgencyID#
		AND patient.Status = 'active'
		<cfif Session.EmpLevel eq 6 or Session.EmpLevel eq 8>
			AND   
			(
				patient.Employee_ID = '
					#Session.EmployeeID#'
					OR
					   '#session.EmployeeId#' 
					IN (
						select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
						)
			)
		</cfif>
		ORDER BY patient.Last_Name_M0040 ASC
	</cfquery>
	
	<cfquery  name='ftf' datasource='#Application.DataSrc#'>
	<cfsetting requesttimeout="5000">
	 SELECT count(p.Patient_Id) as Rcount
	 FROM #Request.prefix_db_agency#.patient p, #Request.prefix_db_agency#.Assessment_New an
	 WHERE  p.Agency_Id = '#session.AgencyId#'
	 AND    p.Status = 'Active'
	 AND    an.Patient_Id = p.Patient_Id
	 AND    SUBSTR(an.Start_of_Care_M0030, 1, 10) >= '2011-01-01'
	 AND    an.Deleted <> 1
	 AND    SUBSTR(an.Assessment_Reason_M0100, 1, 1) = '1'
	 AND   (
			an.Physician_Last_Seen_Date IS NULL
			 OR
			DATE_SUB(an.Start_of_Care_M0030, INTERVAL -30 DAY) <= SUBSTR(an.Physician_Last_Seen_Date, 1, 10)
			 OR 
			DATE_SUB(an.Start_of_Care_M0030, INTERVAL  90 DAY) >= SUBSTR(an.Physician_Last_Seen_Date, 1, 10)
		   )
		   <cfif Session.EmpLevel eq 8>
				AND   
				(
					p.Employee_ID = '
						#Session.EmployeeID#'
						OR
						   '#session.EmployeeId#' 
						IN (
							select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = p.Patient_Id and deleted <> 1
							)
				)
			</cfif>
	 ORDER BY p.Last_Name_M0040 ASC, p.First_Name_M0040 ASC, an.Start_of_Care_M0030 ASC
	</cfquery>

<cfquery  datasource="#Application.DataSrc#" name="GetList">
<cfsetting requesttimeout="5000">
	SELECT count(patient.Patient_ID) as Rcount
	FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.ScheduleItems, #Request.prefix_db_lookup#.Employee
	WHERE	ScheduleItems.Assessment_Tracker_ID = Assessment_New.Assessment_Tracker_ID
	AND (Assessment_New.Deleted IS Null OR Assessment_New.Deleted = '0')
	AND patient.Patient_ID = ScheduleItems.Patient_ID
	AND	patient.Status = 'active'
	AND	patient.Agency_ID = #session.AgencyID#
	AND	(ScheduleItems.EClaimed <> 1) 
	AND ScheduleItems.Deleted <> 1
	AND ScheduleItems.Employee_ID <> 0
	AND ScheduleItems.Progress_Note = 'No'
	AND ScheduleItems.Missed = 'No'
	AND	ScheduleItems.Visit_Date <= NOW()
	AND ScheduleItems.Employee_ID = Employee.Employee_ID
	ORDER BY patient.Last_Name_M0040 ASC, patient.First_Name_M0040 ASC, Employee.Last_Name ASC, Employee.First_Name ASC,  ScheduleItems.Visit_Type ASC, ScheduleItems.Visit_Date ASC
</cfquery>


<cfquery  datasource="#Application.DataSrc#" name="GetListN">
<cfsetting requesttimeout="5000">
	SELECT count(patient.Patient_ID) as Rcount
	FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.ScheduleItems, #Request.prefix_db_lookup#.Employee
	WHERE	ScheduleItems.Assessment_Tracker_ID = Assessment_New.Assessment_Tracker_ID
	AND (Assessment_New.Deleted IS Null OR Assessment_New.Deleted = '0')
	AND patient.Patient_ID = ScheduleItems.Patient_ID
	AND	patient.Status = 'active'
	AND	patient.Agency_ID = #session.AgencyID#
	AND	(ScheduleItems.Missed = 'yes') 
	AND ScheduleItems.Deleted <> 1
	AND ScheduleItems.Employee_ID <> 0
	AND	ScheduleItems.Visit_Date <= NOW()
	AND ScheduleItems.Employee_ID = Employee.Employee_ID
	<cfif Session.EmpLevel eq 8>
	AND   
	(
		patient.Employee_ID = '
			#Session.EmployeeID#'
			OR
			   '#session.EmployeeId#' 
			IN (
				select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
				)
	)
	</cfif>
	ORDER BY patient.Last_Name_M0040 ASC, patient.First_Name_M0040 ASC, Employee.Last_Name ASC, Employee.First_Name ASC,  ScheduleItems.Visit_Type ASC, ScheduleItems.Visit_Date ASC
</cfquery>

<cfquery  datasource="#Application.DataSrc#" name="GetListS"> 
<cfsetting requesttimeout="5000">  
	SELECT count(patient.Patient_ID) as Rcount
	FROM #Request.prefix_db_agency#.Assessment_New, #Request.prefix_db_agency#.patient, #Request.prefix_db_agency#.ScheduleItems, #Request.prefix_db_lookup#.Employee
	WHERE	ScheduleItems.Assessment_Tracker_ID = Assessment_New.Assessment_Tracker_ID
	AND (Assessment_New.Deleted IS Null OR Assessment_New.Deleted = '0')
	AND patient.Patient_ID = ScheduleItems.Patient_ID
	AND	patient.Status = 'active'
	AND	patient.Agency_ID = #session.AgencyID#
	AND	(ScheduleItems.EClaimed <> 1) 
	AND ScheduleItems.Deleted <> 1
	AND ScheduleItems.Employee_ID <> 0
	AND ScheduleItems.Progress_Note = 'No'
	AND ScheduleItems.Missed = 'No'
	AND	ScheduleItems.Visit_Date <= NOW()
	AND ScheduleItems.Employee_ID = Employee.Employee_ID
	<cfif Session.EmpLevel eq 1 or Session.EmpLevel eq 3 or Session.EmpLevel eq 5 or Session.EmpLevel eq 6 or Session.EmpLevel eq 8 >
	AND   
	(
		patient.Employee_ID = '
			#Session.EmployeeID#'
			OR
			   '#session.EmployeeId#' 
			IN (
				select distinct employee_id from #Request.prefix_db_agency#.ScheduleItems where patient_id = patient.Patient_Id and deleted <> 1
				)
	)
	</cfif>
	ORDER BY Employee.Last_Name ASC, Employee.First_Name ASC, patient.Last_Name_M0040 ASC, ScheduleItems.Visit_Type ASC, ScheduleItems.Visit_Date ASC
</cfquery>

<cfquery  name="DExp" datasource="#Application.DataSrc#">
<cfsetting requesttimeout="5000">
SELECT count(Employee_ID) as Rcount
		FROM #Request.prefix_db_lookup#.Employee 
		WHERE Employee.Agency_ID = #session.AgencyID# 
		AND Employee.status = 'active' 
		AND Employee.EmployeeType != 'Physician' 
		AND (Professional = 0 or Drivers = 0 or Auto = 0 or Background = 0 or Physical = 0 or CPR = 0 or TB = 0)
		ORDER BY Last_Name		
</cfquery>

<cfset findday=DateFormat(DateAdd('d', -14, now()),'yyyy-mm-dd')>
<cfquery  name="DExpForty" datasource="#Application.DataSrc#">
<cfsetting requesttimeout="5000">
		SELECT count(Employee_ID) as Rcount
		FROM #Request.prefix_db_lookup#.Employee 
		WHERE Employee.Agency_ID = #session.AgencyID# 
		AND Employee.status = 'active' 
		AND Employee.EmployeeType != 'Physician' 
		AND (Professional = 0 or Drivers = 0 or Auto = 0 or Background = 0 or Physical = 0 or CPR = 0 or TB = 0)
		<cfif Session.EmpLevel eq 1 or Session.EmpLevel eq 3 or Session.EmpLevel eq 5>
			AND   
			(
				Employee_ID = '#Session.EmployeeID#'
			)
		</cfif>
		AND Record_Mod_Date >= '#findday#'
		ORDER BY Last_Name
</cfquery>

<cfquery  name="GetDataset" datasource="#Application.DataSrc#">
<cfsetting requesttimeout="5000">
	SELECT DISTINCT count(d.Datasets_ID) as Rcount
	From  #Request.prefix_db_agency#.Datasets d, #Request.prefix_db_agency#.patient p, #Request.prefix_db_agency#.Assessment_New an
	Where d.Agency_ID = '#Session.AgencyLogin#'
	AND  (d.DatasetCreated = 0 OR d.DatasetCreated = 1)
	AND   d.Patient_ID = p.Patient_ID
	AND   d.Assessment_Tracker_ID = an.Assessment_Tracker_ID
	AND   an.Transmission_Status LIKE '%ready to transmit%'	
</cfquery>

</cfif>

