feat(seeds): add brouillon, sva/svr and tous-champs seed cases

Extract common custom procedure builders into seeds: a plain draft
procedure (procedures.brouillon), published SVA/SVR procedures
(cases/sva) and a procedure carrying every type de champ with a
repetition and a brouillon dossier (cases/champs, bulk-built). Migrate
~15 dossier spec sites and the type_de_champ all-types context onto
them. Kept on factories after measurement: single-example files and
per-example work over the 73-champ dossier, where seeding costs more
than it saves.

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>

Author: tchak

db/seeds/cases/champs.rb

@@ -0,0 +1,112 @@
+# frozen_string_literal: true
+
+# A draft procedure carrying one champ of every type (public) and one
+# annotation of every type (private), mirroring the factory traits
+# :with_all_champs / :with_all_annotations (same libelles: the type name,
+# except drop_down_list which is labeled simple_drop_down_list). The
+# repetition has two children, and a brouillon dossier is seeded with its
+# default champs. Load in a spec with `seed "cases/champs"`.
+
+procedure = Procedure.find_by(libelle: "Démarche avec tous les types de champ")
+
+if procedure.nil?
+  ActiveRecord::Base.transaction do
+    procedure = Procedure.new(
+      libelle: "Démarche avec tous les types de champ",
+      description: "Une démarche de démonstration avec un champ de chaque type.",
+      cadre_juridique: "https://www.legifrance.gouv.fr/",
+      duree_conservation_dossiers_dans_ds: 3,
+      max_duree_conservation_dossiers_dans_ds: Procedure::OLD_MAX_DUREE_CONSERVATION,
+      for_individual: true,
+      administrateurs: [administrateurs.default]
+    )
+    procedure.draft_revision = procedure.revisions.build
+    procedure.save!
+    instructeurs.default.assign_to_procedure(procedure)
+
+    # .beta.gouv.fr domains must be explicitly allowed via
+    # ALLOWED_API_DOMAINS_FROM_FRONTEND; plain .gouv.fr domains always are.
+    referentiel_domain = ENV.fetch("ALLOWED_API_DOMAINS_FROM_FRONTEND", "").split(",").grep(/rnb-api.beta.gouv/).first || "https://rnb-api.data.gouv.fr"
+    referentiel = Referentiels::APIReferentiel.create!(
+      mode: "exact_match",
+      url_tiptap: {
+        "type" => "doc",
+        "content" => [
+          {
+            "type" => "paragraph",
+            "content" => [
+              { "type" => "text", "text" => "#{referentiel_domain}/api/alpha/buildings/" },
+              { "type" => "mention", "attrs" => { "id" => "{query}", "label" => "Valeur saisie par l'usager" } },
+            ],
+          },
+        ],
+      },
+      test_data_tiptap: { "{query}" => "PG46YY6YWCX8" }
+    )
+
+    extra_params_by_type = {
+      "drop_down_list" => { libelle: "simple_drop_down_list", drop_down_options: ["val1", "val2", "val3"] },
+      "multiple_drop_down_list" => { drop_down_options: ["val1", "val2", "val3"] },
+      "linked_drop_down_list" => { drop_down_options: ["--primary--", "secondary"] },
+      "referentiel" => { referentiel:, mandatory: true },
+    }
+
+    # Build all coordinates in memory and save the revision once: one champ of
+    # every type per list, faster than one add_type_de_champ call per champ.
+    revision = procedure.draft_revision
+
+    build_type_de_champ = lambda do |params, private_champ, position|
+      type_de_champ = TypeDeChamp.new(private: private_champ, libelle: params[:type_champ], **params)
+      revision.revision_types_de_champ.build(type_de_champ:, position:)
+
+      if type_de_champ.type_champ == TypeDeChamp.type_champs.fetch(:piece_justificative) && type_de_champ.nature.blank?
+        type_de_champ.piece_justificative_template.attach(
+          io: StringIO.new("toto"),
+          filename: "toto.txt",
+          content_type: "text/plain",
+          metadata: { virus_scan_result: ActiveStorage::VirusScanner::SAFE }
+        )
+      end
+    end
+
+    [false, true].each do |private_champ|
+      TypeDeChamp.type_champs.each_value.with_index do |type_champ, position|
+        build_type_de_champ.call({ type_champ:, **extra_params_by_type.fetch(type_champ, {}) }, private_champ, position)
+      end
+    end
+
+    # titre_identite is a piece_justificative nature, not a type_champ
+    build_type_de_champ.call(
+      { type_champ: "piece_justificative", nature: "titre_identite", libelle: "titre_identité" },
+      false,
+      TypeDeChamp.type_champs.size
+    )
+
+    revision.save!
+
+    repetition_coordinate = revision.revision_types_de_champ.find { it.type_de_champ.repetition? && !it.type_de_champ.private? }
+    [
+      { type_champ: "text", libelle: "sub type de champ" },
+      { type_champ: "integer_number", libelle: "sub type de champ2" },
+    ].each_with_index do |params, position|
+      revision.revision_types_de_champ.create!(type_de_champ: TypeDeChamp.create!(params), parent: repetition_coordinate, position:)
+    end
+  end
+end
+
+procedures.label tous_champs: procedure
+
+dossier = procedure.dossiers.first
+
+if dossier.nil?
+  dossier = Dossier.create!(
+    user: users.usager,
+    revision: procedure.active_revision,
+    groupe_instructeur: procedure.defaut_groupe_instructeur,
+    individual: Individual.new(gender: "Mme", nom: "Dupont", prenom: "Jeanne", birthdate: Date.new(1985, 3, 12)),
+    autorisation_donnees: true
+  )
+  dossier.build_default_values
+end
+
+dossiers.label tous_champs: dossier

db/seeds/cases/sva.rb

@@ -0,0 +1,32 @@
+# frozen_string_literal: true
+
+# Published procedures configured for SVA / SVR decisions (silence vaut
+# accord / rejet). Load in a spec with `seed "cases/sva"`.
+
+["sva", "svr"].each do |decision|
+  procedure = Procedure.find_with_path("demarche-demo-#{decision}").first
+
+  if procedure.nil?
+    procedure = Procedure.new(
+      libelle: "Démarche de démonstration (#{decision.upcase})",
+      description: "Une démarche de démonstration en décision automatique #{decision.upcase}.",
+      cadre_juridique: "https://www.legifrance.gouv.fr/",
+      lien_site_web: "https://www.exemple.fr",
+      duree_conservation_dossiers_dans_ds: 3,
+      max_duree_conservation_dossiers_dans_ds: Procedure::OLD_MAX_DUREE_CONSERVATION,
+      for_individual: true,
+      administrateurs: [administrateurs.default],
+      sva_svr: SVASVRConfiguration.new(decision:).attributes
+    )
+    procedure.draft_revision = procedure.revisions.build
+    procedure.save!
+
+    type_de_champ = procedure.draft_revision.add_type_de_champ(type_champ: "text", libelle: "Nom du projet", mandatory: true)
+    raise type_de_champ.errors.full_messages.to_sentence if type_de_champ.errors.any?
+
+    procedure.publish_or_reopen!(administrateurs.default, "demarche-demo-#{decision}")
+    instructeurs.default.assign_to_procedure(procedure)
+  end
+
+  procedures.label(decision.to_sym => procedure)
+end

db/seeds/procedures.rb

@@ -34,3 +34,20 @@
 end
 
 procedures.label individual: procedure
+
+brouillon_procedure = Procedure.find_by(libelle: "Démarche de démonstration (brouillon)")
+
+if brouillon_procedure.nil?
+  brouillon_procedure = Procedure.new(
+    libelle: "Démarche de démonstration (brouillon)",
+    description: "Une démarche de démonstration encore en brouillon.",
+    cadre_juridique: "https://www.legifrance.gouv.fr/",
+    duree_conservation_dossiers_dans_ds: 3,
+    max_duree_conservation_dossiers_dans_ds: Procedure::OLD_MAX_DUREE_CONSERVATION,
+    administrateurs: [administrateurs.default]
+  )
+  brouillon_procedure.draft_revision = brouillon_procedure.revisions.build
+  brouillon_procedure.save!
+end
+
+procedures.label brouillon: brouillon_procedure

spec/models/dossier_spec.rb

@@ -3,7 +3,7 @@
 describe Dossier, :oaken, type: :model do
   include ActionView::Helpers::SanitizeHelper
 
-  before_all { seed "cases/entreprise" }
+  before_all { seed "cases/entreprise", "cases/sva" }
 
   let(:user) { create(:user) }
 
@@ -50,7 +50,7 @@
     end
 
     describe 'by_statut' do
-      let_it_be(:procedure) { create(:procedure) }
+      let_it_be(:procedure) { procedures.brouillon }
       let_it_be(:dossier_en_construction) { create(:dossier, :en_construction, procedure:) }
       let_it_be(:dossier_en_instruction) { create(:dossier, :en_instruction, procedure:) }
       let_it_be(:dossier_accepte) { create(:dossier, :accepte, procedure:) }
@@ -191,7 +191,7 @@
   end
 
   describe 'validations' do
-    let(:procedure) { create(:procedure, :for_individual) }
+    let(:procedure) { procedures.individual }
     subject(:dossier) { create(:dossier, procedure: procedure) }
 
     it 'validates presence of required attributes' do
@@ -942,7 +942,7 @@
   end
 
   describe "#assign_to_groupe_instructeur" do
-    let(:procedure) { create(:procedure) }
+    let(:procedure) { procedures.brouillon }
     let(:new_groupe_instructeur_new_procedure) { create(:groupe_instructeur) }
     let(:new_instructeur) { create(:instructeur) }
     let(:new_groupe_instructeur) { create(:groupe_instructeur, procedure: procedure, instructeurs: [new_instructeur]) }
@@ -959,7 +959,7 @@
     end
 
     context "when the groupe instructeur change" do
-      let(:procedure) { create(:procedure) }
+      let(:procedure) { procedures.brouillon }
       let(:instructeur) { create(:instructeur) }
       let(:new_instructeur) { create(:instructeur) }
       let(:previous_groupe_instructeur) { create(:groupe_instructeur, procedure:, instructeurs: [instructeur]) }
@@ -1019,7 +1019,7 @@
         let(:new_groupe_instructeur) { create(:groupe_instructeur, procedure:, instructeurs: [new_instructeur]) }
 
         context "when notification is dossier_expirant" do
-          let(:procedure) { create(:procedure) }
+          let(:procedure) { procedures.brouillon }
           let(:dossier) { create(:dossier, :accepte, procedure:) }
           before { dossier.update(expired_at: 1.week.from_now) }
 
@@ -1258,7 +1258,7 @@ def types_de_champ_private
   end
 
   describe '#owner_name' do
-    let(:procedure) { create(:procedure) }
+    let(:procedure) { procedures.brouillon }
     subject { dossier.owner_name }
 
     context 'when there is no entreprise or individual' do
@@ -1638,7 +1638,7 @@ def types_de_champ_private
     end
 
     context 'as sva procedure' do
-      let_it_be(:procedure) { create(:procedure, :for_individual, :published, :sva) }
+      let(:procedure) { procedures.sva }
       let(:dossier) { create(:dossier, :en_instruction, :with_individual, procedure:, sva_svr_decision_on: Date.current, en_instruction_at: DateTime.new(2021, 5, 1, 12)) }
       let!(:attestation_template) { create(:attestation_template, procedure:, kind: :acceptation, state: :published) }
 
@@ -1661,7 +1661,7 @@ def types_de_champ_private
   describe '#refuser_automatiquement' do
     context 'as svr procedure' do
       let(:last_operation) { dossier.dossier_operation_logs.last }
-      let_it_be(:procedure) { create(:procedure, :for_individual, :published, :svr) }
+      let(:procedure) { procedures.svr }
       let(:dossier) { create(:dossier, :en_instruction, :with_individual, procedure:, sva_svr_decision_on: Date.current, en_instruction_at: DateTime.new(2021, 5, 1, 12)) }
 
       before {
@@ -1759,7 +1759,7 @@ def types_de_champ_private
     end
 
     context "via procedure sva" do
-      let_it_be(:procedure) { create(:procedure, :sva, :published, :for_individual) }
+      let(:procedure) { procedures.sva }
       let(:dossier) { create(:dossier, :en_construction, :with_individual, procedure:, sva_svr_decision_on: 10.days.from_now) }
       let(:sva_svr_decision_on) { SVASVRDecisionDateCalculatorService.new(dossier, procedure).decision_date }
 
@@ -1795,7 +1795,7 @@ def types_de_champ_private
     it { expect(dossier.can_repasser_en_construction?).to be_truthy }
 
     context 'when procedure is sva' do
-      let(:dossier) { create(:dossier, :en_instruction, procedure: create(:procedure, :sva)) }
+      let(:dossier) { create(:dossier, :en_instruction, procedure: procedures.sva) }
 
       it { expect(dossier.can_repasser_en_construction?).to be_falsey }
     end
@@ -1882,7 +1882,7 @@ def types_de_champ_private
     end
 
     context 'when procedure has sva or svr enabled' do
-      let(:procedure) { create(:procedure, :published, :sva) }
+      let(:procedure) { procedures.sva }
       let(:dossier) { create(:dossier, :en_construction, procedure:) }
 
       it { expect(dossier.can_passer_automatiquement_en_instruction?).to be_truthy }
@@ -2498,7 +2498,7 @@ def types_de_champ_private
   end
 
   describe 'brouillon_expired and en_construction_expired' do
-    let(:administrateur) { administrateurs(:default_admin) }
+    let(:administrateur) { administrateurs.default }
     let(:user) { administrateur.user }
     let(:reason) { DeletedDossier.reasons.fetch(:user_request) }
 
@@ -2820,20 +2820,20 @@ def types_de_champ_private
     it { expect(dossier.spreadsheet_columns(types_de_champ: [])).to include(["État du dossier", "Brouillon"]) }
 
     context 'procedure sva' do
-      let(:dossier) { build(:dossier, :en_instruction, procedure: create(:procedure, :sva)) }
+      let(:dossier) { build(:dossier, :en_instruction, procedure: procedures.sva) }
 
       it { expect(dossier.spreadsheet_columns(types_de_champ: [])).to include(["Date décision SVA", :sva_svr_decision_on]) }
     end
 
     context 'procedure svr' do
-      let(:dossier) { build(:dossier, :en_instruction, procedure: create(:procedure, :svr)) }
+      let(:dossier) { build(:dossier, :en_instruction, procedure: procedures.svr) }
 
       it { expect(dossier.spreadsheet_columns(types_de_champ: [])).to include(["Date décision SVR", :sva_svr_decision_on]) }
     end
   end
 
   describe '#archivable' do
-    let(:procedure) { create(:procedure, :published) }
+    let(:procedure) { procedures.individual }
 
     it 'includes visible termine dossiers' do
       dossier = create(:dossier, :accepte, procedure:)
@@ -3013,7 +3013,7 @@ def types_de_champ_private
   end
 
   describe '#update_champs_timestamps' do
-    let(:procedure) { create(:procedure, types_de_champ_public: [{}, { type: :piece_justificative }, { type: :piece_justificative, nature: 'titre_identite' }]) }
+    let_it_be(:procedure) { create(:procedure, types_de_champ_public: [{}, { type: :piece_justificative }, { type: :piece_justificative, nature: 'titre_identite' }]) }
     let(:dossier) { create(:dossier, procedure:, brouillon_close_to_expiration_notice_sent_at: 10.days.ago) }
     let(:changed_champs) { dossier.champ_data.filter(&:text?) }
 
@@ -3100,7 +3100,7 @@ def create_archived_dossier_for_month(procedure, year, month)
 
   describe "#skip_user_notification_email?" do
     context "when the dossier is brouillon for a declarative procedure" do
-      let(:procedure) { create(:procedure, :published, declarative_with_state: :en_instruction) }
+      let(:procedure) { procedures.individual.tap { it.update!(declarative_with_state: :en_instruction) } }
       let(:dossier) { create(:dossier, :brouillon, procedure:) }
 
       it "allows the email to be sent (bug fix  06/2026)" do

spec/models/type_de_champ_spec.rb

@@ -2,14 +2,16 @@
 
 describe TypeDeChamp do
   describe 'validation' do
-    context 'type' do
+    context 'type', :oaken do
+      before_all { seed "cases/champs" }
+
       it do
         is_expected.not_to allow_value(nil).for(:type_champ)
         is_expected.not_to allow_value('').for(:type_champ)
       end
 
-      let(:procedure) { create(:procedure, :with_all_champs) }
-      let(:dossier) { create(:dossier, procedure:) }
+      let(:procedure) { procedures.tous_champs }
+      let(:dossier) { dossiers.tous_champs }
 
       it do
         dossier.revision.root_types_de_champ_public.each do |type_de_champ|