Module: CarinForBlueButtonTestKit::DateSearchValidation

Included in:
CarinSearchTest, SearchTest
Defined in:
lib/carin_for_blue_button_test_kit/date_search_validator.rb

Instance Method Summary collapse

Instance Method Details

#fhir_date_comparer(search_range, target_range, comparator, extend_start = false, extend_end = false) ⇒ Object 



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
 
# File 'lib/carin_for_blue_button_test_kit/date_search_validator.rb', line 39

def fhir_date_comparer(search_range, target_range, comparator, extend_start = false, extend_end = false)
  # Implicitly, a missing lower boundary is "less than" any actual date. A missing upper boundary is "greater than" any actual date.
  case comparator
  when 'eq' # the range of the search value fully contains the range of the target value
    !target_range[:start].nil? && !target_range[:end].nil? && search_range[:start] <= target_range[:start] && search_range[:end] >= target_range[:end]
  when 'ne' # the range of the search value does not fully contain the range of the target value
    target_range[:start].nil? || target_range[:end].nil? || search_range[:start] > target_range[:start] || search_range[:end] < target_range[:end]
  when 'gt' #  the range above the search value intersects (i.e. overlaps) with the range of the target value
    target_range[:end].nil? || search_range[:end] < target_range[:end] || (search_range[:end] < (target_range[:end] + 1) && extend_end)
  when 'lt' # the range below the search value intersects (i.e. overlaps) with the range of the target value
    target_range[:start].nil? || search_range[:start] > target_range[:start] || (search_range[:start] > (target_range[:start] - 1) && extend_start)
  when 'ge'
    fhir_date_comparer(search_range, target_range, 'gt', extend_start,
                       extend_end) || fhir_date_comparer(search_range, target_range, 'eq')
  when 'le'
    fhir_date_comparer(search_range, target_range, 'lt', extend_start,
                       extend_end) || fhir_date_comparer(search_range, target_range, 'eq')
  when 'sa' # the range above the search value contains the range of the target value
    !target_range[:start].nil? && search_range[:end] < target_range[:start]
  when 'eb' # the range below the search value contains the range of the target value
    !target_range[:end].nil? && search_range[:start] > target_range[:end]
  when 'ap' # the range of the search value overlaps with the range of the target value
    if target_range[:start].nil? || target_range[:end].nil?
      (target_range[:start].nil? && search_range[:start] < target_range[:end]) ||
        (target_range[:end].nil? && search_range[:end] > target_range[:start])
    else
      (search_range[:start] >= target_range[:start] && search_range[:start] <= target_range[:end]) ||
        (search_range[:end] >= target_range[:start] && search_range[:end] <= target_range[:end])
    end
  end
end

#get_fhir_datetime_range(datetime) ⇒ Object 



5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
# File 'lib/carin_for_blue_button_test_kit/date_search_validator.rb', line 5

def get_fhir_datetime_range(datetime)
  range = { start: DateTime.xmlschema(datetime), end: nil }
  range[:end] = case datetime
                when /^\d{4}$/ # YYYY
                  range[:start].next_year - 1.seconds
                when /^\d{4}-\d{2}$/ # YYYY-MM
                  range[:start].next_month - 1.seconds
                when /^\d{4}-\d{2}-\d{2}$/ # YYYY-MM-DD
                  range[:start].next_day - 1.seconds
                else # YYYY-MM-DDThh:mm:ss+zz:zz
                  range[:start]
                end
  range
end

#get_fhir_period_range(period) ⇒ Object 



20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
 
# File 'lib/carin_for_blue_button_test_kit/date_search_validator.rb', line 20

def get_fhir_period_range(period)
  range = { start: nil, end: nil }
  range[:start] = DateTime.xmlschema(period.start) unless period.start.nil?
  return range if period.end.nil?

  period_end_beginning = DateTime.xmlschema(period.end)
  range[:end] = case period.end
                when /^\d{4}$/ # YYYY
                  period_end_beginning.next_year - 1.seconds
                when /^\d{4}-\d{2}$/ # YYYY-MM
                  period_end_beginning.next_month - 1.seconds
                when /^\d{4}-\d{2}-\d{2}$/ # YYYY-MM-DD
                  period_end_beginning.next_day - 1.seconds
                else # YYYY-MM-DDThh:mm:ss+zz:zz
                  period_end_beginning
                end
  range
end

#is_date?(value) ⇒ Boolean

Returns:

  • (Boolean) 


109
110
111
 
# File 'lib/carin_for_blue_button_test_kit/date_search_validator.rb', line 109

def is_date?(value)
  /^\d{4}(-\d{2})?(-\d{2})?$/.match?(value) # YYYY or YYYY-MM or YYYY-MM-DD
end

#validate_date_search(search_value, target_value) ⇒ Object 



71
72
73
74
75
76
77
 
# File 'lib/carin_for_blue_button_test_kit/date_search_validator.rb', line 71

def validate_date_search(search_value, target_value)
  if target_value.kind_of?(FHIR::Model)
    validate_period_search(search_value, target_value)
  else
    validate_datetime_search(search_value, target_value)
  end
end

#validate_datetime_search(search_value, target_value) ⇒ Object 



79
80
81
82
83
84
85
86
87
88
89
90
91
92
 
# File 'lib/carin_for_blue_button_test_kit/date_search_validator.rb', line 79

def validate_datetime_search(search_value, target_value)
  comparator = search_value[0..1]
  if %w[eq ge gt le lt ne sa eb ap].include? comparator
    search_value = search_value[2..]
  else
    comparator = 'eq'
  end
  search_is_date = is_date?(search_value)
  target_is_date = is_date?(target_value)
  search_range = get_fhir_datetime_range(search_value)
  target_range = get_fhir_datetime_range(target_value)
  fhir_date_comparer(search_range, target_range, comparator, !search_is_date && target_is_date,
                     !search_is_date && target_is_date)
end

#validate_period_search(search_value, target_value) ⇒ Object 



94
95
96
97
98
99
100
101
102
103
104
105
106
107
 
# File 'lib/carin_for_blue_button_test_kit/date_search_validator.rb', line 94

def validate_period_search(search_value, target_value)
  comparator = search_value[0..1]
  if %w[eq ge gt le lt ne sa eb ap].include? comparator
    search_value = search_value[2..]
  else
    comparator = 'eq'
  end

  search_is_date = is_date?(search_value)
  search_range = get_fhir_datetime_range(search_value)
  target_range = get_fhir_period_range(target_value)
  fhir_date_comparer(search_range, target_range, comparator, !search_is_date && is_date?(target_value.start),
                     !search_is_date && is_date?(target_value.end))
end