oddb2xml 2.6.7 → 2.7.2

data/lib/oddb2xml/calc.rb

@@ -1,111 +1,109 @@
-# encoding: utf-8
-
-require 'oddb2xml/util'
-require 'oddb2xml/parslet_compositions'
-require 'yaml'
+require "oddb2xml/util"
+require "oddb2xml/parslet_compositions"
+require "yaml"
 
 module Oddb2xml
- # Calc is responsible for analysing the columns "Packungsgrösse" and "Einheit"
- #
-  GalenicGroup  = Struct.new("GalenicGroup", :oid, :descriptions)
-  GalenicForm   = Struct.new("GalenicForm",  :oid, :descriptions, :galenic_group)
+  # Calc is responsible for analysing the columns "Packungsgrösse" and "Einheit"
+  #
+  GalenicGroup = Struct.new("GalenicGroup", :oid, :descriptions)
+  GalenicForm = Struct.new("GalenicForm", :oid, :descriptions, :galenic_group)
 
   class GalenicGroup
-    def description(lang = 'de')
+    def description(lang = "de")
       descriptions[lang]
     end
   end
 
   class GalenicForm
-    def description(lang = 'de')
+    def description(lang = "de")
       descriptions[lang]
     end
   end
 
   class Calc
-    FluidForms = [
-      'Ampulle(n)',
-      'Beutel',
-      'Bolus/Boli',
-      'Bq',
-      'Dose(n)',
-      'Durchstechflasche(n)',
-      'Einmaldosenbehälter',
-      'Einzeldose(n)',
-      'Fertigspritze',
-      'Fertigspritze(n)',
-      'Flasche(n)',
-      'I.E.',
-      'Infusionskonzentrat',
-      'Infusionslösung',
-      'Infusionsemulsion',
-      'Inhalationen',
-      'Inhalator',
-      'Injektions-Set',
-      'Injektions-Sets',
-      'Injektor(en), vorgefüllt/Pen',
-      'Klistier(e)',
-      'MBq',
-      'Pipetten',
-      'Sachet(s)',
-      'Spritze(n)',
-      'Sprühstösse',
-      'Stechampulle (Lyophilisat) und Ampulle (Solvens)',
-      'Stechampulle',
-      'Suspension',
-      'Zylinderampulle(n)',
-      'cartouches',
-      'dose(s)',
-      'flacon perforable',
-      'sacchetto',
-      'vorgefüllter Injektor',
-      ]
-    FesteFormen = [
-      'Depotabs',
-      'Dragée(s)',
-      'Generator mit folgenden Aktivitäten:',
-      'Filmtabletten',
-      'Gerät',
-      'Kapsel(n)',
-      'Kautabletten',
-      'Lutschtabletten',
-      'Kugeln',
-      'Ovulum',
-      'Packung(en)',
-      'Pflaster',
-      'Schmelzfilme',
-      'Set',
-      'Strips',
-      'Stück',
-      'Suppositorien',
-      'Tablette(n)',
-      'Tüchlein',
-      'Urethrastab',
-      'Vaginalzäpfchen',
-      'comprimé',
-      'comprimé pelliculé',
-      'comprimés',
-      'comprimés à libération modifiée',
-      'comprimés à croquer sécables',
-      'imprägnierter Verband',
-      'magensaftresistente Filmtabletten',
-      'ovale Körper',
-      'tube(s)',
+    FLUIDFORMS = [
+      "Ampulle(n)",
+      "Beutel",
+      "Bolus/Boli",
+      "Bq",
+      "Dose(n)",
+      "Durchstechflasche(n)",
+      "Einmaldosenbehälter",
+      "Einzeldose(n)",
+      "Fertigspritze",
+      "Fertigspritze(n)",
+      "Flasche(n)",
+      "I.E.",
+      "Infusionskonzentrat",
+      "Infusionslösung",
+      "Infusionsemulsion",
+      "Inhalationen",
+      "Inhalator",
+      "Injektions-Set",
+      "Injektions-Sets",
+      "Injektor(en), vorgefüllt/Pen",
+      "Klistier(e)",
+      "MBq",
+      "Pipetten",
+      "Sachet(s)",
+      "Spritze(n)",
+      "Sprühstösse",
+      "Stechampulle (Lyophilisat) und Ampulle (Solvens)",
+      "Stechampulle",
+      "Suspension",
+      "Zylinderampulle(n)",
+      "cartouches",
+      "dose(s)",
+      "flacon perforable",
+      "sacchetto",
+      "vorgefüllter Injektor"
+    ]
+    FESTE_FORMEN = [
+      "Depotabs",
+      "Dragée(s)",
+      "Generator mit folgenden Aktivitäten:",
+      "Filmtabletten",
+      "Gerät",
+      "Kapsel(n)",
+      "Kautabletten",
+      "Lutschtabletten",
+      "Kugeln",
+      "Ovulum",
+      "Packung(en)",
+      "Pflaster",
+      "Schmelzfilme",
+      "Set",
+      "Strips",
+      "Stück",
+      "Suppositorien",
+      "Tablette(n)",
+      "Tüchlein",
+      "Urethrastab",
+      "Vaginalzäpfchen",
+      "comprimé",
+      "comprimé pelliculé",
+      "comprimés",
+      "comprimés à libération modifiée",
+      "comprimés à croquer sécables",
+      "imprägnierter Verband",
+      "magensaftresistente Filmtabletten",
+      "ovale Körper",
+      "tube(s)"
     ]
-    Measurements = [ 'g', 'kg', 'l', 'mg', 'ml', 'cm', 'GBq']
-    Others = ['Kombipackung', 'emballage combiné' ]
-    UnknownGalenicForm = 140
-    UnknownGalenicGroup = 1
-    Data_dir = File.expand_path(File.join(File.dirname(__FILE__),'..','..', 'data'))
-    @@galenic_groups  = YAML.load_file(File.join(Data_dir, 'gal_groups.yaml'))
-    @@galenic_forms   = YAML.load_file(File.join(Data_dir, 'gal_forms.yaml'))
+    MEASUREMENTS = ["g", "kg", "l", "mg", "ml", "cm", "GBq"]
+    OTHERS = ["Kombipackung", "emballage combiné"]
+    UNKNOWN_GALENIC_FORM = 140
+    UNKNOWN_GALENIC_GROUP = 1
+    DATA_DIR = File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "data"))
+    @@galenic_groups = YAML.load_file(File.join(DATA_DIR, "gal_groups.yaml"))
+    @@galenic_forms = YAML.load_file(File.join(DATA_DIR, "gal_forms.yaml"))
     @@new_galenic_forms = []
     @@names_without_galenic_forms = []
     @@rules_counter = {}
-    attr_accessor   :galenic_form, :unit, :pkg_size
-    attr_reader     :name, :substances, :composition, :compositions, :column_c
-    attr_reader     :selling_units, :count, :multi, :measure, :addition, :scale # s.a. commercial_form in oddb.org/src/model/part.rb
-    def self.get_galenic_group(name, lang = 'de')
+    attr_accessor :galenic_form, :unit, :pkg_size
+    attr_reader :name, :substances, :composition, :compositions, :column_c
+    attr_reader :selling_units, :count, :multi, :measure, :addition, :scale # s.a. commercial_form in oddb.org/src/model/part.rb
+    def self.get_galenic_group(name, lang = "de")
       @@galenic_groups.values.collect { |galenic_group|
         return galenic_group if galenic_group.descriptions[lang].eql?(name)
       }
@@ -113,80 +111,84 @@ module Oddb2xml
     end
 
     def self.report_conversion
-      lines = [ '', '',
-                'Report of used conversion rules',
-                '-------------------------------',
-                ''
-                ]
-      @@rules_counter.each{
-        | key, value|
-          lines << "#{key}: #{value} occurrences"
+      lines = ["", "",
+        "Report of used conversion rules",
+        "-------------------------------",
+        ""]
+      @@rules_counter.each { |key, value|
+        lines << "#{key}: #{value} occurrences"
       }
-      lines << ''
-      lines << ''
+      lines << ""
+      lines << ""
       lines
     end
 
-    def self.get_galenic_form(name, lang = 'de')
+    def self.get_galenic_form(name, lang = "de")
       @@galenic_forms.values.collect { |galenic_form|
         return galenic_form if galenic_form.descriptions[lang].eql?(name)
-        if name and galenic_form.descriptions[lang].eql?(name.sub(' / ', '/'))
+        if name && galenic_form.descriptions[lang].eql?(name.sub(" / ", "/"))
           return galenic_form
         end
       }
-      @@galenic_forms[UnknownGalenicForm]
+      @@galenic_forms[UNKNOWN_GALENIC_FORM]
     end
 
     def self.dump_new_galenic_forms
       if @@new_galenic_forms.size > 0
-        "\n\n\nAdded the following galenic_forms\n"+ @@new_galenic_forms.uniq.join("\n")
+        "\n\n\nAdded the following galenic_forms\n" + @@new_galenic_forms.uniq.join("\n")
       else
         "\n\n\nNo new galenic forms added"
       end
     end
+
     def self.dump_names_without_galenic_forms
       if @@names_without_galenic_forms.size > 0
-        "\n\n\nThe following products did not have a galenic form in column Präparateliste\n"+ @@names_without_galenic_forms.sort.uniq.join("\n")
+        "\n\n\nThe following products did not have a galenic form in column Präparateliste\n" + @@names_without_galenic_forms.sort.uniq.join("\n")
       else
         "\n\n\nColumn Präparateliste has everywhere a name\n"
       end
     end
-private
+
+    private
+
     def remove_duplicated_spaces(string)
-      string ? string.to_s.gsub(/\s\s+/, ' ') : nil
+      string ? string.to_s.gsub(/\s\s+/, " ") : nil
     end
-public
-    def initialize(column_c = nil, size = nil, unit = nil, active_substance = nil, composition= nil)
-      @column_c = column_c ? column_c.gsub(/\s\s+/, ' ') : nil
-      @name, gal_form =  ParseGalenicForm.from_string(column_c)
-      gal_form = gal_form.gsub(/\s\s+/, ' ').sub(' / ', '/') if gal_form
+
+    public
+
+    def initialize(column_c = nil, size = nil, unit = nil, active_substance = nil, composition = nil)
+      @column_c = column_c ? column_c.gsub(/\s\s+/, " ") : nil
+      @name, gal_form = ParseGalenicForm.from_string(column_c)
+      gal_form = gal_form.gsub(/\s\s+/, " ").sub(" / ", "/") if gal_form
       @galenic_form = search_galenic_info(gal_form)
       @pkg_size = remove_duplicated_spaces(size)
       @unit = unit
-      @selling_units = get_selling_units(@name, @pkg_size, @unit)
+      @selling_units = getSellingUnits(@name, @pkg_size, @unit)
       @composition = composition
-      @measure = unit if unit and not @measure
-      unless @galenic_form
-        parts = column_c.split(/\s+|,|\-/)
-        parts.each{
-          |part|
-          if idx = search_exact_galform(part)
-            @galenic_form = idx
-            break
-          end
-        }
-      end if column_c
-      if @measure and not @galenic_form
-        @galenic_form ||= search_exact_galform(@measure)
-        @galenic_form ||= search_exact_galform(@measure.sub('(n)', 'n'))
+      @measure = unit if unit && !@measure
+      if column_c
+        unless @galenic_form
+          parts = column_c.split(/\s+|,|-/)
+          parts.each { |part|
+            if (idx = searchExactGalform(part))
+              @galenic_form = idx
+              break
+            end
+          }
+        end
       end
-      handle_unknown_galform(gal_form)
-      @measure = @galenic_form.description if @galenic_form and not @measure
+      if @measure && !@galenic_form
+        @galenic_form ||= searchExactGalform(@measure)
+        @galenic_form ||= searchExactGalform(@measure.sub("(n)", "n"))
+      end
+      handleUnknownGalform(gal_form)
+      @measure = @galenic_form.description if @galenic_form && !@measure
 
-      unless composition
-        @compositions = []
+      @compositions = if composition
+        ParseUtil.parse_compositions(composition, active_substance)
       else
-        @compositions = ParseUtil.parse_compositions(composition, active_substance)
+        []
       end
     end
 
@@ -196,157 +198,154 @@ public
 
     # helper for generating csv
     def headers
-      [ "name", "pkg_size", "selling_units", "measure",
+      ["name", "pkg_size", "selling_units", "measure",
         # "count", "multi", "addition", "scale", "unit",
         "galenic_form",
-        "galenic_group"
-        ]
+        "galenic_group"]
     end
+
     def to_array
-      [ @name, @pkg_size, @selling_units, @measure,
+      [@name, @pkg_size, @selling_units, @measure,
         # @count, @multi, @addition, @scale, @unit,
-        galenic_form  ? galenic_form.description  : '' ,
-        galenic_group ? galenic_group.description : ''
-        ]
+        galenic_form ? galenic_form.description : "",
+        galenic_group ? galenic_group.description : ""]
     end
-  private
+
+    private
 
     def update_rule(rulename)
       @@rules_counter[rulename] ||= 0
       @@rules_counter[rulename] += 1
     end
 
-    def get_selling_units(part_from_name_C, pkg_size_L, einheit_M)
-      begin
-        break_condition = (defined?(Pry) and false) # /5 x 2500 ml/.match(pkg_size_L))
-        return pkg_size_to_int(pkg_size_L) unless part_from_name_C
-        part_from_name_C = part_from_name_C.gsub(/[()]/, '_')
-        Measurements.each{ |x|
-                          if einheit_M and /^#{x}$/i.match(einheit_M)
-                            puts "measurement in einheit_M #{einheit_M} matched: #{x}" if $VERBOSE
-                            update_rule('measurement einheit_M')
-                            @measure = x
-                            binding.pry if break_condition
-                            return pkg_size_to_int(pkg_size_L, true)
-                          end
-                        }
-        FesteFormen.each{ |x|
-                          if part_from_name_C and (x.gsub(/[()]/, '_')).match(part_from_name_C)
-                            puts "feste_form in #{part_from_name_C} matched: #{x}" if $VERBOSE
-                            update_rule('feste_form name_C')
-                            @measure = x
-                            binding.pry if break_condition
-                            return pkg_size_to_int(pkg_size_L)
-                          end
-                          if einheit_M and x.eql?(einheit_M)
-                            puts "feste_form in einheit_M #{einheit_M} matched: #{x}" if $VERBOSE
-                            update_rule('feste_form einheit_M')
-                            @measure = x
-                            binding.pry if break_condition
-                            return pkg_size_to_int(pkg_size_L)
-                          end
-                        }
-        FluidForms.each{ |x|
-                          if part_from_name_C and x.match(part_from_name_C)
-                            puts "liquid_form in #{part_from_name_C} matched: #{x}" if $VERBOSE
-                            update_rule('liquid_form name_C')
-                            @measure = x
-                            binding.pry if break_condition
-                            return pkg_size_to_int(pkg_size_L, true)
-                          end
-                          if part_from_name_C and x.match(part_from_name_C.split(' ')[0])
-                            puts "liquid_form in #{part_from_name_C} matched: #{x}" if $VERBOSE
-                            update_rule('liquid_form first_part')
-                            binding.pry if break_condition
-                            return pkg_size_to_int(pkg_size_L, true)
-                          end
-                          if einheit_M and x.eql?(einheit_M)
-                            puts "liquid_form in einheit_M #{einheit_M} matched: #{x}" if $VERBOSE
-                            update_rule('liquid_form einheit_M')
-                            @measure = x
-                            binding.pry if break_condition
-                            return pkg_size_to_int(pkg_size_L, Measurements.find{ |x| pkg_size_L.index(" #{x}")})
-                          end
-                        }
-        Measurements.each{ |x|
-                          if pkg_size_L and pkg_size_L.split(' ').index(x)
-                            puts "measurement in pkg_size_L #{pkg_size_L} matched: #{x}" if $VERBOSE
-                            update_rule('measurement pkg_size_L')
-                            @measure = x
-                            binding.pry if break_condition
-                            return pkg_size_to_int(pkg_size_L, true)
-                          end
-                        }
-        binding.pry if break_condition
-        puts "Could not find anything for name_C #{part_from_name_C} pkg_size_L: #{pkg_size_L} einheit_M #{einheit_M}" if $VERBOSE
-        update_rule('unbekannt')
-        return 'unbekannt'
-      rescue RegexpError => e
-        puts "RegexpError for M: #{einheit_M} pkg_size_L #{pkg_size_L} C: #{part_from_name_C}"
-        update_rule('RegexpError')
-        return 'error'
-      end
+    def getSellingUnits(part_from_name_c, pkg_size_l, einheit_m)
+      # break_condition = (defined?(Pry) && false) # /5 x 2500 ml/.match(pkg_size_l))
+      return pkgSizeToInt(pkg_size_l) unless part_from_name_c
+      part_from_name_c = part_from_name_c.gsub(/[()]/, "_")
+      MEASUREMENTS.each { |x|
+        if einheit_m && /^#{x}$/i.match(einheit_m)
+          puts "measurement in einheit_m #{einheit_m} matched: #{x}" if $VERBOSE
+          update_rule("measurement einheit_m")
+          @measure = x
+          # binding.pry if break_condition
+          return pkgSizeToInt(pkg_size_l, true)
+        end
+      }
+      FESTE_FORMEN.each { |x|
+        if part_from_name_c && (x.gsub(/[()]/, "_")).match(part_from_name_c)
+          puts "feste_form in #{part_from_name_c} matched: #{x}" if $VERBOSE
+          update_rule("feste_form name_C")
+          @measure = x
+          # binding.pry if break_condition
+          return pkgSizeToInt(pkg_size_l)
+        end
+        if einheit_m && x.eql?(einheit_m)
+          puts "feste_form in einheit_m #{einheit_m} matched: #{x}" if $VERBOSE
+          update_rule("feste_form einheit_m")
+          @measure = x
+          # binding.pry if break_condition
+          return pkgSizeToInt(pkg_size_l)
+        end
+      }
+      FLUIDFORMS.each { |x|
+        if part_from_name_c && x.match(part_from_name_c)
+          puts "liquid_form in #{part_from_name_c} matched: #{x}" if $VERBOSE
+          update_rule("liquid_form name_C")
+          @measure = x
+          # binding.pry if break_condition
+          return pkgSizeToInt(pkg_size_l, true)
+        end
+        if part_from_name_c && x.match(part_from_name_c.split(" ")[0])
+          puts "liquid_form in #{part_from_name_c} matched: #{x}" if $VERBOSE
+          update_rule("liquid_form first_part")
+          # binding.pry if break_condition
+          return pkgSizeToInt(pkg_size_l, true)
+        end
+        if einheit_m && x.eql?(einheit_m)
+          puts "liquid_form in einheit_m #{einheit_m} matched: #{x}" if $VERBOSE
+          update_rule("liquid_form einheit_m")
+          @measure = x
+          # binding.pry if break_condition
+          return pkgSizeToInt(pkg_size_l, MEASUREMENTS.find { |x| pkg_size_l.index(" #{x}") })
+        end
+      }
+      MEASUREMENTS.each { |x|
+        if pkg_size_l&.split(" ")&.index(x)
+          puts "measurement in pkg_size_l #{pkg_size_l} matched: #{x}" if $VERBOSE
+          update_rule("measurement pkg_size_l")
+          @measure = x
+          # binding.pry if break_condition
+          return pkgSizeToInt(pkg_size_l, true)
+        end
+      }
+      # binding.pry if break_condition
+      puts "Could not find anything for name_C #{part_from_name_c} pkg_size_l: #{pkg_size_l} einheit_m #{einheit_m}" if $VERBOSE
+      update_rule("unbekannt")
+      "unbekannt"
+    rescue RegexpError
+      puts "RegexpError for M: #{einheit_m} pkg_size_l #{pkg_size_l} C: #{part_from_name_c}"
+      update_rule("RegexpError")
+      "error"
     end
 
-    def pkg_size_to_int(pkg_size, skip_last_part = false)
+    def pkgSizeToInt(pkg_size, skip_last_part = false)
       return pkg_size if pkg_size.is_a?(Integer)
       return 1 unless pkg_size
       parts = pkg_size.split(/\s*x\s*/i)
-      parts = parts[0..-2] if skip_last_part and parts.size > 1
+      parts = parts[0..-2] if skip_last_part && (parts.size > 1)
       last_multiplier = parts[-1].to_i > 0 ? parts[-1].to_i : 1
       if parts.size == 3
-        return parts[0].to_i * parts[1].to_i * last_multiplier
+        parts[0].to_i * parts[1].to_i * last_multiplier
       elsif parts.size == 2
-        return parts[0].to_i * last_multiplier
+        parts[0].to_i * last_multiplier
       elsif parts.size == 1
-        return last_multiplier
+        last_multiplier
       else
-        return 1
+        1
       end
     end
 
-    def search_exact_galform(name)
+    def searchExactGalform(name)
       return nil unless name
-      if idx = @@galenic_forms.values.find{|x| x.descriptions['de'] and x.descriptions['de'].downcase.eql?(name.downcase) } or
-        idx = @@galenic_forms.values.find{|x| x.descriptions['fr'] and x.descriptions['fr'].downcase.eql?(name.downcase) } or
-        idx = @@galenic_forms.values.find{|x| x.descriptions['en'] and x.descriptions['en'].downcase.eql?(name.downcase) }
+      if (idx = @@galenic_forms.values.find { |x| x.descriptions["de"] && x.descriptions["de"].downcase.eql?(name.downcase) }) ||
+          (idx = @@galenic_forms.values.find { |x| x.descriptions["fr"] && x.descriptions["fr"].downcase.eql?(name.downcase) }) ||
+          (idx = @@galenic_forms.values.find { |x| x.descriptions["en"] && x.descriptions["en"].downcase.eql?(name.downcase) })
         return idx
       end
-      return nil
+      nil
     end
 
-    def handle_unknown_galform(gal_form)
+    def handleUnknownGalform(gal_form)
       return if @galenic_form
       if gal_form
-        @galenic_form =  GalenicForm.new(0, {'de' => remove_duplicated_spaces(gal_form.gsub(' +', ' '))}, @@galenic_forms[UnknownGalenicForm] )
+        @galenic_form = GalenicForm.new(0, {"de" => remove_duplicated_spaces(gal_form.gsub(" +", " "))}, @@galenic_forms[UNKNOWN_GALENIC_FORM])
         @@new_galenic_forms << gal_form
       else
-        @galenic_form = @@galenic_forms[UnknownGalenicForm]
+        @galenic_form = @@galenic_forms[UNKNOWN_GALENIC_FORM]
       end
     end
 
     def search_galenic_info(gal_form)
-      if idx = search_exact_galform(gal_form)
+      if (idx = searchExactGalform(gal_form))
         return idx
       end
-      if gal_form and gal_form.index(',')
+      if gal_form&.index(",")
         parts = gal_form.split(/\s+|,/)
-        parts.each{
-          |part|
-          if idx = search_exact_galform(part)
+        parts.each { |part|
+          if (idx = searchExactGalform(part))
             return idx
           end
         }
       elsif gal_form
-        if gal_form.eql?('capsule')
-          idx = search_exact_galform('capsules')
+        if gal_form.eql?("capsule")
+          idx = searchExactGalform("capsules")
           return idx
         end
-        if idx = search_exact_galform(gal_form)
+        if (idx = searchExactGalform(gal_form))
           return idx
         end
       end
-      return nil
+      nil
     end
   end
 end