Class: HQMF::ComparisonConverter

Inherits:
Object
  • Object
show all
Defined in:
lib/hqmf-parser/converter/pass2/comparison_converter.rb

Overview

Class for converting an HQMF 1.0 representation to an HQMF 2.0 representation

Instance Method Summary collapse

Constructor Details

#initialize(data_criteria_converter) ⇒ ComparisonConverter

Returns a new instance of ComparisonConverter.



5
6
7
 
# File 'lib/hqmf-parser/converter/pass2/comparison_converter.rb', line 5

def initialize(data_criteria_converter)
  @data_criteria_converter = data_criteria_converter
end

Instance Method Details

#convert_comparisons(population_criteria) ⇒ Object 



9
10
11
12
13
14
15
 
# File 'lib/hqmf-parser/converter/pass2/comparison_converter.rb', line 9

def convert_comparisons(population_criteria)
  population_criteria.each do |population|
    is_observation = population.type == HQMF::PopulationCriteria::OBSERV
    walk_up_tree(population.preconditions)
    rewrite_observation(population) if is_observation
  end
end

#get_child_comparisons(node) ⇒ Object 



99
100
101
102
103
104
105
106
107
108
109
 
# File 'lib/hqmf-parser/converter/pass2/comparison_converter.rb', line 99

def get_child_comparisons(node)
  values = []
  node.preconditions.each do |precondition|
    if (precondition.comparison?)
      values << precondition
    elsif precondition.preconditions
      values.concat get_child_comparisons(precondition)
    end
  end if node.preconditions
  values
end

#has_child_comparison(node) ⇒ Object 



80
81
82
 
# File 'lib/hqmf-parser/converter/pass2/comparison_converter.rb', line 80

def has_child_comparison(node)
  get_child_comparisons(node).length > 0
end

#rewrite_observation(observation) ⇒ Object 



84
85
86
87
88
89
90
91
92
93
94
95
96
97
 
# File 'lib/hqmf-parser/converter/pass2/comparison_converter.rb', line 84

def rewrite_observation(observation)
  first_comparison = get_child_comparisons(observation).first
  # clear the conjunction code since this should be a comparison
  first_comparison.conjunction_code = nil

  # we want to pull the aggregation function off of the top level comparison
  first_criteria = @data_criteria_converter.v2_data_criteria_by_id[first_comparison.reference.id]
  # pop the last subset operator which should be the closest to the root of the logic tree.  Add that aggregation function to the observation as the aggregator
  observation.aggregator = first_criteria.subset_operators.pop.type

  # we want to get rid of any AND statements at the top level.  This is calculating a numeric value, not evaluating boolean logic
  observation.preconditions.clear
  observation.preconditions << first_comparison
end

#walk_up_tree(preconditions) ⇒ Object 



17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
 
# File 'lib/hqmf-parser/converter/pass2/comparison_converter.rb', line 17

def walk_up_tree(preconditions)
  preconditions.each do |precondition|
    if (has_child_comparison(precondition))
      walk_up_tree(precondition.preconditions)
    end
    if (precondition.comparison? && !precondition.processed)
      new_data_criteria = nil
      # duplicate the data criteria referenced by the comparision (unless it's the measurement period. we don't modify the measurement period)
      if precondition.reference and precondition.reference.id != HQMF::Document::MEASURE_PERIOD_ID
        data_criteria = @data_criteria_converter.v2_data_criteria_by_id[precondition.reference.id] 
        new_data_criteria = @data_criteria_converter.duplicate_data_criteria(data_criteria, precondition.id)
        precondition.reference.id = new_data_criteria.id
      end
      # add restrictions to the duplicated data criteria
      if precondition.has_preconditions?
        restrictions = precondition.restrictions
        # we want to process summary operators first since they can create new data criteria
        restrictions.sort! {|left, right| (right.operator.summary? and !left.operator.summary?) ? 1 : 0 }
        restrictions.each do |restriction|
          operator = restriction.operator
          # check if the data criteria has been changed by either a grouping addition or an operator
          if (precondition.reference and (new_data_criteria == nil or new_data_criteria.id != precondition.reference.id))
            new_data_criteria = @data_criteria_converter.v2_data_criteria_by_id[precondition.reference.id] 
          end
          if (operator.temporal?)
            HQMF::OperatorConverter.apply_temporal(new_data_criteria, precondition, restriction, @data_criteria_converter)
          elsif(operator.summary?)
            HQMF::OperatorConverter.apply_summary(new_data_criteria, precondition, restriction, @data_criteria_converter)
          else
            case operator.type
            when 'REFR'
              if operator.field.downcase == 'status'
                # only set the status if we don't have one.  We trust the template ID statuses more than the restrictions
                new_data_criteria.status ||= operator.value.code
              elsif operator.field.downcase == 'result value' or operator.field.downcase == 'result'
                puts "\tREFR result value is nil: #{new_data_criteria.title}" if (operator.value.nil?)
                new_data_criteria.value = operator.value
              else
                new_data_criteria.field_values ||= {}
                new_data_criteria.field_values[operator.field_value_key] = operator.value
              end
              restriction.converted=true
            when 'RSON'
              new_data_criteria.negation_code_list_id = operator.value.code_list_id
              new_data_criteria.negation=true
              restriction.converted=true
            when 'SUBJ'
              new_data_criteria.field_values ||= {}
              new_data_criteria.field_values[operator.field_value_key] = operator.value || HQMF::AnyValue.new
              restriction.converted=true
            else
              puts "\tOperator is unknown: #{operator.type}"
              restriction.converted=true
            end
          end
        end
        precondition.delete_converted_restrictions!
        precondition.processed = true
      end
    end
  end
end