oddb2tdat 1.0.3 → 1.0.4

data/History.txt

@@ -1,3 +1,8 @@
+=== 1.0.4 / 13.01.2012
+
+* Update CMUT, if Gültig bis is before today CMUT = 3
+* Updated RECA, CMUT, PRMO, ITHE format
+
 === 1.0.3 / 12.01.2012
 
 * Fix Publikumspreis format. if it is over 6 digits, the last parts will be cut.

data/lib/oddb2tdat.rb

@@ -1,10 +1,11 @@
 #! /usr/bin/env ruby
 # encoding: utf-8
-# Oddb2tdat -- 12.01.2012 -- mhatakeyama@ywesee.com
+# Oddb2tdat -- 13.01.2012 -- mhatakeyama@ywesee.com
 
+require 'date'
 =begin
 01 RECA Recordart 001 – 002 2 alpha: 11
-02 CMUT Mutationscode 003 – 003 1 num: 3 ausser Handel (AE) sonst 1 
+02 CMUT Mutationscode 003 – 003 1 num: 3 ausser Handel (AE) sonst 1. If there is no Pharmacode or Gültig bis is before today, CMUT must be 3.
 03 PHAR Pharmacode 004 – 010 7 num: Pharmacode (G)
 04 ABEZ Artikelbezeichnung 011 – 060 50 alpha: Präparate (H,K) 
 05 PRMO Arztpreis (=Galexis-Basis-Preis) 061 – 066 6 num: NIL 
@@ -21,11 +22,12 @@
 =end
 
 class Oddb2tdat
-  VERSION = '1.0.3'
+  VERSION = '1.0.4'
   COL = {
     :CMUT => 30, # AE
     :PHAR => 6,  # G
     :ABEZ => 7,  # H
+    :PRMO => 12, # M
     :PRPU => 13, # N
     :CKZL1 => 16, # Q
     :CKZL2 => 21, # V
@@ -34,6 +36,7 @@ class Oddb2tdat
     :ITHE => 33, # AH
     :CEAN => 4,  # E
     :PACK => 10, # K
+    :GULT => 23, # X
   }
   LEN = {
     :RECA => 2,
@@ -58,38 +61,54 @@ class Oddb2tdat
     parse
     output
   end
+  def format_price(price_str, len=6, int_len=4, frac_len=2)
+    price = price_str.split('.')
+    pre = ''
+    las = ''
+    pre = "%0#{int_len}d" % (price[0] ? price[0] : '0')
+    las = if price[1]
+            if price[1].size < frac_len
+              price[1] + "0"*(frac_len-price[2].size)
+            else
+              price[1][0,frac_len]
+            end
+          else
+            '0'*frac_len
+          end
+    (pre.to_s + las.to_s)[0,len]
+  end
+  def format_date(date_str, len=7)
+    date = date_str.gsub('.','')
+    if date.size < len
+      date = date + '0'*(len-date.size)
+    end
+    date[0,len]
+  end
+  def expired?(date_str)
+    d = date_str.split('.')
+    if d.length == 3
+      d.map!{|i| i.to_i}
+      date = Date.new(d[2],d[1],d[0])
+      Date.today > date
+    end
+  end
   def parse
     @rows = []
     File.open(@input, 'r:iso-8859-1:utf-8') do |input|
       while line=input.gets
         row  = ''
-        prpu = ''
-        pre = ''
-        las = ''
         cols = line.split(/;/)
         if cmut = cols[COL[:CMUT]] and cmut =~ /Ja/ or cmut =~ /Nein/
-          row << "%#{LEN[:RECA]}s"  % '11'
-          row << "%#{LEN[:CMUT]}s"  % (cmut =~ /Ja/ ? '3':'1')
+          row << "%#{LEN[:RECA]}s"  % '01'
+          row << "%#{LEN[:CMUT]}s"  % if(phar = cols[COL[:PHAR]] and phar.size > 3) or (!expired?(cols[COL[:GULT]]))
+                                        (cmut =~ /Ja/ ? '3':'1')
+                                      else
+                                        '3'
+                                      end
           row << "%0#{LEN[:PHAR]}d" % cols[COL[:PHAR]].to_i
           row << "%-#{LEN[:ABEZ]}s" % (cols[COL[:ABEZ]].to_s + " " + cols[COL[:PACK]]).to_s[0,LEN[:ABEZ]]
-          row << "%0#{LEN[:PRMO]}d" % 0
-          prpu = cols[COL[:PRPU]].to_s.split('.')
-          pre = "%04d" % if prpu[0]
-                           prpu[0] 
-                         else
-                           0
-                         end
-          las = if prpu[1]
-                  if prpu[1].size < 2
-                    prpu[1] + "0"*(2-prpu.last.size)
-                  else
-                    prpu[1][0,2]
-                  end
-                else
-                  '00'
-                end
-          prpu = pre.to_s + las.to_s
-          row << "%#{LEN[:PRPU]}s"  % prpu[0,LEN[:PRPU]]
+          row << "%#{LEN[:PRMO]}s"  % format_price(cols[COL[:PRMO]])
+          row << "%#{LEN[:PRPU]}s"  % format_price(cols[COL[:PRPU]])
           row << "%#{LEN[:CKZL]}s"  % if cols[COL[:CKZL1]] =~ /Ja/
                                         1
                                       elsif cols[COL[:CKZL2]] =~ /Ja/
@@ -104,7 +123,7 @@ class Oddb2tdat
                                       else
                                         0
                                       end
-          row << "%0#{LEN[:ITHE]}d" % cols[COL[:ITHE]].gsub('.','').to_i
+          row << "%#{LEN[:ITHE]}s"  % format_date(cols[COL[:ITHE]])
           row << "%#{LEN[:CEAN]}s"  % cols[COL[:CEAN]]
           @rows << row
         end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: oddb2tdat
 version: !ruby/object:Gem::Version 
-  hash: 17
+  hash: 31
   prerelease: 
   segments: 
   - 1
   - 0
-  - 3
-  version: 1.0.3
+  - 4
+  version: 1.0.4
 platform: ruby
 authors: 
 - Masaomi Hatakeyama, Zeno R.R. Davatz
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2012-01-12 00:00:00 +01:00
+date: 2012-01-13 00:00:00 +01:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency