Class: Oddb2xml::SwissmedicExtractor

Inherits:

Extractor

• Object
• Extractor
• Oddb2xml::SwissmedicExtractor

Defined in:

lib/oddb2xml/extractor.rb

Instance Attribute Summary

Attributes inherited from Extractor

#xml

Instance Method Summary

• #initialize(filename, type) ⇒ SwissmedicExtractor constructor

  A new instance of SwissmedicExtractor.

• #to_arry ⇒ Object
• #to_hash ⇒ Object

  Packungen.xls.

Constructor Details

#initialize(filename, type) ⇒ SwissmedicExtractor

Returns a new instance of SwissmedicExtractor.

# File 'lib/oddb2xml/extractor.rb', line 206

def initialize(filename, type)
  @filename = File.join(Downloads, File.basename(filename))
  @filename = File.join(SpecData, File.basename(filename)) if defined?(RSpec) and not File.exists?(@filename)
  @type  = type
  return unless File.exists?(@filename)
  @sheet = RubyXL::Parser.parse(File.expand_path(@filename)).worksheets[0]
end

Instance Method Details

#to_arry ⇒ Object

# File 'lib/oddb2xml/extractor.rb', line 213

def to_arry
  data = []
  return data unless @sheet
  case @type
  when :orphan
    i = 1
    @sheet.each do |row|
      number = row[1].value.to_i
      if number != 0
        data << sprintf("%05d", number)
      end
    end
  when :fridge
    i,c = 1,7
    @sheet.each do |row|
      if row[i] and number = row[i].value and row[c] and row[c].value.to_s.downcase == 'x'
        data << sprintf("%05d", number)
      end
    end
  end
  cleanup_file
  data.uniq
end

#to_hash ⇒ Object

Packungen.xls

# File 'lib/oddb2xml/extractor.rb', line 236

def to_hash # Packungen.xls
  data = {}
  return data unless @sheet
  case @type
  when :package
    typ = 6 # Heilmittelcode
    i_5,i_3   = 0,10 # :swissmedic_numbers
    p_5,p_1_2 = 0,1  # :prodno
    cat       = 13   # :swissmedic_category
    seq_name  = 2
    ith       = 4    # :ith_swissmedic IT-Code (swissmedic-diff)
    atc       = 5    # :atc_code
    list_code = 6    #  Heilmittelcode, possible values are
    # Allergene
    # Anthroposophika
    # ayurvedische Arzneimittel
    # Bakterien- und Hefepräparate
    # Biotechnologika
    # Blutprodukte
    # Generator
    # Heilmittelcode
    # Homöopathika
    # Impfstoffe
    # Phytotherapeutika
    # Radiopharmazeutika
    # Synthetika human
    # tibetische Arzneimittel
    # Tierarzneimittel
    # Transplantat: Gewebeprodukt
    siz       = 11   # :package_size
    eht       = 12   # :einheit_swissmedic
    sub       = 14   # :substance_swissmedic
    comp      = 15   # :composition_swissmedic
    @sheet.each_with_index do |row, i|

      next if (i <= 1)
      next unless row[i_5] and row[i_3]
      no8 = sprintf('%05d',row[i_5].value.to_i) + sprintf('%03d',row[i_3].value.to_i)
      prodno = sprintf('%05d',row[i_5].value.to_i) + row[p_1_2].value.to_i.to_s
      unless no8.empty?
        next if no8.to_i == 0
        ean_base12 = "7680#{no8}"
        data[no8.intern] = {
          :ean                  => (ean_base12.ljust(12, '0') + Oddb2xml.calc_checksum(ean_base12)),
          :prodno               => prodno ? prodno : '',
          :ith_swissmedic       => row[ith] ? row[ith].value.to_s : '',
          :swissmedic_category  => row[cat].value.to_s,
          :atc_code             => row[atc] ? Oddb2xml.add_epha_changes_for_ATC(row[i_5].value.to_s, row[atc].value.to_s) : '',
          :list_code            => row[list_code] ? row[list_code].value.to_s : '',
          :package_size         => row[siz] ? row[siz].value.to_s : '',
          :einheit_swissmedic   => row[eht] ? row[eht].value.to_s : '',
          :substance_swissmedic => row[sub] ? row[sub].value.to_s : '',
          :composition_swissmedic => row[comp] ? row[comp].value.to_s : '',
          :sequence_name        => row[seq_name] ? row[seq_name].value.to_s : '',
          :is_tier              => (row[typ] == 'Tierarzneimittel' ? true : false),
        }
      end
    end
  end
  cleanup_file
  data
end