Fix(procedure library): replace infinite list by a basic search

app/components/procedure/results_component.rb

@@ -0,0 +1,5 @@
+class Procedure::ResultsComponent < ApplicationComponent
+  def initialize(grouped_procedures:)
+    @grouped_procedures = grouped_procedures
+  end
+end

app/components/procedure/results_component/results_component.html.haml

@@ -0,0 +1,18 @@
+#procedure-results
+  - if !@grouped_procedures.nil?
+    - if @grouped_procedures.any?
+      %table.table.vertical.procedure-library-list
+        - @grouped_procedures.each do |_, procedures|
+          %tr
+            %th
+              = procedures.first.organisation_name
+          - procedures.sort_by(&:id).each do |procedure|
+            %tr
+              %td
+                = procedure.libelle
+              %td.flex
+                = link_to('Consulter', apercu_admin_procedure_path(id: procedure.id), target: "_blank", rel: "noopener", class: 'button small')
+                = link_to('Cloner', admin_procedure_clone_path(procedure.id, from_new_from_existing: true), 'data-method' => :put, class: 'button small primary')
+                = link_to('Contacter', "mailto:#{procedure.administrateurs.map(&:email) * ","}", class: 'button small')
+    - else
+      %p.mt-2 aucun résultat

app/components/procedure/search_component.rb

@@ -0,0 +1,5 @@
+class Procedure::SearchComponent < ApplicationComponent
+  def initialize(grouped_procedures:)
+    @grouped_procedures = grouped_procedures
+  end
+end

app/components/procedure/search_component/search_component.html.haml

@@ -0,0 +1,12 @@
+= form_tag(search_admin_procedures_path, data: { turbo: true }, method: :post, class: 'form') do
+  = label_tag :query, 'Rechercher une procédure'
+
+  .notice
+    %p Entrez au minimum 3 lettres
+
+
+  = text_field_tag :query, params[:query], required: true, placeholder: 'politique de la ville', minlength: "3"
+
+  = submit_tag 'Rechercher', class: 'button primary'
+
+  = render Procedure::ResultsComponent.new(grouped_procedures: @grouped_procedures)

app/controllers/administrateurs/procedures_controller.rb

@@ -67,8 +67,15 @@ module Administrateurs
     SIGNIFICANT_DOSSIERS_THRESHOLD = 30
 
     def new_from_existing
+      @grouped_procedures = nil
+    end
+
+    def search
+      query = ActiveRecord::Base.sanitize_sql_like(params[:query])
+
       significant_procedure_ids = Procedure
         .publiees_ou_closes
+        .where('unaccent(libelle) ILIKE unaccent(?)', "%#{query}%")
         .joins(:dossiers)
         .group("procedures.id")
         .having("count(dossiers.id) >= ?", SIGNIFICANT_DOSSIERS_THRESHOLD)

app/views/administrateurs/procedures/new_from_existing.html.haml

@@ -41,19 +41,4 @@
       %h2.header-section
         Créer une nouvelle démarche à partir d’une démarche existante
 
-      %p.notice
+      = render Procedure::SearchComponent.new(grouped_procedures: @grouped_procedures)
-        Pour rechercher dans cette liste, utilisez la fonction "Recherche" de votre navigateur (CTRL+F ou command+F)
-
-      %table.table.vertical.procedure-library-list
-        - @grouped_procedures.each do |_, procedures|
-          %tr
-            %th
-              = procedures.first.organisation_name
-          - procedures.sort_by(&:id).each do |procedure|
-            %tr
-              %td
-                = procedure.libelle
-              %td.flex
-                = link_to('Consulter', apercu_admin_procedure_path(id: procedure.id), target: "_blank", rel: "noopener", class: 'button small')
-                = link_to('Cloner', admin_procedure_clone_path(procedure.id, from_new_from_existing: true), 'data-method' => :put, class: 'button small primary')
-                = link_to('Contacter', "mailto:#{procedure.administrateurs.map(&:email) * ","}", class: 'button small')

app/views/administrateurs/procedures/search.turbo_stream.haml

@@ -0,0 +1,2 @@
+= turbo_stream.replace 'procedure-results' do
+  = render Procedure::ResultsComponent.new(grouped_procedures: @grouped_procedures)

config/routes.rb

@@ -418,6 +418,7 @@ Rails.application.routes.draw do
 
       collection do
         get 'new_from_existing'
+        post 'search'
       end
 
       member do

spec/controllers/administrateurs/procedures_controller_spec.rb

@@ -70,12 +70,14 @@ describe Administrateurs::ProceduresController, type: :controller do
     it { expect(subject.status).to eq(200) }
   end
 
-  describe 'GET #new_from_existing' do
+  describe 'POST #search' do
     before do
       stub_const("Administrateurs::ProceduresController::SIGNIFICANT_DOSSIERS_THRESHOLD", 2)
     end
 
-    subject { get :new_from_existing }
+    let(:query) { 'Procedure' }
+
+    subject { post :search, params: { query: query }, format: :turbo_stream }
     let(:grouped_procedures) { subject; assigns(:grouped_procedures) }
     let(:response_procedures) { grouped_procedures.map { |_o, procedures| procedures }.flatten }
 
@@ -112,6 +114,18 @@ describe Administrateurs::ProceduresController, type: :controller do
         expect(grouped_procedures.find { |o, _p| o == 'DDT du Loiret'  }.last).to contain_exactly(procedure_with_service_2, procedure_without_service)
       end
     end
+
+    describe 'searching' do
+      let!(:matching_procedure) { create(:procedure_with_dossiers, :published, dossiers_count: 2, libelle: 'éléctriCITE') }
+      let!(:unmatching_procedure) { create(:procedure_with_dossiers, :published, dossiers_count: 2, libelle: 'temoin') }
+
+      let(:query) { 'ELECTRIcité' }
+
+      it 'is case insentivite and unaccented' do
+        expect(response_procedures).to include(matching_procedure)
+        expect(response_procedures).not_to include(unmatching_procedure)
+      end
+    end
   end
 
   describe 'GET #edit' do