Handle merging patients with PatientProgrammeVaccinationsSearch

This ensures that when merging two patients together, if the one to be destroyed has a PatientProgrammeVaccinationsSearch record, this is moved across to the other patient rather than preventing the merge from happening due to a foreign key constraint. We only keep the most recently searched record when duplicates exist for the same programme type.

Author: murugapl

app/lib/patient_merger.rb

@@ -112,6 +112,23 @@ def call
 
       PatientLocation.where(patient: patient_to_destroy).destroy_all
 
+      patient_to_destroy
+        .patient_programme_vaccinations_searches
+        .find_each do |search|
+        existing_search =
+          patient_to_keep.patient_programme_vaccinations_searches.find_by(
+            programme_type: search.programme_type
+          )
+
+        if existing_search
+          if existing_search.last_searched_at > search.last_searched_at
+            search.last_searched_at = existing_search.last_searched_at
+          end
+          existing_search.destroy!
+        end
+        search.update!(patient_id: patient_to_keep.id)
+      end
+
       patient_to_destroy.changesets.update_all(patient_id: nil)
 
       patient_to_destroy.class_imports.each do |import|

spec/lib/patient_merger_spec.rb

@@ -76,6 +76,13 @@
         patient: patient_to_destroy
       )
     end
+    let(:patient_programme_vaccinations_search) do
+      create(
+        :patient_programme_vaccinations_search,
+        patient: patient_to_destroy,
+        programme: programme
+      )
+    end
     let(:pre_screening) { create(:pre_screening, patient: patient_to_destroy) }
     let(:school_move) do
       create(:school_move, :to_school, patient: patient_to_destroy)
@@ -185,6 +192,12 @@
       )
     end
 
+    it "moves patient programme vaccinations searches" do
+      expect { call }.to change {
+        patient_programme_vaccinations_search.reload.patient
+      }.to(patient_to_keep)
+    end
+
     it "moves patient specific directions" do
       expect { call }.to change {
         patient_specific_direction.reload.patient
@@ -377,6 +390,78 @@
       end
     end
 
+    describe "vaccination searches" do
+      context "when patients have overlapping and unique programme searches" do
+        before do
+          create(
+            :patient_programme_vaccinations_search,
+            patient: patient_to_keep,
+            programme: Programme.hpv,
+            last_searched_at: 1.day.ago
+          )
+          create(
+            :patient_programme_vaccinations_search,
+            patient: patient_to_destroy,
+            programme: Programme.hpv,
+            last_searched_at: 5.days.ago
+          )
+
+          create(
+            :patient_programme_vaccinations_search,
+            patient: patient_to_destroy,
+            programme: Programme.flu,
+            last_searched_at: 3.days.ago
+          )
+          create(
+            :patient_programme_vaccinations_search,
+            patient: patient_to_keep,
+            programme: Programme.flu,
+            last_searched_at: 1.day.ago
+          )
+
+          create(
+            :patient_programme_vaccinations_search,
+            patient: patient_to_keep,
+            programme: Programme.menacwy,
+            last_searched_at: 2.days.ago
+          )
+
+          create(
+            :patient_programme_vaccinations_search,
+            patient: patient_to_destroy,
+            programme: Programme.td_ipv,
+            last_searched_at: 2.days.ago
+          )
+        end
+
+        it "merges searches correctly" do
+          expect { call }.to change(
+            PatientProgrammeVaccinationsSearch,
+            :count
+          ).by(-2)
+
+          searches = patient_to_keep.patient_programme_vaccinations_searches
+          expect(searches.count).to eq(4)
+
+          hpv_search = searches.find_by(programme_type: "hpv")
+          expect(hpv_search.last_searched_at.to_date).to eq(1.day.ago.to_date)
+
+          flu_search = searches.find_by(programme_type: "flu")
+          expect(flu_search.last_searched_at.to_date).to eq(1.day.ago.to_date)
+
+          tdipv_search = searches.find_by(programme_type: "td_ipv")
+          expect(tdipv_search.last_searched_at.to_date).to eq(
+            2.days.ago.to_date
+          )
+
+          menacwy_search = searches.find_by(programme_type: "menacwy")
+          expect(menacwy_search.last_searched_at.to_date).to eq(
+            2.days.ago.to_date
+          )
+        end
+      end
+    end
+
     context "when the patient to destroy has a changeset" do
       before do
         create(:patient_changeset, :class_import, patient: patient_to_destroy)