<cfif>
<cfif groupby neq "">
 <cfset groupby = Replace(groupby, 'patient.', 'p.', 'ALL') />
 <cfset groupby = Replace(groupby, 'Payer.', 'py.', 'ALL') />
 <cfset groupby = Replace(groupby, 'Physician.', 'ph.', 'ALL') />
 <cfset groupby = Replace(groupby, 'Assessment_New.', 'an.', 'ALL') />
</cfif>

<cfquery  name="GetNames1" datasource="#Application.DataSrc#">
 SELECT p.Patient_Id, p.Last_Name_M0040, p.First_Name_M0040, p.Middle_Initial_M0040, p.Status, p.MSA_Code
       ,p.Zip_M0060, p.City, p.State_M0050
       ,an.Assessment_Id, an.Assessment_Tracker_Id
	   ,an.Start_of_Care_M0030, an.Certification_Start, an.Certification_End
	   ,an.SN_Visit_Orders, an.HHA_Visit_Orders, an.Therapy_Visit_Orders
       ,an.Assessment_Reason_M0100, an.Date_Discharge_M0906, an.Previous_Assessment_Number
       ,py.PayName, py.Payer_Id
 FROM  #Request.prefix_db_agency#.patient p, #Request.prefix_db_agency#.Payer py, #Request.prefix_db_lookup#.Physician ph, #Request.prefix_db_agency#.Assessment_New an
 WHERE p.Agency_Id = '#session.AgencyId#'
 AND   an.Patient_Id = p.Patient_Id
 AND   p.Status <> 'deleted'
 AND  (an.Deleted = 0 or an.Deleted IS NULL)
 AND  (an.Archive = 0 or an.Archive IS NULL)
 AND   py.Payer_Id = an.Payer_Id
 AND   ph.Physician_Id = p.Primary_ReferringPhys_ID_M0072


 <cfif queryoption eq 'zip'>
	AND p.Status <> 'deleted'
 </cfif>

 <cfif queryoption eq 'census_sn' or queryoption eq 'census_hha' or queryoption eq 'census_therapy'>

	AND  an.Assessment_Reason_M0100 IN
	     (
		    '1 - Start of Care - further visits planned'
           ,'4 - Recertification (follow-up) reassessment'
		   ,'Hospice Comprehensive'
           ,'Hospice Comprehensive Comprehensive'
           ,'SN Adult Evaluation'
		 )
	AND an.Certification_Start BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#

	<cfif queryoption eq 'census_sn'>
	  AND an.SN_Visit_Orders LIKE '%w%'
	<cfelseif queryoption eq 'census_hha'>
	  AND an.HHA_Visit_Orders LIKE '%w%'
	<cfelseif queryoption eq 'census_therapy'>
	  AND an.THERAPY_Visit_Orders LIKE '%w%'
	</cfif>

 <cfelseif queryoption eq 'notadmitted'>
	AND an.NotAdmitted = 1
	AND an.Start_of_Care_M0030 BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#

 <cfelseif queryoption eq 'discharge'>
	AND (an.Assessment_Reason_M0100 Like '7%' OR an.Assessment_Reason_M0100 Like '8%' OR an.Assessment_Reason_M0100 Like '9%')
	AND an.Date_Discharge_M0906 BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#

  <cfelseif queryoption eq 'dischargeNoOASIS'>
	AND an.Assessment_Reason_M0100 = 'Discharge Non-OASIS'
	AND an.Date_Discharge_M0906 BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#


 <cfelseif queryoption eq 'census_dup'>
	AND  an.Assessment_Reason_M0100 IN
	     (
		    '1 - Start of Care - further visits planned'
		   ,'Hospice Comprehensive'
           ,'Hospice Comprehensive Comprehensive'
           ,'SN Adult Evaluation'
		 )
	AND an.Start_of_Care_M0030 BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#

 <cfelse>
	AND  an.Assessment_Reason_M0100 IN
	     (
		    '1 - Start of Care - further visits planned'
           ,'4 - Recertification (follow-up) reassessment'
		   ,'Hospice Comprehensive'
           ,'Hospice Comprehensive Comprehensive'
           ,'SN Adult Evaluation'
		 )
	AND  an.Start_of_Care_M0030 BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#
 </cfif>

	<cfif isDefined("Form.PayerType")>
	AND   py.PayerType IN (
	       <cfqueryparam
		     Value = "#Form.PayerType#"
             CFSQLType = "CF_SQL_VARCHAR"
             List = "yes"
             Null = "no"
             Separator = ","
		   >
	)
	</cfif>

 <cfif groupby neq "">Group by #groupby#</cfif>

</cfquery>


<cfquery  name="GetNames2" datasource="#Application.DataSrc#">
 SELECT p.Patient_Id, p.Last_Name_M0040, p.First_Name_M0040, p.Middle_Initial_M0040, p.Status, p.MSA_Code
       ,p.Zip_M0060, p.City, p.State_M0050
       ,an.Assessment_Id, an.Assessment_Tracker_Id
	   ,an.Start_of_Care_M0030, an.Certification_Start, an.Certification_End
	   ,an.SN_Visit_Orders, an.HHA_Visit_Orders, an.Therapy_Visit_Orders
       ,an.Assessment_Reason_M0100, an.Date_Discharge_M0906, an.Previous_Assessment_Number
       ,py.PayName, py.Payer_Id
 FROM  #Request.prefix_db_agency#.patient p, #Request.prefix_db_agency#.Payer py, #Request.prefix_db_lookup#.Physician ph, #Request.prefix_db_lookup#.archive_assessments an
 WHERE p.Agency_Id = '#session.AgencyId#'
 AND   an.Patient_Id = p.Patient_Id
 AND   p.Status <> 'deleted'
 AND  (an.Deleted = 0 or an.Deleted IS NULL)
 AND   py.Payer_Id = an.Payer_Id
 AND   ph.Physician_Id = p.Primary_ReferringPhys_ID_M0072
 

 <cfif queryoption eq 'zip'>
	AND p.Status <> 'deleted'
 </cfif>

 <cfif queryoption eq 'census_sn' or queryoption eq 'census_hha' or queryoption eq 'census_therapy'>

	AND  an.Assessment_Reason_M0100 IN
	     (
		    '1 - Start of Care - further visits planned'
           ,'4 - Recertification (follow-up) reassessment'
		   ,'Hospice Comprehensive'
           ,'Hospice Comprehensive Comprehensive'
           ,'SN Adult Evaluation'
		 )
	AND an.Certification_Start BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#

	<cfif queryoption eq 'census_sn'>
	  AND an.SN_Visit_Orders LIKE '%w%'
	<cfelseif queryoption eq 'census_hha'>
	  AND an.HHA_Visit_Orders LIKE '%w%'
	<cfelseif queryoption eq 'census_therapy'>
	  AND an.THERAPY_Visit_Orders LIKE '%w%'
	</cfif>

 <cfelseif queryoption eq 'notadmitted'>
	AND an.NotAdmitted = 1
	AND an.Start_of_Care_M0030 BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#

 <cfelseif queryoption eq 'discharge'>
	AND (an.Assessment_Reason_M0100 Like '%7%' OR an.Assessment_Reason_M0100 Like '%8%' OR an.Assessment_Reason_M0100 Like '%9%')
	AND an.Date_Discharge_M0906 BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#

 
 <cfelseif queryoption eq 'census_dup'>
	AND  an.Assessment_Reason_M0100 IN
	     (
		    '1 - Start of Care - further visits planned'
		   ,'Hospice Comprehensive'
           ,'Hospice Comprehensive Comprehensive'
           ,'SN Adult Evaluation'
		 )
	AND an.Start_of_Care_M0030 BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#

 <cfelse>
	AND  an.Assessment_Reason_M0100 IN
	     (
		    '1 - Start of Care - further visits planned'
           ,'4 - Recertification (follow-up) reassessment'
		   ,'Hospice Comprehensive'
           ,'Hospice Comprehensive Comprehensive'
           ,'SN Adult Evaluation'
		 )
	AND an.Start_of_Care_M0030 BETWEEN #CreateODBCDate(Form.From_Date)# AND #CreateODBCDate(Form.To_Date)#
 </cfif>

 <cfif isDefined("Form.PayerType")>
	AND   py.PayerType IN (
	       <cfqueryparam
		     Value = "#Form.PayerType#"
             CFSQLType = "CF_SQL_VARCHAR"
             List = "yes"
             Null = "no"
             Separator = ","
		   >
	)
 </cfif>

 <cfif groupby neq "">Group by #groupby#</cfif>

</cfquery>

<cfset getNameQuery = QueryNew("Patient_ID,Assessment_Id,Assessment_Tracker_Id,Certification_Start,Certification_End,Date_Discharge_M0906,Start_of_Care_M0030,Last_Name_M0040,First_Name_M0040,Middle_Initial_M0040,Zip_M0060,MSA_Code,city,State_M0050,Status,PayName,Payer_ID,Assessment_Reason_M0100,Previous_Assessment_Number,SN_Visit_Orders,HHA_Visit_Orders,Therapy_Visit_Orders")>

<cfloop query=GetNames1>
 <cftry>
  <cfset url.zip = Zip_M0060 />
   <cfset url.zip = Left(url.zip, 5) />
   <cfif url.zip LT 1 or url.zip GT 99999>
    <cfset url.zip = '00000' />
   </cfif>
	<cfset newRow = QueryAddRow(getNameQuery)>
	<cfset qc=QuerySetCell(getNameQuery, "Patient_ID", "#Patient_ID#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Last_Name_M0040","#Last_Name_M0040#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Status","#Status#" )>
	<cfset qc=QuerySetCell(getNameQuery, "First_Name_M0040","#First_Name_M0040#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Middle_Initial_M0040","#Middle_Initial_M0040#" )>
	<cfset qc=QuerySetCell(getNameQuery, "PayName","#PayName#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Payer_ID", "#Payer_ID#" )>
	<cfset qc=QuerySetCell(getNameQuery, "City", "#city#" )>
	<cfset qc=QuerySetCell(getNameQuery, "State_M0050", "#State_M0050#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Zip_M0060", "#url.zip#" )>
	<cfset qc=QuerySetCell(getNameQuery, "MSA_Code", "#MSA_Code#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Assessment_Reason_M0100", "#Assessment_Reason_M0100#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Previous_Assessment_Number", "#Previous_Assessment_Number#" )>
	<cfset qc=QuerySetCell(getNameQuery, "SN_Visit_Orders", "#SN_Visit_Orders#" )>
	<cfset qc=QuerySetCell(getNameQuery, "HHA_Visit_Orders", "#HHA_Visit_Orders#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Therapy_Visit_Orders", "#Therapy_Visit_Orders#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Start_of_Care_M0030", "#Start_of_Care_M0030#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Assessment_Id", "#Assessment_Id#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Assessment_Tracker_Id", "#Assessment_Tracker_Id#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Certification_Start", "#Certification_Start#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Certification_End", "#Certification_End#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Date_Discharge_M0906", "#Date_Discharge_M0906#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Start_of_Care_M0030","#Start_of_Care_M0030#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Certification_Start", "#Certification_Start#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Certification_End", "#Certification_End#" )>
	<cfset qc=QuerySetCell(getNameQuery, "Date_Discharge_M0906", "#Date_Discharge_M0906#" )>
 <cfcatch type = "Any"></cfcatch>
 </cftry>
</cfloop>

<cfloop query=GetNames2>
 <cftry>
  <cfset url.zip = Zip_M0060 />
   <cfset url.zip = Left(url.zip, 5) />
   <cfif url.zip LT 1 or url.zip GT 99999>
    <cfset url.zip = '00000' />
   </cfif>
  <cfif 1>
	 <cfset newRow = QueryAddRow(getNameQuery)>
	 <cfset qc=QuerySetCell(getNameQuery, "Patient_ID", "#Patient_ID#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Last_Name_M0040","#Last_Name_M0040#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Status","#Status#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "First_Name_M0040","#First_Name_M0040#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Middle_Initial_M0040","#Middle_Initial_M0040#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "PayName","#PayName#" )>
	  <cfset qc=QuerySetCell(getNameQuery, "Payer_ID", "#Payer_ID#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "City", "#city#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "State_M0050", "#State_M0050#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Zip_M0060", " #url.zip#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "MSA_Code", " #MSA_Code#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Assessment_Reason_M0100", "#Assessment_Reason_M0100#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Previous_Assessment_Number", "#Previous_Assessment_Number#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "SN_Visit_Orders", "#SN_Visit_Orders#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "HHA_Visit_Orders", "#HHA_Visit_Orders#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Therapy_Visit_Orders", "#Therapy_Visit_Orders#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Start_of_Care_M0030","#Start_of_Care_M0030#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Assessment_Id", "#Assessment_Id#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Assessment_Tracker_Id", "#Assessment_Tracker_Id#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Certification_Start", "#Certification_Start#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Certification_End", "#Certification_End#" )>
	 <cfset qc=QuerySetCell(getNameQuery, "Date_Discharge_M0906", "#Date_Discharge_M0906#" )>
  </cfif>
 <cfcatch type = "Any"></cfcatch>
 </cftry>
</cfloop>

 <cfquery  dbtype="query" name="GetNames">
  SELECT Patient_Id, Assessment_Id, Assessment_Tracker_Id, Certification_Start, Certification_End
	      ,Date_Discharge_M0906, Start_of_Care_M0030, Last_Name_M0040, First_Name_M0040, Middle_Initial_M0040
				,Zip_M0060, MSA_Code, City, State_M0050, Status, PayName, Payer_Id
				,Assessment_Reason_M0100, Previous_Assessment_Number, SN_Visit_Orders, HHA_Visit_Orders, Therapy_Visit_Orders 
  FROM  getNameQuery
  <cfif orderby neq ''>Order by #orderby#</cfif>
 </cfquery>
<cfelse>
no
</cfif>
 