malawi_hiv_program_reports 1.0.1 → 1.0.2

data/app/services/malawi_hiv_program_reports/clinic/regimen_switch.rb

@@ -0,0 +1,456 @@
+# frozen_string_literal: true
+
+module MalawiHivProgramReports
+  module Clinic
+    class RegimenSwitch
+      def initialize(start_date:, end_date:, **kwargs)
+        @start_date = start_date
+        @end_date = end_date
+        @occupation = kwargs[:occupation]
+      end
+
+      def regimen_switch(pepfar)
+        swicth_report(pepfar)
+      end
+
+      def regimen_report(type)
+        RegimenDispensationData.new(type:, start_date: @start_date,
+                                    end_date: @end_date, occupation: @occupation)
+                               .find_report
+      end
+
+      def latest_regimen_dispensed(rebuild_outcome)
+        if rebuild_outcome || @occupation.present?
+          MalawiHivProgramReports::Moh::CohortBuilder.new(outcomes_definition: 'moh')
+                                                     .init_temporary_tables(@start_date, @end_date, @occupation)
+        end
+
+        latest_regimens
+      end
+
+      private
+
+      def latest_regimens
+        pills_dispensed = ::ConceptName.find_by_name('Amount of drug dispensed').concept_id
+        patient_identifier_type = ::PatientIdentifierType.find_by_name('ARV Number').id
+
+        arv_dispensentions = ActiveRecord::Base.connection.select_all <<~SQL
+          SELECT
+            o.patient_id, drug.drug_id, o.order_id, i.identifier,
+            drug.name, d.quantity, o.start_date, obs.value_numeric,
+            person.birthdate, person.gender
+          FROM orders o
+          INNER JOIN drug_order d ON d.order_id = o.order_id AND d.quantity > 0
+          INNER JOIN drug ON drug.drug_id = d.drug_inventory_id
+          INNER JOIN arv_drug On arv_drug.drug_id = drug.drug_id
+          INNER JOIN temp_patient_outcomes t ON o.patient_id = t.patient_id AND t.cum_outcome = 'On antiretrovirals'
+          INNER JOIN person ON person.person_id = o.patient_id AND person.voided = 0
+          INNER JOIN (
+            SELECT MAX(o.start_date) start_date, o.patient_id
+            FROM orders o
+            INNER JOIN drug_order dor ON dor.order_id = o.order_id AND dor.quantity > 0
+              AND dor.drug_inventory_id IN (SELECT drug_id FROM arv_drug)
+            WHERE o.voided = 0
+              AND o.start_date <= '#{@end_date.to_date.strftime('%Y-%m-%d 23:59:59')}'
+              AND o.start_date >= '#{@start_date.to_date.strftime('%Y-%m-%d 00:00:00')}'
+            GROUP BY o.patient_id
+          ) lor ON lor.start_date = o.start_date AND lor.patient_id = o.patient_id
+          LEFT JOIN obs on obs.order_id = o.order_id AND obs.concept_id=#{pills_dispensed} AND obs.voided = 0
+          LEFT JOIN patient_identifier i ON i.patient_id = o.patient_id
+            AND i.identifier_type = #{patient_identifier_type} AND i.voided = 0
+          WHERE o.voided = 0
+            AND o.start_date <= '#{@end_date.to_date.strftime('%Y-%m-%d 23:59:59')}'
+            AND o.start_date >= '#{@start_date.to_date.strftime('%Y-%m-%d 00:00:00')}'
+          ORDER BY o.patient_id
+        SQL
+
+        patient_list = arv_dispensentions.map { |d| d['patient_id'] }.uniq.push(0)
+
+        @latest_vl = latest_vl_orders(patient_list)
+        @latest_result = latest_vl_results(patient_list)
+
+        formated_data = {}
+
+        (arv_dispensentions || []).each do |data|
+          dispensation_date = data['start_date'].to_date
+          patient_id = data['patient_id'].to_i
+          order_id = data['order_id'].to_i
+          # drug_id = data['drug_id'].to_i
+          medication = data['name']
+          quantity = data['quantity'].to_f
+          value_numeric = data['value_numeric'].to_f
+          drug_id = data['drug_id'].to_i
+          # find the latest vl result for the patient from the array of vl results {patient_id: number, order_date: date}
+          latest_vl = @latest_vl.select { |vl| vl['patient_id'] == patient_id }&.first
+          latest_result = @latest_result.select { |vl| vl['patient_id'] == patient_id }&.first
+
+          formated_data[patient_id] = {} if formated_data[patient_id].blank?
+          if formated_data[patient_id][order_id].blank?
+            formated_data[patient_id][order_id] = {
+              name: medication,
+              quantity:,
+              dispensation_date:,
+              identifier: data['identifier'],
+              gender: data['gender'],
+              birthdate: data['birthdate'],
+              drug_id:,
+              pack_sizes: [],
+              vl_latest_order_date: latest_vl.present? ? latest_vl['order_date']&.to_date : 'N/A',
+              vl_latest_result_date: latest_result.present? ? latest_result['result_date']&.to_date : 'N/A',
+              vl_latest_result: latest_result.present? ? latest_result['result'] : 'N/A'
+            }
+          end
+
+          formated_data[patient_id][order_id][:pack_sizes] << value_numeric
+        end
+
+        formated_data
+      end
+
+      def regimen_data
+        ::EncounterType.find_by_name('DISPENSING').id
+        arv_concept_id = ::ConceptName.find_by_name('Antiretroviral drugs').concept_id
+
+        drug_ids = ::Drug.joins('INNER JOIN concept_set s ON s.concept_id = drug.concept_id')
+                         .where('s.concept_set = ?', arv_concept_id).map(&:drug_id)
+
+        ActiveRecord::Base.connection.execute('drop table if exists tmp_latest_arv_dispensation ;')
+
+        ActiveRecord::Base.connection.execute("
+          create table tmp_latest_arv_dispensation
+          SELECT patient_id,DATE(MAX(start_date)) as start_date
+          FROM orders INNER JOIN drug_order t USING (order_id)
+          WHERE
+          (
+            start_date BETWEEN '#{@start_date.to_date.strftime('%Y-%m-%d 00:00:00')}' AND '#{@end_date.to_date.strftime('%Y-%m-%d 23:59:59')}'
+            AND t.drug_inventory_id IN (#{drug_ids.join(',')}) AND t.quantity > 0
+          )
+          group by patient_id")
+
+        ActiveRecord::Base.connection.execute('create index lad_patient_id_and_start_date on tmp_latest_arv_dispensation (start_date, patient_id);')
+
+        arv_dispensentions = ActiveRecord::Base.connection.select_all <<~SQL
+          SELECT
+            o.patient_id patient_id, o.start_date,  o.order_id,
+            d.quantity, drug.name
+          FROM orders o
+          INNER JOIN drug_order d ON o.order_id = d.order_id
+          INNER JOIN drug ON d.drug_inventory_id = drug.drug_id
+          INNER JOIN tmp_latest_arv_dispensation k on (o.patient_id = k.patient_id and DATE(o.start_date) =  k.start_date)
+          WHERE d.drug_inventory_id IN(#{drug_ids.join(',')})
+          AND d.quantity > 0 AND o.voided = 0 AND o.start_date BETWEEN '#{@start_date.to_date.strftime('%Y-%m-%d 00:00:00')}'
+          AND '#{@end_date.to_date.strftime('%Y-%m-%d 23:59:59')}' GROUP BY o.order_id;
+        SQL
+
+        patient_ids = []
+        (arv_dispensentions || []).each do |data|
+          patient_ids << data['patient_id'].to_i
+        end
+        return [] if patient_ids.blank?
+
+        ActiveRecord::Base.connection.select_all <<~SQL
+           SELECT
+            `p`.`patient_id` AS `patient_id`,
+            cast(patient_date_enrolled(`p`.`patient_id`) as date) AS `date_enrolled`,
+            date_antiretrovirals_started(`p`.`patient_id`, min(`s`.`start_date`)) AS `earliest_start_date`
+           FROM
+              ((`patient_program` `p`
+              LEFT JOIN `person` `pe` ON ((`pe`.`person_id` = `p`.`patient_id`))
+              LEFT JOIN `patient_state` `s` ON ((`p`.`patient_program_id` = `s`.`patient_program_id`)))
+              LEFT JOIN `person` ON ((`person`.`person_id` = `p`.`patient_id`)))
+           WHERE
+            ((`p`.`voided` = 0)
+            AND (`s`.`voided` = 0)
+            AND (`p`.`program_id` = 1)
+            AND (`s`.`state` = 7))
+            AND (`s`.`start_date` <= '#{@end_date.to_date.strftime('%Y-%m-%d 23:59:59')}'
+            AND p.patient_id IN(#{patient_ids.join(',')}))
+          GROUP BY `p`.`patient_id`;
+        SQL
+      end
+
+      def arv_dispensention_data(patient_id)
+        ::EncounterType.find_by_name('DISPENSING').id
+        arv_concept_id = ::ConceptName.find_by_name('Antiretroviral drugs').concept_id
+
+        drug_ids = ::Drug.joins('INNER JOIN concept_set s ON s.concept_id = drug.concept_id')
+                         .where('s.concept_set = ?', arv_concept_id).map(&:drug_id)
+
+        ActiveRecord::Base.connection.select_all <<~SQL
+          SELECT
+            o.patient_id,  drug.name, d.quantity, o.start_date
+          FROM orders o
+          INNER JOIN drug_order d ON d.order_id = o.order_id
+          INNER JOIN drug ON drug.drug_id = d.drug_inventory_id
+          WHERE d.drug_inventory_id IN(#{drug_ids.join(',')})
+          AND o.patient_id = #{patient_id} AND
+          d.quantity > 0 AND o.voided = 0 AND DATE(o.start_date) = (
+            SELECT DATE(MAX(start_date)) FROM orders
+            INNER JOIN drug_order t USING(order_id)
+            WHERE patient_id = o.patient_id
+            AND (
+              start_date BETWEEN '#{@start_date.to_date.strftime('%Y-%m-%d 00:00:00')}'
+              AND '#{@end_date.to_date.strftime('%Y-%m-%d 23:59:59')}'
+              AND t.drug_inventory_id IN(#{drug_ids.join(',')}) AND quantity > 0
+            )
+          ) GROUP BY (o.order_id)
+        SQL
+      end
+
+      def current_regimen(type)
+        data = regimen_data
+
+        clients = {}
+        (data || []).each do |r|
+          patient_id = r['patient_id'].to_i
+
+          outcome_status = if type == 'pepfar'
+                             ActiveRecord::Base.connection.select_one <<~SQL
+                               SELECT pepfar_patient_outcome(#{patient_id}, '#{@end_date.to_date}') outcome;
+                             SQL
+
+                           else
+                             ActiveRecord::Base.connection.select_one <<~SQL
+                               SELECT patient_outcome(#{patient_id}, '#{@end_date.to_date}') outcome;
+                             SQL
+
+                           end
+          next unless outcome_status['outcome'] == 'On antiretrovirals'
+
+          medications = arv_dispensention_data(patient_id)
+
+          begin
+            visit_date = medications.first['start_date'].to_date
+          rescue StandardError
+            next
+          end
+
+          curr_reg = ActiveRecord::Base.connection.select_one <<~SQL
+            SELECT patient_current_regimen(#{patient_id}, '#{@end_date.to_date}') current_regimen
+          SQL
+
+          next unless visit_date >= @start_date.to_date && visit_date <= @end_date.to_date
+
+          if clients[patient_id].blank?
+            demo = ActiveRecord::Base.connection.select_one <<~SQL
+              SELECT
+                p.birthdate, p.gender, i.identifier arv_number,
+                n.given_name, n.family_name
+              FROM person p
+              LEFT JOIN person_name n ON n.person_id = p.person_id AND n.voided = 0
+              LEFT JOIN patient_identifier i ON i.patient_id = p.person_id
+              AND i.identifier_type = 4 AND i.voided = 0
+              WHERE p.person_id = #{patient_id} GROUP BY p.person_id
+              ORDER BY n.date_created DESC, i.date_created DESC;
+            SQL
+
+            viral_load = latest_vl_results([patient_id])
+            clients[patient_id] = {
+              arv_number: demo['arv_number'],
+              given_name: demo['given_name'],
+              family_name: demo['family_name'],
+              birthdate: demo['birthdate'],
+              gender: demo['gender'] == 'M' ? 'M' : maternal_status(patient_id, demo['gender']),
+              current_regimen: curr_reg['current_regimen'],
+              current_weight: current_weight(patient_id),
+              art_start_date: r['earliest_start_date'],
+              medication: [],
+              vl_result: viral_load ? viral_load['result'] : nil,
+              vl_result_date: viral_load ? viral_load['result_date'] : nil
+            }
+          end
+
+          (medications || []).each do |med|
+            clients[patient_id][:medication] << {
+              medication: med['name'],
+              quantity: med['quantity'],
+              start_date: visit_date
+            }
+          end
+        end
+
+        clients
+      end
+
+      def swicth_report(pepfar)
+        clients = {}
+        data = regimen_data
+        pepfar_outcome_builder(pepfar.blank? ? 'moh' : 'pepfar')
+
+        (data || []).each do |r|
+          patient_id = r['patient_id'].to_i
+          medications = arv_dispensention_data(patient_id)
+
+          outcome_status = ActiveRecord::Base.connection.select_one <<~SQL
+            SELECT cum_outcome FROM temp_patient_outcomes WHERE patient_id = #{patient_id};
+          SQL
+
+          next if outcome_status.blank?
+          next if outcome_status['cum_outcome'].blank?
+          next unless outcome_status['cum_outcome'] == 'On antiretrovirals'
+
+          visit_date = medications.first['start_date']
+          visit_date.blank? ? next : (visit_date = visit_date.to_date)
+
+          next unless visit_date >= @start_date.to_date && visit_date <= @end_date.to_date
+
+          prev_reg = ActiveRecord::Base.connection.select_one <<~SQL
+            SELECT patient_current_regimen(#{patient_id}, '#{(visit_date - 1.day).to_date}') previous_regimen
+          SQL
+
+          current_reg = ActiveRecord::Base.connection.select_one <<~SQL
+            SELECT patient_current_regimen(#{patient_id}, '#{visit_date}') current_regimen
+          SQL
+
+          next if prev_reg['previous_regimen'] == current_reg['current_regimen']
+          next if prev_reg['previous_regimen'] == 'N/A'
+
+          if clients[patient_id].blank?
+            demo = ActiveRecord::Base.connection.select_one <<~SQL
+              SELECT
+                p.birthdate, p.gender, i.identifier arv_number,
+                n.given_name, n.family_name, p.person_id
+              FROM person p
+              LEFT JOIN person_name n ON n.person_id = p.person_id AND n.voided = 0
+              LEFT JOIN patient_identifier i ON i.patient_id = p.person_id
+              AND i.identifier_type = 4 AND i.voided = 0
+              WHERE p.person_id = #{patient_id} GROUP BY p.person_id
+              ORDER BY n.date_created DESC, i.date_created DESC
+            SQL
+
+            clients[patient_id] = {
+              arv_number: (demo['arv_number'].blank? ? 'N/A' : demo['arv_number']),
+              given_name: demo['given_name'],
+              family_name: demo['family_name'],
+              birthdate: demo['birthdate'],
+              gender: demo['gender'],
+              previous_regimen: prev_reg['previous_regimen'],
+              current_regimen: current_reg['current_regimen'],
+              patient_type: get_patient_type(demo['person_id'], pepfar),
+              current_weight: current_weight(demo['person_id']),
+              art_start_date: r['earliest_start_date'],
+              medication: []
+            }
+          end
+
+          (medications || []).each do |m|
+            clients[patient_id][:medication] << {
+              medication: m['name'], quantity: m['quantity'],
+              start_date: visit_date
+            }
+          end
+        end
+
+        clients
+      end
+
+      def get_patient_type(patient_id, pepfar)
+        return nil unless pepfar
+
+        concept_id = ::ConceptName.find_by_name('Type of patient').concept_id
+        ext_id = ::ConceptName.find_by_name('External consultation').concept_id
+        obs = ::Observation.where(concept_id:, value_coded: ext_id, person_id: patient_id)
+        (obs.blank? ? 'Resident' : 'External')
+      end
+
+      def pepfar_outcome_builder(repport_type = 'moh')
+        cohort_builder = MalawiHivProgramReports::Moh::CohortDisaggregated.new(name: 'Regimen switch', type: repport_type,
+                                                                               start_date: @start_date.to_date,
+                                                                               end_date: @end_date.to_date, rebuild: true,
+                                                                               occupation: @occupation)
+        cohort_builder.rebuild_outcomes(repport_type)
+      end
+
+      def current_weight(patient_id)
+        weight_concept = ::ConceptName.find_by_name('Weight (kg)').concept_id
+        obs = ::Observation.where("person_id = ? AND concept_id = ?
+          AND obs_datetime <= ? AND (value_numeric IS NOT NULL OR value_text IS NOT NULL)",
+                                  patient_id, weight_concept, @end_date.to_date.strftime('%Y-%m-%d 23:59:59'))
+                           .order('obs_datetime DESC, date_created DESC')
+
+        return nil if obs.blank?
+
+        (obs.first.value_numeric.blank? ? obs.first.value_text : obs.first.value_numeric)
+      end
+
+      # def vl_result(patient_id)
+      #   ActiveRecord::Base.connection.select_one <<~SQL
+      #     SELECT lab_result_obs.obs_datetime AS result_date,
+      #     CONCAT (COALESCE(measure.value_modifier, '='),' ',COALESCE(measure.value_numeric, measure.value_text, '')) as result
+      #     FROM obs AS lab_result_obs
+      #     INNER JOIN orders
+      #       ON orders.order_id = lab_result_obs.order_id
+      #       AND orders.voided = 0
+      #     INNER JOIN obs AS measure
+      #       ON measure.obs_group_id = lab_result_obs.obs_id
+      #       AND measure.voided = 0
+      #     INNER JOIN (
+      #       SELECT concept_id, name
+      #       FROM concept_name
+      #       INNER JOIN concept USING (concept_id)
+      #       WHERE concept.retired = 0
+      #       AND name NOT LIKE 'Lab test result'
+      #       GROUP BY concept_id
+      #     ) AS measure_concept
+      #       ON measure_concept.concept_id = measure.concept_id
+      #     WHERE lab_result_obs.voided = 0
+      #     AND measure.person_id = #{patient_id}
+      #     AND (measure.value_numeric IS NOT NULL || measure.value_text IS NOT NULL)
+      #     AND lab_result_obs.obs_datetime <= '#{@end_date.to_date.strftime('%Y-%m-%d 23:59:59')}'
+      #     ORDER BY lab_result_obs.obs_datetime DESC
+      #     LIMIT 1
+      #   SQL
+      # end
+
+      def latest_vl_orders(patient_list)
+        ActiveRecord::Base.connection.select_all <<~SQL
+          SELECT odr.patient_id, MAX(start_date) AS order_date
+          FROM obs o
+          INNER JOIN orders odr ON odr.order_id = o.order_id AND odr.voided = 0 AND DATE(odr.start_date) <= '#{@end_date}'
+          WHERE o.concept_id = #{::ConceptName.find_by_name('Test Type').concept_id}
+          AND o.value_coded = #{::ConceptName.find_by_name('HIV viral load').concept_id}
+          AND o.voided = 0
+          AND o.person_id IN (#{patient_list.join(',')})
+          GROUP BY odr.patient_id
+        SQL
+      end
+
+      def latest_vl_results(patient_list)
+        ActiveRecord::Base.connection.select_all <<~SQL
+          SELECT o.person_id AS patient_id,
+          o.obs_datetime AS result_date,
+          CONCAT (COALESCE(o.value_modifier, '='),' ',COALESCE(o.value_numeric, o.value_text, '')) AS result
+          FROM obs o
+          INNER JOIN (
+            SELECT MAX(obs_datetime) AS obs_datetime, person_id
+            FROM obs co
+            INNER JOIN orders odr ON odr.order_id = co.order_id AND odr.voided = 0
+            WHERE co.concept_id = #{::ConceptName.find_by_name('HIV viral load').concept_id}
+            AND co.voided = 0
+            AND co.obs_datetime <= '#{@end_date}'
+            AND (co.value_numeric IS NOT NULL || co.value_text IS NOT NULL)
+            AND co.person_id IN (#{patient_list.join(',')})
+            GROUP BY co.person_id
+          ) AS latest_vl ON latest_vl.obs_datetime = o.obs_datetime AND latest_vl.person_id = o.person_id
+          INNER JOIN orders odr ON odr.order_id = o.order_id AND odr.voided = 0
+          WHERE o.concept_id = #{::ConceptName.find_by_name('HIV viral load').concept_id}
+          AND o.voided = 0 AND o.obs_datetime <= '#{@end_date}'
+          AND (o.value_numeric IS NOT NULL || o.value_text IS NOT NULL)
+          AND o.person_id IN (#{patient_list.join(',')})
+          ORDER BY o.obs_datetime DESC
+        SQL
+      end
+
+      def maternal_status(patient_id, current_gender)
+        return nil if current_gender.blank?
+
+        result = MalawiHivProgramReports::Pepfar::ViralLoadCoverage2.new(start_date: @start_date,
+                                                                         end_date: @end_date).vl_maternal_status([patient_id])
+        gender = 'FNP'
+        gender = 'FP' unless result[:FP].blank?
+        gender = 'FBf' unless result[:FBf].blank?
+        gender
+      end
+    end
+  end
+end

data/app/services/malawi_hiv_program_reports/clinic/regimens_and_formulations.rb

@@ -0,0 +1,182 @@
+# frozen_string_literal: true
+
+# Retrieve patients in a particular regimen and formulation.
+module MalawiHivProgramReports
+  module Clinic
+    class RegimensAndFormulations
+      include MalawiHivProgramReports::Utils::CommonSqlQueryUtils
+
+      attr_reader :start_date, :end_date, :regimen, :formulation
+
+      def initialize(start_date:, end_date:, regimen: nil, formulation: 'tablets', **kwargs)
+        raise ::InvalidParameterError, 'regimen is required' unless regimen
+
+        unless %w[granules tablets pellets].include?(formulation)
+          raise ::InvalidParameterError, "Invalid formalation: #{formulation}"
+        end
+
+        @start_date = start_date.to_date
+        @end_date = end_date.to_date
+        @formulation = formulation
+        @regimen = regimen
+        @occupation = kwargs[:occupation]
+      end
+
+      def find_report
+        patients
+      end
+
+      def patients
+        patients_with_prescriptions.each_with_object([]) do |patient, matching_patients|
+          prescribed_drugs = drugs_prescribed_to_patient(patient.patient_id, patient.prescription_date).map(&:drug_id)
+          non_matching_drugs = Set.new(drugs) - prescribed_drugs
+
+          next unless non_matching_drugs.empty?
+
+          demographics = patient_demographics(patient.patient_id, patient.prescription_date)
+
+          matching_patients << {
+            patient_id: demographics.patient_id,
+            arv_number: demographics.arv_number,
+            birthdate: demographics.birthdate,
+            gender: demographics.gender,
+            weight: demographics.weight
+          }
+        end
+      end
+
+      private
+
+      TABLET_REGIMENS = {
+        '0A' => [969, 22],
+        '0P' => [1044, 968],
+        '2A' => [731],
+        '2P' => [732],
+        '4A' => [39, 11],
+        '4P' => [736, 30],
+        '5A' => [735],
+        '6A' => [734, 22],
+        '7A' => [734, 932],
+        '8A' => [39, 932],
+        '9A' => [969, 73],
+        '9P' => [1044, 74],
+        '10A' => [734, 73],
+        '11A' => [39, 73],
+        '11P' => [736, 74],
+        '12A' => [982, 977, 976],
+        '13A' => [983],
+        '14A' => [984, 982],
+        '14P' => [736, 982],
+        '15A' => [969, 982],
+        '15P' => [1044, 982],
+        '16A' => [969, 954],
+        '16P' => [1044, 1043],
+        '17A' => [969, 11],
+        '17P' => [1044, 30]
+      }.freeze
+
+      GRANULES_REGIMENS = {
+        '9P' => [1044, 1045],
+        '11P' => [736, 1045]
+      }.freeze
+
+      PELLETS_REGIMENS = {
+        '9P' => [1044, 979],
+        '11P' => [736, 979]
+      }.freeze
+
+      REGIMENS_BY_FORMULATION = {
+        'granules' => GRANULES_REGIMENS,
+        'pellets' => PELLETS_REGIMENS,
+        'tablets' => TABLET_REGIMENS
+      }.freeze
+
+      # Returns drugs in selected regimen and formulation
+      def drugs
+        REGIMENS_BY_FORMULATION[formulation][regimen]
+      end
+
+      def patients_with_prescriptions
+        return [] if drugs.nil?
+
+        ::DrugOrder.select('orders.patient_id AS patient_id, MAX(start_date) AS prescription_date')
+                   .joins(:order)
+                   .joins("LEFT JOIN (#{current_occupation_query}) AS a ON a.person_id = orders.patient_id")
+                   .where(quantity: 1..Float::INFINITY, drug_inventory_id: drugs)
+                   .where(occupation_filter(occupation: @occupation, field_name: 'value', table_name: 'a',
+                                            include_clause: false).to_s)
+                   .merge(treatment_orders)
+                   .group('orders.patient_id')
+      end
+
+      # Returns all orders in treatment encounter of HIV PROGRAM
+      def treatment_orders
+        ::Order.joins(:encounter)
+               .where(start_date: start_date..end_date)
+               .merge(treatment_encounter)
+               .or(::Order.joins(:encounter)
+                      .where(auto_expire_date: start_date..end_date)
+                      .merge(treatment_encounter))
+               .or(::Order.joins(:encounter)
+                      .where('start_date < ? AND auto_expire_date > ?', start_date, end_date)
+                      .merge(treatment_encounter))
+      end
+
+      def treatment_encounter
+        ::Encounter.where(encounter_type: ::EncounterType.find_by_name('Treatment'),
+                          program_id: Constants::PROGRAM_ID)
+      end
+
+      # Returns drugs prescribed to patient on given day
+      def drugs_prescribed_to_patient(patient_id, prescription_date)
+        ::DrugOrder.select('drug_order.drug_inventory_id AS drug_id')
+                   .joins(:order)
+                   .where(quantity: 1..Float::INFINITY, drug_inventory_id: drugs)
+                   .merge(::Order.joins(:encounter)
+                             .where(patient_id:, start_date: prescription_date)
+                             .merge(treatment_encounter))
+      end
+
+      def patient_demographics(patient_id, prescription_date)
+        ::Person.find_by_sql(
+          <<~SQL
+            SELECT person.person_id AS patient_id, patient_identifier.identifier AS arv_number,
+                   person.birthdate AS birthdate, person.gender AS gender, obs.value_numeric AS weight
+            FROM person
+            LEFT JOIN patient_identifier ON patient_identifier.patient_id = person.person_id
+                                         AND patient_identifier.identifier_type = #{arv_number_type_id}
+                                         AND patient_identifier.voided = 0
+            LEFT JOIN obs ON obs.person_id = person.person_id
+                          AND obs.concept_id = #{weight_concept_id}
+                          AND obs.obs_datetime = (
+                            SELECT MAX(obs_datetime) FROM obs
+                            WHERE person_id = #{patient_id}
+                              AND concept_id = #{weight_concept_id}
+                              AND obs_datetime <= '#{prescription_date}'
+                              AND voided = 0
+                          ) AND obs.voided = 0
+            WHERE person.person_id = #{patient_id}
+          SQL
+        ).first
+      end
+
+      def patient_recent_weight(patient_id, as_of)
+        ::Observation.select(:value_numeric)
+                     .where(concept_id: ::ConceptName.find_by_name('Weight (kg)').concept_id,
+                            person_id: patient_id)
+                     .where('obs_datetime < ? AND value_numeric IS NOT NULL', as_of)
+                     .order(obs_datetime: :desc)
+                     .first
+                     &.value_numeric
+      end
+
+      def weight_concept_id
+        @weight_concept_id ||= ::ConceptName.find_by_name('Weight (kg)').concept_id
+      end
+
+      def arv_number_type_id
+        @arv_number_type_id ||= ::PatientIdentifierType.find_by_name('ARV Number').id
+      end
+    end
+  end
+end