health-data-standards 3.1.1 → 3.2.0

data/Rakefile

@@ -10,15 +10,9 @@ Rake::TestTask.new(:test_unit) do |t|
   t.verbose = true
 end
 
-Cane::RakeTask.new(:quality) do |cane|
-  cane.abc_max = 45
-  # cane.add_threshold 'coverage/covered_percent', :>=, 97
-  cane.style_measure = 120
-  cane.no_style = true
-  cane.no_doc = true
-end
 
-task :test => [:test_unit, :quality] do
+
+task :test => [:test_unit] do
 
   system("open coverage/index.html")
 end

data/lib/health-data-standards.rb

@@ -25,8 +25,6 @@ require_relative 'health-data-standards/export/c32'
 require_relative 'health-data-standards/export/ccda'
 require_relative 'health-data-standards/export/ccr'
 require_relative 'health-data-standards/export/csv'
-require_relative 'health-data-standards/export/helper/html_view_helper'
-require_relative 'health-data-standards/export/html'
 require_relative 'health-data-standards/export/hdata/metadata'
 
 require_relative 'health-data-standards/export/helper/gc32_view_helper'
@@ -76,6 +74,9 @@ require_relative 'health-data-standards/models/metadata/link_info'
 require_relative 'health-data-standards/models/metadata/pedigree'
 
 require_relative 'health-data-standards/export/qrda/entry_template_resolver'
+require_relative 'health-data-standards/export/helper/scooped_view_helper'
+require_relative 'health-data-standards/export/helper/html_view_helper'
+require_relative 'health-data-standards/export/html'
 require_relative 'health-data-standards/export/helper/cat1_view_helper'
 require_relative 'health-data-standards/export/cat_1'
 require_relative 'health-data-standards/export/cat_3'
@@ -158,6 +159,7 @@ require_relative 'health-data-standards/models/cqm/aggregate_objects'
 require_relative 'health-data-standards/models/cqm/query_cache'
 require_relative 'health-data-standards/models/cqm/bundle'
 require_relative 'health-data-standards/models/cqm/measure'
+require_relative 'health-data-standards/models/cqm/patient_cache'
 require_relative 'health-data-standards/import/bundle/importer'
 
 

data/lib/health-data-standards/export/hdata/metadata.rb

@@ -8,8 +8,8 @@ module HealthDataStandards
           @rendering_context.template_helper = template_helper
         end
 
-        def export(entry, metadata)
-          @rendering_context.render(:template => 'metadata', :locals => {entry: entry, metadata: metadata})
+        def export(entry, metadata, include_namespace=false)
+          @rendering_context.render(:template => 'metadata', :locals => {entry: entry, metadata: metadata, namespace: include_namespace})
         end
       end
     end

data/lib/health-data-standards/export/helper/cat1_view_helper.rb

@@ -2,91 +2,16 @@ module HealthDataStandards
   module Export
     module Helper
       module Cat1ViewHelper
-        include HealthDataStandards::Util
-        include HealthDataStandards::SVS
-
-        def value_set_map
-          @@vs_map ||= Hash[*ValueSet.all.map{ |p| [p.oid, p] }.flatten]
-        end
-
-        # Find all of the entries on a patient that match the given data criteria
-        def entries_for_data_criteria(data_criteria, patient)
-          data_criteria_oid = HQMFTemplateHelper.template_id_by_definition_and_status(data_criteria.definition, 
-                                                                                      data_criteria.status || '',
-                                                                                      data_criteria.negation)
-          filtered_entries = []
-          case data_criteria_oid
-          when '2.16.840.1.113883.3.560.1.404'
-            filtered_entries = handle_patient_expired(patient)
-          when '2.16.840.1.113883.3.560.1.401'
-            filtered_entries = handle_clinical_trial_participant(patient)
-          when '2.16.840.1.113883.3.560.1.405'
-            filtered_entries = handle_payer_information(patient)
-          else
-            entries = patient.entries_for_oid(data_criteria_oid)
-            codes = []
-            vs = value_set_map[data_criteria.code_list_id]
-            if vs
-              codes = vs.code_set_map
-            else
-              HealthDataStandards.logger.warn("No codes for #{data_criteria.code_list_id}")
-            end
-            filtered_entries = entries.find_all do |entry|
-              # This special case is for when the code list is a reason
-              if data_criteria.code_list_id =~ /2\.16\.840\.1\.113883\.3\.526\.3\.100[7-9]/
-                entry.negation_reason.present? && codes.first['values'].include?(entry.negation_reason['code'])
-              else
-                # The !! hack makes sure that negation_ind is a boolean
-                entry.is_in_code_set?(codes) && !!entry.negation_ind == data_criteria.negation
-              end
-            end
-          end
-          if filtered_entries.empty?
-            HealthDataStandards.logger.debug("No entries for #{data_criteria.title}")
-          end
-
-          filtered_entries
-        end
-
-        # Given a set of measures, find the data criteria/value set pairs that are unique across all of them
-        # Returns an Array of Hashes. Hashes will have a three key/value pairs. One for the data criteria oid,
-        # one for the value set oid and one for the data criteria itself
-        def unique_data_criteria(measures)
-          all_data_criteria = measures.map {|measure| measure.all_data_criteria}.flatten
-          dc_oids_and_vs_oids = all_data_criteria.map do |data_criteria|
-            data_criteria_oid = HQMFTemplateHelper.template_id_by_definition_and_status(data_criteria.definition, 
-                                                                              (data_criteria.status || ""),
-                                                                              data_criteria.negation)
-            value_set_oid = data_criteria.code_list_id
-            {'data_criteria_oid' => data_criteria_oid, 'value_set_oid' => value_set_oid, 'data_criteria' => data_criteria}
-          end
-          dc_oids_and_vs_oids.uniq_by {|thingy| [thingy['data_criteria_oid'], thingy['value_set_oid']]}
-        end
+        include HealthDataStandards::Export::Helper::ScoopedViewHelper
 
         def render_data_criteria(dc_oid, vs_oid, entries)
           html_array = entries.map do |entry|
-            if dc_oid == '2.16.840.1.113883.3.560.1.1001'
-              # This is a special case. This HQMF OID maps to more than one QRDA OID.
-              # So we need to try to figure out what template we should use based on the
-              # content of the entry
-              if vs_oid == '2.16.840.1.113883.3.526.3.1279'
-                # Patient Characteristic Observation Assertion template for
-                # Patient Characteristic: ECOG Performance Status-Poor
-                render(:partial => '2.16.840.1.113883.10.20.24.3.103', :locals => {:entry => entry,
-                                                                                   :value_set_oid => vs_oid})
-              elsif vs_oid == "2.16.840.1.113883.3.117.1.7.1.402" || vs_oid == "2.16.840.1.113883.3.117.1.7.1.403" 
-                # Patient Charasteristic Gestational Age
-                render(:partial => '2.16.840.1.113883.10.20.24.3.101', :locals => {:entry => entry,
-                                                                                   :value_set_oid => vs_oid})
-              elsif vs_oid == "2.16.840.1.113883.3.526.3.1189" || vs_oid == "2.16.840.1.113883.3.526.3.1170"
-                # Patient Characteristic Tobacco User/Non-User
-                render(:partial => '2.16.840.1.113883.10.20.22.4.85', :locals => {:entry => entry,
-                                                                                   :value_set_oid => vs_oid})  
-              end
-            else
-              render(:partial => HealthDataStandards::Export::QRDA::EntryTemplateResolver.partial_for(dc_oid), :locals => {:entry => entry,
-                                                                                                               :value_set_oid => vs_oid})
-            end
+              bundle_id = entry.record ? entry.record["bundle_id"] : nil
+              vs_map = (value_set_map(bundle_id) || {})[vs_oid]
+              binding.pry if vs_map.nil? || vs_map.empty?
+              render(:partial => HealthDataStandards::Export::QRDA::EntryTemplateResolver.partial_for(dc_oid, vs_oid), :locals => {:entry => entry,
+                                                                                                                                   :value_set_oid => vs_oid,
+                                                                                                                                   :value_set_map => vs_map})
           end
           html_array.join("\n")
         end
@@ -108,25 +33,6 @@ module HealthDataStandards
           end
         end
 
-        def handle_clinical_trial_participant(patient)
-          if patient.clinical_trial_participant
-            [{dummy_entry: true}]
-          else
-            []
-          end
-        end
-
-        def handle_patient_expired(patient)
-          if patient.expired
-            [OpenStruct.new(start_date: patient.deathdate)]
-          else
-            []
-          end
-        end
-
-        def handle_payer_information(patient)
-          patient.insurance_providers
-        end
       end
     end
   end

data/lib/health-data-standards/export/helper/html_view_helper.rb

@@ -2,6 +2,8 @@ module HealthDataStandards
   module Export
     module Helper
       module HTMLViewHelper
+        include HealthDataStandards::Export::Helper::ScoopedViewHelper
+
         def decode_hqmf_section(section, oid)
           if oid
             HealthDataStandards::Util::HQMFTemplateHelper.definition_for_template_id(oid)['definition'].pluralize.to_sym

data/lib/health-data-standards/export/helper/scooped_view_helper.rb

@@ -0,0 +1,109 @@
+module HealthDataStandards
+  module Export
+    module Helper
+      module ScoopedViewHelper
+        include HealthDataStandards::Util
+        include HealthDataStandards::SVS
+        VS_MAP = {}
+        def value_set_map(bundle_id=nil)
+      
+          VS_MAP[bundle_id] ||= Hash[ValueSet.where({bundle_id: bundle_id}).map{ |p| [p.oid, p.code_set_map] }]
+        end
+
+        # Given a set of measures, find the data criteria/value set pairs that are unique across all of them
+        # Returns an Array of Hashes. Hashes will have a three key/value pairs. One for the data criteria oid,
+        # one for the value set oid and one for the data criteria itself
+        def unique_data_criteria(measures)
+          all_data_criteria = measures.map {|measure| measure.all_data_criteria}.flatten
+          unioned_data_criteria = all_data_criteria.map do |data_criteria|
+            data_criteria_oid = HQMFTemplateHelper.template_id_by_definition_and_status(data_criteria.definition, 
+                                                                              (data_criteria.status || ""),
+                                                                              data_criteria.negation)
+            value_set_oid = data_criteria.code_list_id
+            {'data_criteria_oid' => data_criteria_oid, 'value_set_oid' => value_set_oid, 'data_criteria' => data_criteria}
+          end
+          unioned_data_criteria.uniq_by {|thingy| [thingy['data_criteria_oid'], thingy['value_set_oid']]}
+        end
+
+        # Returns true if the supplied entry matches any of the supplied data criteria, false otherwise
+        def entry_matches_criteria(entry, data_criteria_info_list)
+          data_criteria_info_list.each do |data_criteria_info|
+            data_criteria = data_criteria_info['data_criteria']
+            data_criteria_oid = HQMFTemplateHelper.template_id_by_definition_and_status(data_criteria.definition, 
+                                                                                        data_criteria.status || '',
+                                                                                        data_criteria.negation)
+            if entry.respond_to?(:oid) && (entry.oid == data_criteria_oid)
+              codes = *(value_set_map(entry.record["bundle_id"])[data_criteria_info['value_set_oid']] || [])
+              if codes.empty?
+                HealthDataStandards.logger.warn("No codes for #{data_criteria_info['value_set_oid']}")
+              end
+              if entry.is_in_code_set?(codes) && !!entry.negation_ind == data_criteria.negation
+                # The !! hack makes sure that negation_ind is a boolean
+                return true
+              end
+            end
+          end
+          
+          false
+        end
+        
+        # Find all of the entries on a patient that match the given data criteria
+        def entries_for_data_criteria(data_criteria, patient)
+          data_criteria_oid = HQMFTemplateHelper.template_id_by_definition_and_status(data_criteria.definition, 
+                                                                                      data_criteria.status || '',
+                                                                                      data_criteria.negation)
+          filtered_entries = []
+          case data_criteria_oid
+          when '2.16.840.1.113883.3.560.1.404'
+            filtered_entries = handle_patient_expired(patient)
+          when '2.16.840.1.113883.3.560.1.401'
+            filtered_entries = handle_clinical_trial_participant(patient)
+          when '2.16.840.1.113883.3.560.1.405'
+            filtered_entries = handle_payer_information(patient)
+          else
+            entries = patient.entries_for_oid(data_criteria_oid)
+            codes = (value_set_map(patient["bundle_id"])[data_criteria.code_list_id] || [])
+            if codes.empty?
+              HealthDataStandards.logger.warn("No codes for #{data_criteria.code_list_id}")
+            end
+            filtered_entries = entries.find_all do |entry|
+              # This special case is for when the code list is a reason
+              if data_criteria.code_list_id =~ /2\.16\.840\.1\.113883\.3\.526\.3\.100[7-9]/
+                entry.negation_reason.present? && codes.first['values'].include?(entry.negation_reason['code'])
+              else
+                # The !! hack makes sure that negation_ind is a boolean
+                entry.is_in_code_set?(codes) && !!entry.negation_ind == data_criteria.negation
+              end
+            end
+          end
+          if filtered_entries.empty?
+            HealthDataStandards.logger.debug("No entries for #{data_criteria.title}")
+          end
+
+          filtered_entries
+        end
+
+        def handle_clinical_trial_participant(patient)
+          if patient.clinical_trial_participant
+            [{dummy_entry: true}]
+          else
+            []
+          end
+        end
+
+        def handle_patient_expired(patient)
+          if patient.expired
+            [OpenStruct.new(start_date: patient.deathdate)]
+          else
+            []
+          end
+        end
+
+        def handle_payer_information(patient)
+          patient.insurance_providers
+        end
+
+      end
+    end
+  end
+end

data/lib/health-data-standards/export/html.rb

@@ -9,9 +9,9 @@ module HealthDataStandards
         @code_map = nil
       end
 
-      def export(patient)
+      def export(patient, measures=[])
         @code_map ||= self.build_code_map
-        @rendering_context.render(:template => 'show', :locals => {:patient => patient, :code_map => @code_map})
+        @rendering_context.render(:template => 'show', :locals => {:patient => patient, :code_map => @code_map, :measures => measures})
       end
       
       def build_code_map

data/lib/health-data-standards/export/qrda/entry_template_resolver.rb

@@ -14,12 +14,36 @@ module HealthDataStandards
           hqmf_qrda_oid_map.any? {|map_tuple| map_tuple['qrda_oid'] == oid}
         end
 
-        def qrda_oid_for_hqmf_oid(hqmf_oid)
-          oid_tuple = hqmf_qrda_oid_map.find {|map_tuple| map_tuple['hqmf_oid'] == hqmf_oid }
-          if oid_tuple.nil?
-            puts "no qrda oid for #{hqmf_oid}"
+        def qrda_oid_for_hqmf_oid(hqmf_oid, vs_oid = nil)
+
+          if (vs_oid && hqmf_oid == '2.16.840.1.113883.3.560.1.1001')
+            qrda_oid_for_hqmf_patient_characteristic(vs_oid)
+          else
+            oid_tuple = hqmf_qrda_oid_map.find {|map_tuple| map_tuple['hqmf_oid'] == hqmf_oid }
+            if oid_tuple.nil?
+              puts "no qrda oid for #{hqmf_oid}"
+            end
+            oid_tuple['qrda_oid']
+          end
+
+        end
+
+        # given a value set oid for a patient characteristic, return the qrda oid for the correct characteristic
+        def qrda_oid_for_hqmf_patient_characteristic(vs_oid)
+          # This is a special case. This HQMF OID maps to more than one QRDA OID.
+          # So we need to try to figure out what template we should use based on the
+          # content of the entry
+          if vs_oid == '2.16.840.1.113883.3.526.3.1279'
+            # Patient Characteristic Observation Assertion template for
+            # Patient Characteristic: ECOG Performance Status-Poor
+            '2.16.840.1.113883.10.20.24.3.103'
+          elsif ["2.16.840.1.113883.3.117.1.7.1.402" , "2.16.840.1.113883.3.117.1.7.1.403" , "2.16.840.1.113883.3.117.1.7.1.287" ,"2.16.840.1.113883.3.117.1.7.1.307"].index(vs_oid)
+            # Patient Charasteristic Gestational Age
+            '2.16.840.1.113883.10.20.24.3.101'
+          elsif vs_oid == "2.16.840.1.113883.3.526.3.1189" || vs_oid == "2.16.840.1.113883.3.526.3.1170" || vs_oid == '2.16.840.1.113883.3.600.2390'
+            # Patient Characteristic Tobacco User/Non-User
+            '2.16.840.1.113883.10.20.22.4.85'
           end
-          oid_tuple['qrda_oid']
         end
 
         alias :partial_for :qrda_oid_for_hqmf_oid

data/lib/health-data-standards/export/view_helper.rb

@@ -6,7 +6,7 @@ module HealthDataStandards
         options['attribute'] ||= :codes
         options['exclude_null_flavor'] ||= false
         code_string = nil
-        preferred_code = entry.preferred_code(options['preferred_code_sets'], options['attribute'])
+        preferred_code = entry.preferred_code(options['preferred_code_sets'], options['attribute'], options['value_set_map'])
         if preferred_code
           code_system_oid = HealthDataStandards::Util::CodeSystemHelper.oid_for_code_system(preferred_code['code_set'])
           code_string = "<#{options['tag_name']} code=\"#{preferred_code['code']}\" codeSystem=\"#{code_system_oid}\" #{options['extra_content']}>"
@@ -20,7 +20,7 @@ module HealthDataStandards
         
         if options["attribute"] == :codes && entry.respond_to?(:translation_codes)
           code_string += "<originalText>#{ERB::Util.html_escape entry.description}</originalText>" if entry.respond_to?(:description)
-          entry.translation_codes(options['preferred_code_sets']).each do |translation|
+          entry.translation_codes(options['preferred_code_sets'], options['value_set_map']).each do |translation|
             code_string += "<translation code=\"#{translation['code']}\" codeSystem=\"#{HealthDataStandards::Util::CodeSystemHelper.oid_for_code_system(translation['code_set'])}\"/>\n"
           end
         end

data/lib/health-data-standards/import/bundle/importer.rb

@@ -41,8 +41,14 @@ module HealthDataStandards
               b.delete
             end if options[:delete_existing]
 
-            unpack_and_store_system_js(zip_file)
-
+            #find the highest bundle version and see if one is installed that is greater than the one
+            # we are currently installing.  Do not load the libs other wise 
+            vers = bundle_versions.values.sort.reverse[0]
+            if (vers.nil? || vers <= bundle.version || options["force_js_install"])
+              unpack_and_store_system_js(zip_file) 
+            else
+              puts "javascript libraries will not being updated as a more recent bundle version is already installed"
+            end  
             # Store the bundle metadata.
             unless bundle.save
               raise bundle.errors.full_messages.join(",")

data/lib/health-data-standards/import/cda/result_importer.rb

@@ -11,6 +11,7 @@ module HealthDataStandards
           result = super
           extract_value(entry_element, result)
           extract_interpretation(entry_element, result)
+          extract_reference_range(entry_element, result)
           extract_negation(entry_element, result)
           result
         end
@@ -24,6 +25,10 @@ module HealthDataStandards
             result.interpretation = {'code' => code, 'codeSystem' => code_system}
           end
         end
+
+        def extract_reference_range(parent_element, result)
+          result.reference_range = parent_element.at_xpath("./cda:referenceRange/cda:observationRange/cda:text").try(:text)
+        end
     
       end
     end

data/lib/health-data-standards/import/hdata/metadata_importer.rb

@@ -6,7 +6,7 @@ module HealthDataStandards
         
         def import(meta_xml)
           meta_xml.root.add_namespace_definition("hrf-md", Metadata::NS)
-          meta_element = meta_xml.at_xpath("./hrf-md:DocumentMetadata")
+          meta_element = meta_xml.at_xpath("./hrf-md:DocumentMetaData")
           return unless meta_element
           
           meta = Metadata::Base.new

data/lib/health-data-standards/models/condition.rb

@@ -11,4 +11,9 @@ class Condition < Entry
   
   alias   :cause_of_death         :causeOfDeath
   alias   :cause_of_death=        :causeOfDeath=
+
+  def shift_dates(date_diff)
+    super
+    self.time_of_death = self.time_of_death.nil? ? nil : self.time_of_death + date_diff
+  end
 end

data/lib/health-data-standards/models/cqm/measure.rb

@@ -16,8 +16,15 @@ module HealthDataStandards
       field :category, type: String
       field :population_ids , type: Hash
       field :oids, type: Array 
-      field :data_criteria, type: Array
 
+      field :population_criteria, type: Hash
+      field :data_criteria, type: Hash, default: {}
+      field :source_data_criteria, type: Hash, default: {}
+      field :measure_period, type: Hash
+      field :measure_attributes, type: Hash
+      field :populations, type: Array
+      field :preconditions, type: Hash
+      field :hqmf_document, type: Hash
       scope :top_level_by_type , ->(type){where({"type"=> type}).any_of({"sub_id" => nil}, {"sub_id" => "a"})}
       scope :top_level , any_of({"sub_id" => nil}, {"sub_id" => "a"})
       scope :order_by_id_sub_id, order_by([["id", :asc],["sub_id", :asc]])
@@ -25,6 +32,9 @@ module HealthDataStandards
       index({oids: 1})
       index({hqmf_id: 1})
       index({category: 1})
+      index({sub_id: 1})
+      index({_id: 1, sub_id: 1})
+
       index "bundle_id" => 1
       
       validates_presence_of :id
@@ -52,6 +62,113 @@ module HealthDataStandards
         pipeline << {'$sort' => {"category" => 1}}
         Mongoid.default_session.command(aggregate: 'measures', pipeline: pipeline)['result']
       end
+
+
+      # Returns the hqmf-parser's ruby implementation of an HQMF document.
+      # Rebuild from population_criteria, data_criteria, and measure_period JSON
+      def as_hqmf_model
+        @hqmf ||=  HQMF::Document.from_json(self.hqmf_document)
+      end
+
+      def smoking_gun_data(patient_cache_filter={})
+        ::Measure.calculate_smoking_gun_data(self.hqmf_id, patient_cache_filter)
+      end
+      # Calculate the smoking gun data for the given hqmf_id with the given patient_cache_filter
+      # The  filter will allow us to segment the cache by things like test_id required for Cypress.
+
+      def self.calculate_smoking_gun_data(hqmf_id, patient_cache_filter={})
+        population_keys = ('a'..'zz').to_a
+        values = {}
+        measure = Measure.top_level.where({hqmf_id: hqmf_id}).first
+        sub_ids = []
+        hqmf_measure = measure.as_hqmf_model
+        population_codes = []
+        if  hqmf_measure.populations.length == 1
+          sub_ids = nil
+        else 
+          #Do not bother with populaions that contain stratifications
+          hqmf_measure.populations.each_with_index do |population,index|
+            if population["stratification"].nil?
+              sub_ids << population_keys[index] 
+              HQMF::PopulationCriteria::ALL_POPULATION_CODES.each do |code|
+                population_codes <<  population[code] if population[code]
+              end
+            end
+          end
+        end
+
+        population_codes.uniq!
+
+        rationals = PatientCache.smoking_gun_rational(measure.hqmf_id,sub_ids,patient_cache_filter)
+        rationals.each_pair do |mrn,rash|
+          values[mrn] = []
+          population_codes.each do |pop_code|
+           # if (population[pop_code])
+              population_criteria = hqmf_measure.population_criteria(pop_code)
+              if population_criteria.preconditions
+                array = []
+               
+                parent = population_criteria.preconditions[0]
+                values[mrn].concat self.loop_preconditions(hqmf_measure, parent, rash)
+              end # end  population_criteria.preconditions
+            #end # end (population[pop_code])
+          end # population_codes
+          values[mrn].uniq!
+        end
+        values
+      end
+
+      private
+
+
+      def self.loop_data_criteria(hqmf, data_criteria, rationale)
+        result = []
+        if (rationale[data_criteria.id])
+
+          if data_criteria.type != :derived
+            template = HQMF::DataCriteria.template_id_for_definition(data_criteria.definition, data_criteria.status, data_criteria.negation)
+            value_set_oid = data_criteria.code_list_id
+            begin
+              qrda_template = HealthDataStandards::Export::QRDA::EntryTemplateResolver.qrda_oid_for_hqmf_oid(template,value_set_oid)
+            rescue
+              value_set_oid = 'In QRDA Header (Non Null Value)'
+              qrda_template = 'N/A'
+            end # end begin recue
+            result << {description: data_criteria.description, oid: value_set_oid, template: qrda_template}
+
+            if data_criteria.temporal_references
+              data_criteria.temporal_references.each do |temporal_reference|
+                if temporal_reference.reference.id != 'MeasurePeriod'
+                  result.concat loop_data_criteria(hqmf, hqmf.data_criteria(temporal_reference.reference.id), rationale)
+                end  #if temporal_reference.reference.id
+              end # end  data_criteria.temporal_references.each do |temporal_reference|
+            end# end if data_criteria.temporal_references
+          else #data_criteria.type != :derived
+            (data_criteria.children_criteria || []).each do |child_id|
+              result.concat loop_data_criteria(hqmf, hqmf.data_criteria(child_id), rationale)
+            end
+          end
+        end
+        result
+      end
+
+      def self.loop_preconditions(hqmf, parent, rationale)
+        result = []
+        parent.preconditions.each do |precondition|
+          parent_key = "precondition_#{parent.id}"
+          key = "precondition_#{precondition.id}"
+          if precondition.preconditions.empty?
+            data_criteria = hqmf.data_criteria(precondition.reference.id)
+            result.concat loop_data_criteria(hqmf, data_criteria, rationale)
+          else
+            if (rationale[parent_key] && rationale[key]) 
+              result.concat  loop_preconditions(hqmf, precondition, rationale)
+            end
+          end
+        end
+        result
+      end
+
     end
   end
 end