Merge pull request #4636 from betagouv/dossier_export_pdf

#3245 -Export PDF d'un dossier pour usager et instructeur
2020-01-14 09:43:29 +01:00 · 2020-01-14 09:43:29 +01:00 · 8dd2ecfd2c
commit 8dd2ecfd2c
parent 1c56d1477f 1a1d4a9c29
9 changed files with 287 additions and 8 deletions
--- a/1
+++ b/1
@ -49,6 +49,7 @@ gem 'openstack'
 gem 'pg'
 gem 'phonelib'
 gem 'prawn' # PDF Generation
+gem 'prawn-svg'
 gem 'prawn_rails'
 gem 'premailer-rails'
 gem 'puma' # Use Puma as the app server
--- a/Gemfile.lock
+++ b/Gemfile.lock
@ -425,6 +425,9 @@ GEM
    prawn (2.2.2)
      pdf-core (~> 0.7.0)
      ttfunk (~> 1.5)
+    prawn-svg (0.29.1)
+      css_parser (~> 1.6)
+      prawn (>= 0.11.1, < 3)
    prawn_rails (0.0.11)
      prawn (>= 0.11.1)
      railties (>= 3.0.0)
@ -770,6 +773,7 @@ DEPENDENCIES
  pg
  phonelib
  prawn
+  prawn-svg
  prawn_rails
  premailer-rails
  pry-byebug
--- a/app/controllers/instructeurs/dossiers_controller.rb
+++ b/app/controllers/instructeurs/dossiers_controller.rb
@ -27,6 +27,14 @@ module Instructeurs

    def show
      @demande_seen_at = current_instructeur.follows.find_by(dossier: dossier)&.demande_seen_at
+
+      respond_to do |format|
+        format.pdf do
+          @include_infos_administration = true
+          render(file: 'dossiers/show', formats: [:pdf])
+        end
+        format.all
+      end
    end

    def messagerie
--- a/app/controllers/users/dossiers_controller.rb
+++ b/app/controllers/users/dossiers_controller.rb
@ -36,6 +36,13 @@ module Users
      end

      @dossier = dossier
+      respond_to do |format|
+        format.pdf do
+          @include_infos_administration = false
+          render(file: 'dossiers/show', formats: [:pdf])
+        end
+        format.all
+      end
    end

    def demande
--- a/app/views/dossiers/show.pdf.prawn
+++ b/app/views/dossiers/show.pdf.prawn
@ -0,0 +1,203 @@
+require 'prawn/measurement_extensions'
+
+def format_in_2_lines(pdf, label, text)
+  pdf.font 'liberation serif', style: :bold, size: 12 do
+    pdf.text label
+  end
+  pdf.text text
+  pdf.text "\n"
+end
+
+def format_in_2_columns(pdf, label, text)
+  pdf.text_box label, width: 200, height: 100, overflow: :expand, at: [0, pdf.cursor]
+      pdf.text_box ":", width: 10, height: 100, overflow: :expand, at: [100, pdf.cursor]
+  pdf.text_box text, width: 420, height: 100, overflow: :expand, at: [110, pdf.cursor]
+  pdf.text "\n"
+end
+
+def add_title(pdf, title)
+  title_style = {style: :bold, size: 24}
+  pdf.font 'liberation serif', title_style do
+    pdf.text title
+  end
+  pdf.text "\n"
+end
+
+def format_date(date)
+  I18n.l(date, format: :message_date_with_year)
+end
+
+def add_identite_individual(pdf, dossier)
+  format_in_2_columns(pdf, "Civilité", dossier.individual.gender)
+  format_in_2_columns(pdf, "Nom", dossier.individual.nom)
+  format_in_2_columns(pdf, "Prénom", dossier.individual.prenom)
+
+  if dossier.individual.birthdate.present?
+    format_in_2_columns(pdf, "Date de naissance", try_format_date(dossier.individual.birthdate))
+  end
+end
+
+def render_siret_info(pdf, etablissement)
+  pdf.text " - Dénomination : #{raison_sociale_or_name(etablissement)}"
+  pdf.text " - Forme juridique : #{etablissement.entreprise_forme_juridique}"
+  if etablissement.entreprise_capital_social.present?
+    pdf.text " - Capital social : #{pretty_currency(etablissement.entreprise_capital_social)}"
+  end
+  pdf.text "\n"
+end
+
+def render_identite_etablissement(pdf, etablissement)
+  pdf.text " - SIRET : #{etablissement.siret}"
+  pdf.text " - SIRET du siège social: #{etablissement.entreprise.siret_siege_social}"
+  pdf.text " - Dénomination : #{raison_sociale_or_name(etablissement)}"
+  pdf.text " - Forme juridique : #{etablissement.entreprise_forme_juridique}"
+  if etablissement.entreprise_capital_social.present?
+    pdf.text " - Capital social : #{pretty_currency(etablissement.entreprise_capital_social)}"
+  end
+  pdf.text " - Libellé NAF : #{etablissement.libelle_naf}"
+  pdf.text " - Code NAF : #{etablissement.naf}"
+  pdf.text " - Date de création : #{try_format_date(etablissement.entreprise.date_creation)}"
+  pdf.text " - Effectif de l'organisation : #{effectif(etablissement)}"
+  pdf.text " - Code effectif : #{etablissement.entreprise.code_effectif_entreprise}"
+  pdf.text " - Numéro de TVA intracommunautaire : #{etablissement.entreprise.numero_tva_intracommunautaire}"
+  pdf.text " - Adresse : #{etablissement.adresse}"
+  if etablissement.association?
+    pdf.text " - Numéro RNA : #{etablissement.association_rna}"
+    pdf.text " - Titre : #{etablissement.association_titre}"
+    pdf.text " - Objet : #{etablissement.association_objet}"
+    pdf.text " - Date de création : #{try_format_date(etablissement.association_date_creation)}"
+    pdf.text " - Date de publication : #{try_format_date(etablissement.association_date_publication)}"
+    pdf.text " - Date de déclaration : #{try_format_date(etablissement.association_date_declaration)}"
+  end
+  pdf.text "\n"
+end
+
+def render_single_champ(pdf, champ)
+  case champ.type
+  when 'Champs::RepetitionChamp'
+    raise 'There should not be a RepetitionChamp here !'
+  when 'Champs::PieceJustificativeChamp'
+    return
+  when 'Champs::HeaderSectionChamp'
+    pdf.font 'liberation serif', style: :bold, size: 18 do
+      pdf.text champ.libelle
+    end
+    pdf.text "\n"
+  when 'Champs::ExplicationChamp'
+    format_in_2_lines(pdf, champ.libelle, champ.description)
+  when 'Champs::CarteChamp'
+    format_in_2_lines(pdf, champ.libelle, champ.geo_json.to_s)
+  when 'Champs::SiretChamp'
+    pdf.font 'liberation serif', style: :bold, size: 12 do
+      pdf.text champ.libelle
+    end
+    pdf.text " - SIRET: #{champ.to_s}"
+    render_identite_etablissement(pdf, champ.etablissement) if champ.etablissement.present?
+    pdf.text "\n"
+  else
+    value = champ.to_s.empty? ? 'Non communiqué' : champ.to_s
+    format_in_2_lines(pdf, champ.libelle, value)
+  end
+end
+
+def add_champs(pdf, champs)
+  champs.each do |champ|
+    if champ.type == 'Champs::RepetitionChamp'
+      champ.rows.each do |row|
+        row.each do |inner_champ|
+          render_single_champ(pdf, inner_champ)
+        end
+      end
+    else
+      render_single_champ(pdf, champ)
+    end
+  end
+end
+
+def add_message(pdf, message)
+  sender = message.redacted_email
+  if message.sent_by_system?
+    sender = 'Email automatique'
+  elsif message.sent_by?(@dossier.user)
+    sender = @dossier.user.email
+  end
+
+  pdf.text "#{sender}, #{format_date(message.created_at)}", style: :bold
+  pdf.text ActionView::Base.full_sanitizer.sanitize(message.body)
+  pdf.text "\n"
+end
+
+def add_avis(pdf, avis)
+  pdf.text "Avis de #{avis.email_to_display}", style: :bold
+  if avis.confidentiel?
+    pdf.text "(confidentiel)", style: :bold
+  end
+  text = avis.answer || 'En attente de réponse'
+  pdf.text text
+  pdf.text "\n"
+end
+
+def add_etats_dossier(pdf, dossier)
+  if dossier.en_construction_at.present?
+    format_in_2_columns(pdf, "Déposé le", try_format_date(dossier.en_construction_at))
+  end
+  if dossier.en_instruction_at.present?
+    format_in_2_columns(pdf, "En instruction le", try_format_date(dossier.en_instruction_at))
+  end
+  if dossier.processed_at?.present?
+    format_in_2_columns(pdf, "Décision le", try_format_date(dossier.processed_at))
+  end
+
+  pdf.text "\n"
+end
+
+prawn_document(page_size: "A4") do |pdf|
+  pdf.font_families.update( 'liberation serif' => {
+    normal: Rails.root.join('lib/prawn/fonts/liberation_serif/LiberationSerif-Regular.ttf' ),
+    bold: Rails.root.join('lib/prawn/fonts/liberation_serif/LiberationSerif-Bold.ttf' ),
+  })
+  pdf.font 'liberation serif'
+
+  pdf.svg IO.read("app/assets/images/header/logo-ds-wide.svg"), width: 300, position: :center
+  pdf.move_down(40)
+
+  format_in_2_columns(pdf, 'Dossier Nº', @dossier.id.to_s)
+  format_in_2_columns(pdf, 'Démarche', @dossier.procedure.libelle)
+  format_in_2_columns(pdf, 'Organisme', @dossier.procedure.organisation_name)
+  pdf.text "\n"
+
+  pdf.text "Ce dossier est <b>#{dossier_display_state(@dossier, lower: true)}</b>.", inline_format: true
+  pdf.text "\n"
+  if @dossier.motivation.present?
+    format_in_2_lines(pdf, "Motif de la décision", @dossier.motivation)
+  end
+  add_title(pdf, 'Historique')
+  add_etats_dossier(pdf, @dossier)
+
+  add_title(pdf, "Identité du demandeur")
+
+  format_in_2_columns(pdf, "Email", @dossier.user.email)
+  add_identite_individual(pdf, @dossier) if @dossier.individual.present?
+  render_identite_etablissement(pdf, @dossier.etablissement) if @dossier.etablissement.present?
+  pdf.text "\n"
+
+  add_title(pdf, 'Formulaire')
+  add_champs(pdf, @dossier.champs)
+
+  if @include_infos_administration && @dossier.champs_private&.size > 0
+    add_title(pdf, "Annotations privées")
+    add_champs(pdf, @dossier.champs_private)
+  end
+
+  if @include_infos_administration && @dossier.avis.present?
+    add_title(pdf, "Avis")
+    @dossier.avis.each do |avis|
+      add_avis(pdf, avis)
+    end
+  end
+
+  add_title(pdf, 'Messagerie')
+  @dossier.commentaires.each do |commentaire|
+    add_message(pdf, commentaire)
+  end
+end
--- a/app/views/instructeurs/dossiers/_header_actions.html.haml
+++ b/app/views/instructeurs/dossiers/_header_actions.html.haml
@ -6,6 +6,8 @@
      = link_to "Tout le dossier", print_instructeur_dossier_path(dossier.procedure, dossier), target: "_blank", rel: "noopener", class: "menu-item menu-link"
    %li
      = link_to "Uniquement cet onglet", "#", onclick: "window.print()", class: "menu-item menu-link"
+    %li
+      = link_to "Export PDF", instructeur_dossier_path(dossier.procedure, dossier, format: :pdf), target: "_blank", rel: "noopener", class: "menu-item menu-link"

 - if !PiecesJustificativesService.liste_pieces_justificatives(dossier).empty?
  %span.dropdown.print-menu-opener
--- a/app/views/users/dossiers/show/_header.html.haml
+++ b/app/views/users/dossiers/show/_header.html.haml
@ -15,6 +15,12 @@
        = render partial: 'invites/dropdown', locals: { dossier: dossier }
        - if dossier.can_be_updated_by_user? && !current_page?(modifier_dossier_path(dossier))
          = link_to "Modifier mon dossier", modifier_dossier_path(dossier), class: 'button accepted edit-form', 'title'=> "Vous pouvez modifier votre dossier tant qu'il n'est passé en instruction"
+        %span.dropdown.print-menu-opener
+          %button.button.dropdown-button.icon-only{ title: 'imprimer' }
+            %span.icon.printer
+          %ul.print-menu.dropdown-content
+            %li
+              = link_to "Tout le dossier", dossier_path(dossier, format: :pdf), target: "_blank", rel: "noopener", class: "menu-item menu-link"

    %ul.tabs
      = dynamic_tab_item('Résumé', dossier_path(dossier))
--- a/spec/controllers/instructeurs/dossiers_controller_spec.rb
+++ b/spec/controllers/instructeurs/dossiers_controller_spec.rb
@ -473,6 +473,34 @@ describe Instructeurs::DossiersController, type: :controller do
    end
  end

+  describe "#show" do
+    context "when the dossier is exported as PDF" do
+      let(:instructeur) { create(:instructeur) }
+      let(:dossier) {
+  create(:dossier,
+    :accepte,
+    :with_all_champs,
+    :with_all_annotations,
+    :with_motivation,
+    :with_commentaires, procedure: procedure)
+}
+      let!(:avis) { create(:avis, dossier: dossier, instructeur: instructeur) }
+      subject do
+        get :show, params: {
+          procedure_id: procedure.id,
+          dossier_id: dossier.id,
+          format: :pdf
+        }
+      end
+
+      before do
+        subject
+      end
+      it { expect(assigns(:include_infos_administration)).to eq(true) }
+      it { expect(response).to render_template 'dossiers/show' }
+    end
+  end
+
  describe "#update_annotations" do
    let(:champ_multiple_drop_down_list) do
      create(:type_de_champ_multiple_drop_down_list, :private, libelle: 'libelle').champ.create
--- a/spec/controllers/users/dossiers_controller_spec.rb
+++ b/spec/controllers/users/dossiers_controller_spec.rb
@ -731,17 +731,37 @@ describe Users::DossiersController, type: :controller do
      sign_in(user)
    end

-    subject! { get(:show, params: { id: dossier.id }) }
+    context 'with default output' do
+      subject! { get(:show, params: { id: dossier.id }) }

-    context 'when the dossier is a brouillon' do
-      let(:dossier) { create(:dossier, user: user) }
-      it { is_expected.to redirect_to(brouillon_dossier_path(dossier)) }
+      context 'when the dossier is a brouillon' do
+        let(:dossier) { create(:dossier, user: user) }
+        it { is_expected.to redirect_to(brouillon_dossier_path(dossier)) }
+      end
+
+      context 'when the dossier has been submitted' do
+        let(:dossier) { create(:dossier, :en_construction, user: user) }
+        it { expect(assigns(:dossier)).to eq(dossier) }
+        it { is_expected.to render_template(:show) }
+      end
    end

-    context 'when the dossier has been submitted' do
-      let(:dossier) { create(:dossier, :en_construction, user: user) }
-      it { expect(assigns(:dossier)).to eq(dossier) }
-      it { is_expected.to render_template(:show) }
+    context "with PDF output" do
+      let(:procedure) { create(:procedure) }
+      let(:dossier) {
+  create(:dossier,
+    :accepte,
+    :with_all_champs,
+    :with_motivation,
+    :with_commentaires,
+    procedure: procedure,
+    user: user)
+}
+
+      subject! { get(:show, params: { id: dossier.id, format: :pdf }) }
+
+      it { expect(assigns(:include_infos_administration)).to eq(false) }
+      it { expect(response).to render_template 'dossiers/show' }
    end
  end