malawi_hiv_program_reports 1.0.1 → 1.0.2

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

@@ -0,0 +1,479 @@
+# frozen_string_literal: true
+
+module MalawiHivProgramReports
+  module Pepfar
+    
+    class RegimenSwitch
+
+      include MalawiHivProgramReports::Adapters::Moh::Custom
+
+      attr_accessor :start_date, :end_date, :occupation, :location
+      
+      def initialize(start_date:, end_date:, **kwargs)
+        @start_date = start_date
+        @end_date = end_date
+        @occupation = kwargs[:occupation]
+        @location = kwargs[:location]
+      end
+
+      def find_report
+        regimen_switch('pepfar')
+      end
+
+      def regimen_switch(pepfar)
+        swicth_report(pepfar)
+      end
+
+      def regimen_report(type)
+        MalawiHivProgramReports::Clinic::RegimenDispensationData.new(type: type, start_date: @start_date,
+                                                         end_date: @end_date, occupation: @occupation, location: @location)
+                                                    .find_report
+      end
+
+      def latest_regimen_dispensed(rebuild_outcome)
+        if rebuild_outcome || @occupation.present?
+          MalawiHivProgramReports::Moh::CohortBuilder.new(outcomes_definition: 'moh', location: @location)
+                                            .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
+          #{site_manager(operator: 'AND', column: 'person.site_id', location: @location)}
+          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?
+          formated_data[patient_id][order_id] = {
+            name: medication,
+            quantity: quantity,
+            dispensation_date: dispensation_date,
+            identifier: data['identifier'],
+            gender: data['gender'],
+            birthdate: data['birthdate'],
+            drug_id: 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'
+          } if formated_data[patient_id][order_id].blank?
+
+          formated_data[patient_id][order_id][:pack_sizes] << value_numeric
+        end
+
+        formated_data
+      end
+
+      def regimen_data
+        encounter_type_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.execute('drop table if exists tmp_latest_arv_dispensation ;')
+
+        ActiveRecord::Base.connection.execute("
+          create table tmp_latest_arv_dispensation AS
+            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,
+            MIN(d.quantity),
+            MIN(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 #{in_manager(column: 'd.drug_inventory_id', values: drug_ids)}
+          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, o.patient_id, o.start_date
+        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(CAST(p.patient_id AS INT), CAST(#{@location} AS INT)) as date) AS date_enrolled,
+                date_antiretrovirals_started(CAST(p.patient_id AS INT), CAST(MIN(s.start_date) AS DATE), CAST(#{@location} AS INT)) 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 #{in_manager(column: 'p.patient_id', values: patient_ids)})
+            GROUP BY p.patient_id;
+        SQL
+      end
+
+      def max_patient_order_date(patient_id)
+        drug_ids = Drug.joins('INNER JOIN concept_set s ON s.concept_id = drug.concept_id')\
+                       .where('s.concept_set = ?', ConceptName.find_by_name('Antiretroviral drugs').concept_id).map(&:drug_id)
+
+        Order.joins(drug_order: :drug)
+             .where(
+               orders: {
+                 patient_id: patient_id,
+                 start_date: @start_date.to_date.beginning_of_day..@end_date.to_date.end_of_day
+               },
+               drug_order: { drug_inventory_id: drug_ids, quantity: 1..Float::INFINITY }
+             )
+             .maximum(:start_date).to_date
+      end
+
+      def arv_dispensention_data(patient_id)
+        encounter_type_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)
+        max_order_date = max_patient_order_date(patient_id)
+        orders = Order.joins(drug_order: :drug)
+                      .where(drug_order: {
+                               drug_inventory_id: drug_ids,
+                               quantity: 1..Float::INFINITY
+                             },
+                             orders: {
+                               patient_id: patient_id,
+                             }
+                      )
+                      .where('DATE(orders.start_date) = ?', max_order_date.to_date)
+                      .group(:order_id)
+        orders.select('orders.patient_id, drug.name, drug_order.quantity, orders.start_date')
+      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, n.given_name, n.family_name, i.identifier, p.birthdate, p.gender
+              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: 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, location: @location)
+        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 #{in_manager(column: 'odr.patient_id', values: patient_list)}
+          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 #{in_manager(column: 'co.person_id', values: patient_list)}
+            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 #{in_manager(column: 'o.person_id', values: patient_list)}
+          ORDER BY o.obs_datetime DESC
+        SQL
+      end
+
+      def maternal_status(patient_id, current_gender)
+        return nil if current_gender.blank?
+
+        result = 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/pepfar/sc_arvdisp.rb

@@ -0,0 +1,174 @@
+# frozen_string_literal: true
+
+module MalawiHivProgramReports
+  module Pepfar
+    class ScArvdisp
+      include MalawiHivProgramReports::Utils::CommonSqlQueryUtils
+      include MalawiHivProgramReports::Adapters::Moh::Custom
+
+      DRUGCATEGORY = {
+        'TLD 30-count bottles' => { drugs: [983], quantity: 30 },
+        'TLD 90-count bottles' => { drugs: [983], quantity: 90 },
+        'TLD 180-count bottles' => { drugs: [983], quantity: 180 },
+        'TLE/400 30-count bottles' => { drugs: [735], quantity: 30 },
+        'TLE/400 90-count bottles' => { drugs: [735], quantity: 90 },
+        'TLE 600/TEE bottles' => { drugs: [11], quantity: 'N/A' },
+        'DTG 10 90-count bottles' => { drugs: [980], quantity: 90 },
+        'DTG 50 30-count bottles' => { drugs: [982], quantity: 30 },
+        'LPV/r 100/25 tabs 60 tabs/bottle' => { drugs: [23, 73, 74, 739, 977, 1045], quantity: 60 },
+        'LPV/r 40/10 (pediatrics) bottles' => { drugs: [94, 979], quantity: 'N/A' },
+        'NVP (adult) bottles' => { drugs: [22, 613], quantity: 'N/A' },
+        'NVP (pediatric) bottles' => { drugs: [21, 817, 968, 971], quantity: 'N/A' },
+        'Other (adult) bottles' => { drugs: [
+          3, 5, 6, 10, 38, 39, 40, 42, 89, 614, 730, 731, 734, 738,
+          814, 815, 932, 933, 934, 952, 954, 955, 957, 969, 976, 978, 984, 1217, 1213, 14
+        ], quantity: 'N/A' },
+        'Other (pediatric) bottles' => { drugs: [
+          2, 9, 28, 29, 30, 31, 32, 36, 37, 41, 70, 71, 72, 90, 91,
+          95, 104, 177, 732, 733, 736, 737, 813, 816, 981, 1043, 1044, 1214, 1215
+        ], quantity: 'N/A' }
+      }.freeze
+
+      def initialize(start_date:, end_date:, rebuild_outcome: false, **kwargs)
+        @completion_start_date = start_date.to_date.strftime('%Y-%m-%d 00:00:00')
+        @completion_end_date = end_date.to_date.strftime('%Y-%m-%d 23:59:59')
+        @rebuild_outcome = rebuild_outcome
+        @use_filing_number = ::GlobalProperty.find_by(property: 'use.filing.numbers')
+                                             &.property_value
+                                             &.casecmp?('true')
+        @occupation = kwargs[:occupation]
+        @location = kwargs[:location]
+      end
+
+      def find_report
+        data
+      end
+
+      private
+
+      
+      def data
+        drug_category = [
+          { name: 'TLD 30-count bottles', units: 0, quantity: 30, dispensations: [] },
+          { name: 'TLD 90-count bottles', units: 0, quantity: 90, dispensations: [] },
+          { name: 'TLD 180-count bottles', units: 0, quantity: 180, dispensations: [] },
+          { name: 'TLE/400 30-count bottles', units: 0, quantity: 30, dispensations: [] },
+          { name: 'TLE/400 90-count bottles', units: 0, quantity: 90, dispensations: [] },
+          { name: 'TLE 600/TEE bottles', units: 0, quantity: 'N/A', dispensations: [] },
+          { name: 'DTG 10 90-count bottles', units: 0, quantity: 90, dispensations: [] },
+          { name: 'DTG 50 30-count bottles', units: 0, quantity: 30, dispensations: [] },
+          { name: 'LPV/r 100/25 tabs 60 tabs/bottle', units: 0, quantity: 60, dispensations: [] },
+          { name: 'LPV/r 40/10 (pediatrics) bottles', units: 0, quantity: 'N/A', dispensations: [] },
+          { name: 'NVP (adult) bottles', units: 0, quantity: 'N/A', dispensations: [] },
+          { name: 'NVP (pediatric) bottles', units: 0, quantity: 'N/A', dispensations: [] },
+          { name: 'Other (adult) bottles', units: 0, quantity: 'N/A', dispensations: [] },
+          { name: 'Other (pediatric) bottles', units: 0, quantity: 'N/A', dispensations: [] }
+          # {name: "Other bottles", units: 0, quantity: 'N/A', dispensations: []}
+        ].freeze
+        
+        (fetch_dispensations || {}).map do |_order_id, dispensation_info|
+          quantities = dispensation_info[:quantities]
+
+          (quantities || []).each do |quantity|
+            fetched_category, unit = fetch_category(dispensation_info[:drug_id], quantity)
+            drug_category.map do |category|
+              next unless category[:name] == fetched_category
+
+              category[:units] += unit
+              category[:dispensations] << [
+                dispensation_info[:name],
+                quantity,
+                dispensation_info[:start_date],
+                dispensation_info[:identifier],
+                dispensation_info[:patient_id]
+              ]
+              break
+            end
+          end
+        end
+
+        drug_category
+      end
+
+      def fetch_category(drug_id, quantity)
+        DRUGCATEGORY.map do |name, data|
+          next unless data[:drugs].include?(drug_id)
+
+          qty = data[:quantity]
+          return [name, 1] if qty == 'N/A'
+          return [name, 1] if qty.to_i == quantity.to_i
+        end
+
+        DRUGCATEGORY.map do |name, data|
+          if data[:drugs].include?(drug_id)
+            qty = data[:quantity]
+            return [name, (quantity / qty).to_i] if (quantity.to_i % qty).zero?
+          end
+        end
+        # return ["Other bottles", 1]
+      end
+
+      def fetch_dispensations
+        dispensations = {}
+        (fetch_orders || []).each do |order|
+          order_id = order['order_id'].to_i
+          assign_order_details(dispensations, order) if dispensations[order_id].blank?
+          dispensations[order_id][:quantities] << order['value_numeric'].to_f
+        end
+
+        dispensations
+      end
+
+      def assign_order_details(report, order)
+        order_id = order['order_id'].to_i
+        report[order_id] = {
+          quantity: order['quantity'].to_f,
+          name: order['name'],
+          drug_id: order['drug_id'].to_i,
+          identifier: (order['identifier'] ||= 'N/A'),
+          start_date: order['start_date'].to_date,
+          patient_id: order['patient_id'].to_i,
+          quantities: []
+        }
+      end
+
+      def fetch_orders
+        ActiveRecord::Base.connection.select_all <<~SQL
+          SELECT
+          	orders.order_id, orders.start_date, drug_order.quantity, drug.name,
+          	orders.patient_id, obs.value_numeric, orders.start_date,
+          	patient_identifier.identifier,drug.drug_id
+          FROM orders
+          INNER JOIN drug_order ON drug_order.order_id = orders.order_id AND drug_order.quantity > 0
+          INNER JOIN arv_drug ON arv_drug.drug_id = drug_order.drug_inventory_id
+          INNER JOIN drug ON drug.drug_id = arv_drug.drug_id
+          INNER JOIN encounter ON encounter.encounter_id = orders.encounter_id
+          	AND encounter.program_id = #{::Program.find_by(name: 'HIV PROGRAM').id}
+            #{site_manager(operator: 'AND', column: 'encounter.site_id', location: @location)}
+          INNER JOIN obs ON obs.order_id = orders.order_id AND obs.voided = 0
+          	AND obs.concept_id = #{amount_dispensed} AND obs.value_numeric > 0
+            #{site_manager(operator: 'AND', column: 'obs.site_id', location: @location)}
+            LEFT JOIN patient_identifier ON patient_identifier.patient_id = orders.patient_id
+          	AND patient_identifier.identifier_type = #{identifier_type}
+          	AND patient_identifier.voided = 0
+            #{site_manager(operator: 'AND', column: 'patient_identifier.site_id', location: @location)}
+          LEFT JOIN (#{current_occupation_query}) a ON a.person_id = orders.patient_id
+          #{site_manager(operator: 'AND', column: 'orders.site_id', location: @location)}
+          WHERE orders.voided = 0 #{%w[Military Civilian].include?(@occupation) ? 'AND' : ''} #{occupation_filter(occupation: @occupation, field_name: 'value', table_name: 'a', include_clause: false)}
+          #{site_manager(operator: 'AND', column: 'orders.site_id', location: @location)}
+          AND orders.start_date BETWEEN '#{@completion_start_date}' AND '#{@completion_end_date}'
+          AND orders.order_type_id = 1
+          ORDER BY orders.start_date ASC, orders.patient_id;
+        SQL
+      end
+
+      def amount_dispensed
+        @amount_dispensed ||= ::ConceptName.find_by(name: 'Amount of drug dispensed').concept_id
+      end
+
+      def identifier_type
+        @identifier_type ||= ::PatientIdentifierType.find_by_name!(@use_filing_number ? 'Filing number' : 'ARV Number').id
+      end
+    end
+  end
+end