24.11 fb integrity animal report12220

onprc_ehr/resources/queries/onprc_ehr/IntegrityAnimalReportNHps.sql

@@ -0,0 +1,106 @@
+--4/30/2025 Talked wiht KJim Ray and reviewed tghe current output
+--she is not interested in the assigned animal counts
+--she would like to PI added to the report and to provide a hyperlink from the Protocol Number
+--Need to get the current report for allwoable animals in Prime
+
+With eIACUCAuthorized as (
+    SELECT
+
+        g.Parent_Protocol as Protocol,
+        g.Species,
+        Sum(g.Number_of_Animals_Max) as TotalforSpecies
+
+
+    FROM eIACUC_PRIME_VIEW_ANIMAL_GROUPS g left outer join eIACUC_PRIME_VIEW_PROTOCOLS p
+                                                           on g.Parent_Protocol = p.protocol_id
+    where p.protocol_state = 'Approved'
+    Group by g.Parent_Protocol,g.Species),
+--This will tie the animal authorized to the Base Protocol fior comparison
+
+     BaseProtocolAssigned as (
+         Select   a.protocol,
+                  p.BaseProtocol,
+                  p.RevisionNumber,
+                  p.Protocol_State,
+                  a.species,
+                  a.TotalforSpecies
+
+
+         from eIACUC_PRIME_VIEW_PROTOCOLS p join  eIACUCAuthorized a
+                                                  on a.protocol = p.protocol_id
+
+     ),
+
+     --This query finds the nukmbder assigned from the assignment table
+    -- added thatg this is for NHP assignments
+     CurrentAssignedNHP as
+         (Select
+              --a.project.protocol as Protocol,
+              p.external_id as Protocol,
+              a.id.demographics.species as Species,
+              Count(a.id) as TotalAssignedbySpecies
+          from study.assignment a join ehr.protocol p on a.project.protocol = p.protocol
+          where (a.date <= Now() -- Take care of future assignments in the date
+                     and a.enddate is null or a.enddate > Now())
+          Group By
+              p.external_id,
+              a.id.demographics.species
+         ),
+    AllowablefromProtocol as (
+        Select
+            a.protocol,
+            a.species,
+            a.allowed
+
+
+       From ehr.animalusage a
+       where Isactive = True
+
+
+
+    ),
+--This will be the final report
+    --Need to add a CTE for SLA
+    --Not getting a solid connection  between
+    --summary needs to combine eIACUCAuthorized with Allowable by Protocol
+    SummaryReport as (
+Select
+    e.Protocol,
+    a.protocol as PrimeProtocol,
+    --a.project,
+    e.species,
+
+    Sum(e.TotalForSpecies) as eIACUCAuthorized,
+    Sum(a.allowed) as PrimeAuthorized
+
+from   eIACUCAuthorized e left outer join AllowablefromProtocol a on  e.protocol = a.protocol.displayName
+    Where e.Species not in ('Rat','Rabbit','Mouse',	'Guinea Pig')
+    Group by
+        e.Protocol,
+        a.protocol,
+        e.species
+    ),
+    CompareReport as (
+        Select
+            s.protocol,
+            s.PrimeProtocol,
+            s.species,
+            s.eIACUCAuthorized,
+            s.PrimeAuthorized,
+            (s.eIACUCAuthorized - s.primeAuthorized) as AuthorizedCompare,
+            'Review Authorized Animals' as UpdateAuthorizedNHPS
+
+        from SummaryReport s
+        Group by
+            s.protocol,
+            s.PrimeProtocol,
+            s.species,
+            s.eIACUCAuthorized,
+            s.primeAuthorized
+    )
+--Select * from eIACUCAuthorized
+--Select * from CurrentAssigned
+--Select * from SummaryReport
+--Select * from BaseProtocolAssigned
+--select * from AllowablefromProtocol
+Select * from CompareReport

onprc_ehr/resources/queries/onprc_ehr/eiACUCtoProtocolCheck.sql

@@ -0,0 +1,4 @@
+
+
+
+From onprc_ehr.

onprc_ehr/resources/queries/onprc_ehr/integrityAllowableAnimalsReport.sql

@@ -0,0 +1,80 @@
+--4/30/2025 Talked wiht KJim Ray and reviewed tghe current output
+--she is not interested in the assigned animal counts
+--she would like to PI added to the report and to provide a hyperlink from the Protocol Number
+--Need to get the current report for allwoable animals in Prime
+--New Name and definitions as I refine the process.
+
+With eIACUCAuthorized as (
+    SELECT
+
+        g.Parent_Protocol as Protocol,
+        g.Species,
+        Sum(g.Number_of_Animals_Max) as TotalforSpecies
+
+
+    FROM eIACUC_PRIME_VIEW_ANIMAL_GROUPS g left outer join eIACUC_PRIME_VIEW_PROTOCOLS p
+                                                           on g.Parent_Protocol = p.protocol_id
+    where p.protocol_state = 'Approved'
+    Group by g.Parent_Protocol,g.Species),
+--This will tie the animal authorized to the Base Protocol fior comparison
+
+     BaseProtocolAssigned as (
+         Select   a.protocol,
+                  p.BaseProtocol,
+                  p.RevisionNumber,
+                  p.Protocol_State,
+                  a.species,
+                  a.TotalforSpecies
+
+
+         from eIACUC_PRIME_VIEW_PROTOCOLS p join  eIACUCAuthorized a
+                                                  on a.protocol = p.protocol_id
+
+     ),
+
+
+     AllowablefromProtocol as (
+         Select
+             a.protocol,
+             a.species,
+             Sum(a.allowed)
+
+
+         From ehr.animalusage a
+            Group BY
+                a.protocol,
+                a.species
+
+     ),
+--This will be the final report
+     --Need to add a CTE for SLA
+     AuthorizedNHP as (
+         Select
+             p.Protocol,
+             --a.project,
+             e.species,
+             Sum(e.TotalForSpecies) as TotalAuthorized
+
+
+
+         from   eIACUCAuthorized e , ehr.protocol p
+         Where e.protocol = p.protocol
+         Group by
+             e.Protocol,
+             e.species
+     ),
+    SummaryNHP as (
+        Select
+            a.protocol,
+            a.species,
+            a.TotalAuthorized
+
+        from AuthorizedNHP a
+        where a.species not in ('Rat','Mice','Rabbit')
+
+    )
+Select * from eIACUCAuthorized
+--Select * from CurrentAssigned
+--Select * from SummaryNHP
+--Select * from BaseProtocolAssigned
+--select * from AllowablefromProtocol