renalware-core 2.0.130 → 2.0.131

data/app/models/renalware/ukrdc/outgoing/rendering/base.rb

@@ -0,0 +1,20 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class Base
+          protected
+
+          def create_node(name, value = nil)
+            elem = Ox::Element.new(name.to_s)
+            elem << value.to_s if value.present?
+            yield(elem) if block_given?
+            elem
+          end
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/cause_of_death.rb

@@ -0,0 +1,38 @@
+# frozen_string_literal: true
+
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class CauseOfDeath < Rendering::Base
+          pattr_initialize [:patient!]
+          delegate :first_cause, to: :patient, allow_nil: true
+
+          def xml
+            return nil unless patient.dead? && first_cause.present?
+
+            cause_of_death_element
+          end
+
+          private
+
+          def cause_of_death_element
+            cause_code = first_cause.code
+            cause_code = 99 if cause_code == 34
+
+            create_node("CauseOfDeath") do |elem|
+              elem << create_node("DiagnosisType", "final")
+              elem << create_node("Diagnosis") do |diagnosis_element|
+                diagnosis_element << create_node("CodingStandard", "EDTA_COD")
+                diagnosis_element << create_node("Code", cause_code)
+              end
+              elem << create_node("EnteredOn", first_cause.created_at.to_datetime)
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/clinic_visit_observation.rb

@@ -0,0 +1,24 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class ClinicVisitObservation < Rendering::Base
+          pattr_initialize [:visit!, :method!, :i18n_key]
+
+          def xml
+            measurement = visit.public_send(method)
+            return if measurement.blank? || measurement.to_f.zero?
+
+            Observation.new(
+              observed_at: visit.datetime,
+              measurement: measurement,
+              i18n_key: i18n_key || method
+            ).xml
+          end
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/clinician.rb

@@ -0,0 +1,12 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class Clinician < Rendering::User
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/diagnoses.rb

@@ -0,0 +1,63 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class Diagnoses < Rendering::Base
+          pattr_initialize [:patient!]
+
+          def xml
+            diagnoses_element
+          end
+
+          private
+
+          def diagnoses_element
+            create_node("Diagnoses") do |elem|
+              create_comobitity_diagnoses_inside(elem)
+              elem << smoking_diagnosis_element
+              elem << cause_of_death_element
+              elem << renal_diagnosis_element
+            end
+          end
+
+          # See email from GS to TC 23/5/18 regarding dates.
+          # UKRDC would like to receive a date so if no onset date stored in RW for the
+          # comorbidity, send the esrf date as the identification date
+          def create_comobitity_diagnoses_inside(elem)
+            patient.yes_comorbidities.each do |comorb|
+              options = { coding_standard: "SNOMED", code: comorb.code, description: comorb.name }
+              if comorb.date.present?
+                options[:onset_time] = comorb.date
+              elsif patient.esrf_on.present?
+                options[:identification_time] = patient.esrf_on
+              end
+              elem << Rendering::Diagnosis.new(options).xml
+            end
+          end
+
+          def smoking_diagnosis_element
+            return if patient.smoking_cormbidity&.value.blank?
+
+            diagnosis = Rendering::Diagnosis.new(
+              coding_standard: "SNOMED",
+              code: patient.smoking_cormbidity.snomed_code,
+              description: "Smoking history: #{patient.smoking_cormbidity.snomed_description}"
+            )
+            diagnosis.identification_time = patient.esrf_on if patient.esrf_on.present?
+            diagnosis.xml
+          end
+
+          def cause_of_death_element
+            Rendering::CauseOfDeath.new(patient: patient).xml
+          end
+
+          def renal_diagnosis_element
+            Rendering::RenalDiagnosis.new(patient: patient).xml
+          end
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/diagnosis.rb

@@ -0,0 +1,52 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class Diagnosis < Rendering::Base
+          pattr_initialize [
+            :coding_standard!,
+            :code!,
+            :description!,
+            :onset_time,
+            :identification_time,
+            root_elemment_name!: "Diagnosis"
+          ]
+          attr_accessor :onset_time, :identification_time
+
+          def xml
+            diagnosis_element
+          end
+
+          private
+
+          # The nested Diagnosis is correct.
+          def diagnosis_element
+            create_node(root_elemment_name) do |elem|
+              elem << create_node("Diagnosis") do |diagnosis_elem|
+                diagnosis_elem << create_node("CodingStandard", coding_standard)
+                diagnosis_elem << create_node("Code", code)
+                diagnosis_elem << create_node("Description", description)
+              end
+              add_onset_time_element_to(elem)
+              add_identification_time_element_to(elem)
+            end
+          end
+
+          def add_onset_time_element_to(elem)
+            return if onset_time.blank?
+
+            elem << create_node("OnsetTime", onset_time)
+          end
+
+          def add_identification_time_element_to(elem)
+            return if identification_time.blank?
+
+            elem << create_node("IdentificationTime", identification_time)
+          end
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/dialysis_session.rb

@@ -0,0 +1,81 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class DialysisSession < Rendering::Base
+          pattr_initialize [:session!]
+
+          def xml
+            dialysis_session_element
+          end
+
+          private
+
+          # The nested Diagnosis is correct.
+          def dialysis_session_element
+            create_node("DialysisSession") do |session_elem|
+              session_elem["start"] = session.performed_on_date
+              session_elem["stop"] = session.performed_on_date
+              session_elem << procedure_type_element
+              session_elem << clinician_element
+              session_elem << procedure_time_element
+              session_elem << entered_by_element
+              session_elem << entered_at_element
+              session_elem << external_id_element
+              session_elem << attributes_element
+            end
+          end
+
+          def procedure_type_element
+            create_node("ProcedureType") do |elem|
+              elem << create_node("CodingStandard", "SNOMED")
+              elem << create_node("Code", "302497006")
+              elem << create_node("Description", "Haemodialysis")
+            end
+          end
+
+          def clinician_element
+            create_node("Clinician") do |elem|
+              elem << create_node("Description", session.updated_by)
+            end
+          end
+
+          def entered_at_element
+            create_node("EnteredAt") do |elem|
+              elem << create_node("Code", session.hospital_unit_renal_registry_code)
+            end
+          end
+
+          def entered_by_element
+            Rendering::EnteredBy.new(user: session.updated_by).xml
+          end
+
+          def external_id_element
+            create_node("ExternalId", session.uuid)
+          end
+
+          def procedure_time_element
+            create_node("ProcedureTime", session.start_datetime.to_datetime)
+          end
+
+          # rubocop:disable Metrics/AbcSize
+          def attributes_element
+            create_node("Attributes") do |elem|
+              elem << create_node("QHD19", session.had_intradialytic_hypotension?)
+              elem << create_node("QHD20", session.access_rr02_code)
+              elem << create_node("QHD21", session.access_rr41_code)
+              elem << create_node("QHD22", "N") # Access in two sites simultaneously
+              elem << create_node("QHD30", session.blood_flow)
+              elem << create_node("QHD31", session.duration_in_minutes) # Time Dialysed in Minutes
+              elem << create_node("QHD32", session.sodium_content) # Sodium in Dialysate
+              elem << create_node("QHD33") # TODO: Needling Method
+            end
+          end
+          # rubocop:enable Metrics/AbcSize
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/document.rb

@@ -0,0 +1,46 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class Document < Rendering::Base
+          pattr_initialize [:letter!]
+
+          def xml
+            document_element
+          end
+
+          private
+
+          # rubocop:disable Metrics/MethodLength, Metrics/AbcSize
+          def document_element
+            create_node("Document") do |elem|
+              elem << create_node("DocumentTime", letter.issued_on.to_time.iso8601)
+              elem << Clinician.new(user: letter.author).xml
+              elem << create_node("DocumentName", letter.title)
+              elem << create_node("Status") do |status|
+                status << create_node("Code", "ACTIVE")
+              end
+              elem << EnteredBy.new(user: letter.updated_by).xml
+              if letter.hospital_unit_renal_registry_code.present?
+                elem << create_node("EnteredAt") do |entered_at|
+                  entered_at << create_node("CodingStandard", "LOCAL")
+                  entered_at << create_node("Code", letter.hospital_unit_renal_registry_code)
+                end
+              end
+              elem << create_node("FileType", "application/pdf")
+              elem << create_node("FileName", letter.pdf_stateless_filename)
+              elem << create_node("Stream", encoded_document_content)
+            end
+          end
+          # rubocop:enable Metrics/MethodLength, Metrics/AbcSize
+
+          def encoded_document_content
+            Base64.encode64(Renalware::Letters::PdfRenderer.call(letter))
+          end
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/entered_at.rb

@@ -0,0 +1,26 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class EnteredAt < Rendering::Base
+          pattr_initialize [:hospital_unit!]
+
+          def xml
+            element
+          end
+
+          private
+
+          def element
+            Ox::Element.new("EnteredAt").tap do |elem|
+              elem << create_node("CodingStandard", "LOCAL")
+              elem << create_node("Code", hospital_unit&.unit_code)
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/entered_by.rb

@@ -0,0 +1,12 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class EnteredBy < Rendering::User
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/family_doctor.rb

@@ -0,0 +1,30 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class FamilyDoctor < Rendering::Base
+          pattr_initialize [:patient!]
+
+          def xml
+            family_doctor_element
+          end
+
+          private
+
+          def family_doctor_element
+            create_node("FamilyDoctor") do |family_doctor|
+              if patient.practice.present?
+                family_doctor << create_node("GPPracticeId", patient.practice.code)
+              end
+              if patient.primary_care_physician.present?
+                family_doctor << create_node("GPId", patient.primary_care_physician.code)
+              end
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/app/models/renalware/ukrdc/outgoing/rendering/hd_session_observations.rb

@@ -0,0 +1,51 @@
+# frozen_string_literal: true
+
+module Renalware
+  module UKRDC
+    module Outgoing
+      module Rendering
+        class HDSessionObservations < Rendering::Observation
+          pattr_initialize [:session!]
+
+          def create_observation_nodes_under(parent_element)
+            pre_and_post_observations.each do |pre_or_post, observations|
+              measurements_for(observations).each do |i18n_key, value|
+                parent_element << Rendering::Observation.new(
+                  observed_at: observation_times[pre_or_post].iso8601,
+                  measurement: value.to_s[0, 19].strip,
+                  i18n_key: i18n_key,
+                  pre_post: pre_or_post.to_s.upcase # eg PRE or POST
+                ).xml
+              end
+            end
+          end
+
+          def observation_times
+            @observation_times ||= begin
+              performed_on = session.performed_on.to_datetime
+              {
+                pre: performed_on + session.start_time.seconds_since_midnight.seconds,
+                post: performed_on + session.end_time.seconds_since_midnight.seconds
+              }
+            end
+          end
+
+          def pre_and_post_observations
+            {
+              pre: session.document.observations_before,
+              post: session.document.observations_after
+            }
+          end
+
+          def measurements_for(observations)
+            {
+              "blood_pressure.systolic" => observations.blood_pressure&.systolic,
+              "blood_pressure.diastolic" => observations.blood_pressure&.diastolic,
+              "weight" => observations.weight
+            }
+          end
+        end
+      end
+    end
+  end
+end