pm = CreateObject("Component", "Menu");
myArgument = 'run_outcomes';
pm.MenuFunction(myArgument,#getP.Patient_Id#,'','','','');
request.pat = CreateObject("component","components.general.patients").init();
getadmit = request.pat.get_admissions(#session.cs.patientid#);
SELECT pAssessments.Assmt_ID, pAssessments.Record_creation_Date, pAssessments.Assmt_ID, pAssessments.F27,pAssessments.QA_Count ,
pAssessments.Patient_ID, pAssessments.F25 AS admission_status,LEFT(pAssessments.F26,1) AS Assessment_Reason_M0100, pAssessments.F177 AS Certification_Start,
pAssessments.F178 AS Certification_End, pAssessments.F176 AS Assessment_Completed_M0090,
pAssessments.F197 AS Transmission_status,
(SELECT count(*) FROM #Request.prefix_db_agency#.pAssessments pass
WHERE pass.Admit_ID = pAssessments.Admit_ID AND pass.status = 0 AND pass.F25 = 1
AND LEFT(pass.F26,1) IN (1,9) AND pass.QA_Count != 1 ) AS completed_oasis,
(SELECT count(*) FROM #Request.prefix_db_agency#.pAssessments pass
WHERE pass.Admit_ID = pAssessments.Admit_ID AND pass.status = 0 AND pass.F25 = 1
AND LEFT(pass.F26,1) IN (9) AND pass.QA_Count != 1 AND pass.F197 IS NULL ) AS dicharge_transmitted,
(SELECT COUNT(*) FROM #Request.prefix_db_agency#.pAssessments pass
WHERE (pass.F26 like '9%' OR pass.F26 like '7%' OR pass.F26 like '8%')
AND pass.Status =0 AND F176 < #now()# AND pass.Admit_ID = pAssessments.Admit_ID) AS discharge_count,
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.*
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
WHERE pPatients.Loc_ID = '#session.agencyid#'
AND pAssessments.Status = 0
AND pAssessments.F25 = 1
AND LEFT(pAssessments.F26,1) IN (1,9)
AND pAssessments.Patient_ID = #session.cs.patientid#
GROUP BY pAssessments.Assmt_ID
ORDER BY pPatients.Patient_ID ASC,pAdmit.M0030_START_CARE_DT DESC,Assessment_Reason_M0100 ASC
SELECT * FROM Get_SOC_discharge WHERE Assessment_Reason_M0100 IN (1)
SELECT * FROM Get_SOC_discharge WHERE Assessment_Reason_M0100 IN (9)