clieop 0.2.2 → 1.0.0

data/.gitignore

@@ -4,3 +4,4 @@ clieop-*.gem
 /.bundle/
 Gemfile.lock
 *.rbc
+.rvmrc

data/README.rdoc

@@ -1,5 +1,7 @@
 = CLIEOP
 
+{<img src="https://secure.travis-ci.org/wvanbergen/clieop.png?branch=master" alt="Build Status" />}[http://travis-ci.org/wvanbergen/clieop]
+
 This library is a pure Ruby implementation of the *CLIEOP03* format. Currently,
 it only supports writing CLIEOP files with accounts receivable transactions.
 Accounts payable transactions, and reading existing CLIEOP files is planned to be

data/clieop.gemspec

@@ -3,14 +3,14 @@ Gem::Specification.new do |s|
 
   # Do not set version and date yourself, this will be done automatically
   # by the gem release script.
-  s.version = "0.2.2"
-  s.date    = "2011-09-23"
+  s.version = "1.0.0"
+  s.date    = "2012-07-20"
 
   s.summary     = "A pure Ruby implementation to write CLIEOP files"
   s.description = "This library is a pure Ruby, MIT licensed implementation of the CLIEOP03 transaction format. CLIEOP03 can be used to communicate direct debt transactions with your (Dutch) bank."
 
-  s.authors  = ['Willem van Bergen', 'Leon Berenschot']
-  s.email    = ['willem@vanbergen.org', 'LeipeLeon@gmail.com']
+  s.authors  = ['Willem van Bergen', 'Leon Berenschot', 'Reinier de Lange']
+  s.email    = ['willem@vanbergen.org', 'LeipeLeon@gmail.com', 'r.j.delange@nedforce.nl']
   s.homepage = 'http://github.com/wvanbergen/clieop/wiki'
 
   s.add_development_dependency('rake')
@@ -19,6 +19,6 @@ Gem::Specification.new do |s|
   
   # Do not set files and test_files yourself, this will be done automatically
   # by the gem release script.
-  s.files      = %w(.gitignore .infinity_test .rspec Gemfile MIT-LICENSE README.rdoc Rakefile autotest/discover.rb clieop.gemspec doc/clieop03.pdf lib/clieop.rb lib/clieop/batch.rb lib/clieop/file.rb lib/clieop/record.rb spec/clieop/batch_spec.rb spec/clieop/file_spec.rb spec/clieop/record_spec.rb spec/clieop_spec.rb spec/spec_helper.rb tasks/github-gem.rake)
-  s.test_files = %w(spec/clieop/batch_spec.rb spec/clieop/file_spec.rb spec/clieop/record_spec.rb spec/clieop_spec.rb)
+  s.files      = %w(.gitignore .infinity_test .rspec Gemfile MIT-LICENSE README.rdoc Rakefile autotest/discover.rb clieop.gemspec doc/VERWINFO_NL_4.1_11-2009.pdf doc/clieop03.pdf lib/clieop.rb lib/clieop/payment/batch.rb lib/clieop/payment/file.rb lib/clieop/payment/record.rb lib/clieop/process_info/batch.rb lib/clieop/process_info/file.rb lib/clieop/process_info/record.rb lib/clieop/process_info/transaction.rb lib/core_ext/hash.rb lib/core_ext/string.rb spec/clieop/payment/batch_spec.rb spec/clieop/payment/file_spec.rb spec/clieop/payment/record_spec.rb spec/clieop/process_info/batch_spec.rb spec/clieop/process_info/file_spec.rb spec/clieop/process_info/record_spec.rb spec/clieop/process_info/transaction_spec.rb spec/clieop_spec.rb spec/files/VERWINFO.txt spec/spec_helper.rb tasks/github-gem.rake)
+  s.test_files = %w(spec/clieop/payment/batch_spec.rb spec/clieop/payment/file_spec.rb spec/clieop/payment/record_spec.rb spec/clieop/process_info/batch_spec.rb spec/clieop/process_info/file_spec.rb spec/clieop/process_info/record_spec.rb spec/clieop/process_info/transaction_spec.rb spec/clieop_spec.rb)
 end

data/lib/clieop/payment/batch.rb

@@ -0,0 +1,128 @@
+module Clieop
+  module Payment
+
+    class Batch
+
+      attr_accessor :transactions, :batch_info
+
+      def initialize(batch_info)
+        raise "Required: :description, :account_nr, :account_owner" unless ([:account_nr, :account_owner] - batch_info.keys).empty?
+        @transactions = []
+        @batch_info = batch_info
+      end
+
+      # Adds a transaction to the batch
+      #
+      # :amount The amount involved with this transaction
+      # :account_nr The bank account from the other party
+      # :account_owner The name of the owner of the bank account
+      # :reference_number A reference number to identify this transaction
+      # :description A description for this transaction (4 lines max)
+      def add_transaction (transaction)
+        raise "No :account_nr given"    if transaction[:account_nr].nil?
+        raise "No :amount given"        if transaction[:amount].nil?
+        raise "No :account_owner given" if transaction[:account_owner].nil?
+        @transactions << transaction
+      end
+
+      alias_method :<<, :add_transaction
+
+      def to_clieop
+
+        # generate batch header records
+        batch_data = ""
+        batch_data << Clieop::Payment::Record.new(:batch_header,
+                          :transaction_group => @batch_info[:transaction_group] || 0,
+                          :acount_nr         => @batch_info[:account_nr] || 0,
+                          :serial_nr         => @batch_info[:serial_nr] || 1,
+                          :currency          => @batch_info[:currency] || "EUR").to_clieop
+        
+        # split batch discription into lines and make a record for the first 4 lines
+        unless @batch_info[:description].nil? || @batch_info[:description] == ''
+          @batch_info[:description].split(/\r?\n/)[0, 4].each do |line| # FIXME raise warning when line is longer than 32 chars/description longer than 4 lines
+            batch_data << Clieop::Payment::Record.new(:batch_description, :description => line.strip).to_s unless line == ''
+          end
+        end
+                  
+        batch_data << Clieop::Payment::Record.new(:batch_owner,
+                          :process_date => @batch_info[:process_date] || 0,
+                          :owner        => @batch_info[:account_owner]).to_clieop
+
+        # initialize checksums
+        total_account = @batch_info[:account_nr].to_i * @transactions.length
+        total_amount  = 0
+
+        # add transactions to batch
+        @transactions.each do |tr|
+
+          # prepare data for this transaction's records
+          transaction_type = tr[:transaction_type] || (transaction_is_payment? ? 1002 : 0)
+          to_account       = transaction_is_payment? ? @batch_info[:account_nr] : tr[:account_nr]
+          from_account     = transaction_is_payment? ? tr[:account_nr] : @batch_info[:account_nr]
+          amount_in_cents  = (tr[:amount] * 100).round.to_i
+
+          # update checksums
+          total_account += tr[:account_nr].to_i
+          total_amount  += amount_in_cents
+
+          # generate transaction record
+          batch_data << Clieop::Payment::Record.new(:transaction_info,
+                            :transaction_type => transaction_type, :amount       => amount_in_cents,
+                            :to_account       => to_account,       :from_account => from_account).to_clieop
+
+          # generate record with transaction information
+          if transaction_is_payment?          
+            batch_data << Clieop::Payment::Record.new(:invoice_name, :name => tr[:account_owner]).to_clieop 
+            batch_data << Clieop::Payment::Record.new(:invoice_city, :city => tr[:account_city]).to_clieop unless tr[:account_city].nil? 
+          end
+            
+          batch_data << Clieop::Payment::Record.new(:transaction_reference, :reference_number => tr[:reference_number]).to_clieop unless tr[:reference_number].nil?
+
+          # split discription into lines and make a record for the first 4 lines
+          unless tr[:description].nil? || tr[:description] == ''
+            tr[:description].split(/\r?\n/)[0, 4].each do |line| # FIXME raise warning when line is longer than 32 chars/description longer than 4 lines
+              batch_data << Clieop::Payment::Record.new(:transaction_description, :description => line.strip).to_s unless line == ''
+            end
+          end
+          
+          unless transaction_is_payment?          
+            batch_data << Clieop::Payment::Record.new(:payment_name, :name => tr[:account_owner]).to_clieop 
+            batch_data << Clieop::Payment::Record.new(:payment_city, :city => tr[:account_city]).to_clieop unless tr[:account_city].nil?
+          end
+
+        end
+
+        # generate batch footer record including some checks
+        batch_data << Clieop::Payment::Record.new(:batch_footer, :transaction_count => @transactions.length,
+                          :total_amount => total_amount, :account_checksum => account_checksum(total_account)).to_clieop
+
+      end
+
+      alias_method :to_s, :to_clieop
+
+      # creates a batch for payments from a given account
+      def self.payment_batch(batch_info = {})
+        batch_info[:transaction_group] ||= 0
+        Clieop::Payment::Batch.new(batch_info)
+      end
+
+      # creates a batch for invoices to a given account
+      def self.invoice_batch(batch_info = {})
+        batch_info[:transaction_group] ||= 10
+        Clieop::Payment::Batch.new(batch_info)
+      end
+
+      # the checksum on the total of accounts is in fact the last 10 chars of total amount
+      def account_checksum(total)
+        total.to_s.split('').last(10).join('') # ruby 1.8.6
+        # total.to_s.chars.last(10).join('')     # ruby 1.8.7
+      end
+
+    private
+
+      def transaction_is_payment?
+        @batch_info[:transaction_group] == 10
+      end
+    end
+  end
+end

data/lib/clieop/payment/file.rb

@@ -0,0 +1,45 @@
+module Clieop
+  module Payment
+
+    class File
+
+      attr_accessor :batches
+      attr_reader   :file_info
+
+      def initialize(file_info = {})
+        file_info[:date] = Date.today unless file_info[:date]
+        file_info[:date] = file_info[:date].strftime('%d%m%y') if file_info[:date].respond_to?(:strftime)
+        @file_info = file_info
+        @batches = []
+      end
+
+      # renders this file as a CLIEOP03 formatted string
+      def to_clieop
+        clieop_data = Clieop::Payment::Record.new(:file_header, @file_info).to_clieop
+        @batches.each { |batch| clieop_data << batch.to_clieop }
+        clieop_data << Clieop::Payment::Record.new(:file_footer).to_clieop
+      end
+
+      # Alias for to_clieop
+      alias_method :to_s, :to_clieop
+
+      def payment_batch(options)
+        @batches << Clieop::Payment::Batch.payment_batch(options)
+        yield(@batches.last) if block_given?
+        return @batches.last
+      end
+
+      def invoice_batch(options)
+        @batches << Clieop::Payment::Batch.invoice_batch(options)
+        yield(@batches.last) if block_given?
+        return @batches.last
+      end
+
+      def save(filename)
+        ::File.open(filename, 'w') do |f|
+          f.write(self.to_clieop)
+        end
+      end
+    end
+  end
+end

data/lib/clieop/payment/record.rb

@@ -0,0 +1,124 @@
+module Clieop
+  module Payment
+
+    class Record
+      
+      LINE_SEPARATOR = "\r\n"
+
+      TYPE_DEFINITIONS = {
+          :file_header => [
+              [:record_code, :numeric, 4, 1],
+              [:record_variant, :alpha, 1, 'A'],
+              [:date, :numeric, 6],
+              [:filename, :alpha, 8, 'CLIEOP03'],
+              [:sender_identification, :alpha, 5],
+              [:file_identification, :alpha, 4],
+              [:duplicate_code, :numeric, 1, 1]
+            ],
+          :file_footer => [
+              [:record_code, :numeric, 4, 9999],
+              [:record_variant, :alpha, 1, 'A'],
+            ],
+          :batch_header => [
+              [:record_code, :numeric, 4, 10],
+              [:record_variant, :alpha, 1, 'B'],
+              [:transaction_group, :numeric, 2],
+              [:acount_nr, :numeric, 10],
+              [:serial_nr, :numeric, 4],
+              [:currency, :alpha, 3, 'EUR']
+            ],
+          :batch_footer => [
+              [:record_code, :numeric, 4, 9990],
+              [:record_variant, :alpha, 1, 'A'],
+              [:total_amount, :numeric, 18],
+              [:account_checksum, :numeric, 10],
+              [:transaction_count, :numeric, 7],
+            ],
+          :batch_description => [
+              [:record_code, :numeric, 4, 20],
+              [:record_variant, :alpha, 1, 'A'],
+              [:description, :alpha, 32]
+            ],
+          :batch_owner => [
+              [:record_code, :numeric, 4, 30],
+              [:record_variant, :alpha, 1, 'B'],
+              [:naw_code, :numeric, 1, 1],
+              [:process_date, :numeric, 6, 0],
+              [:owner, :alpha, 35],
+              [:test, :alpha, 1, 'P']
+            ],
+          :transaction_info => [
+              [:record_code, :numeric, 4, 100],
+              [:record_variant, :alpha, 1, 'A'],
+              [:transaction_type, :numeric, 4, 1002],
+              [:amount, :numeric, 12],
+              [:from_account, :numeric, 10],
+              [:to_account, :numeric, 10],
+            ],
+          :invoice_name => [
+              [:record_code, :numeric, 4, 110],
+              [:record_variant, :alpha, 1, 'B'],
+              [:name, :alpha, 35],
+            ],
+          :invoice_city => [
+              [:record_code, :numeric, 4, 113],
+              [:record_variant, :alpha, 1, 'B'],
+              [:city, :alpha, 35],
+            ],            
+          :transaction_reference => [
+              [:record_code, :numeric, 4, 150],
+              [:record_variant, :alpha, 1, 'A'],
+              [:reference_number, :alpha, 16],
+            ],
+          :transaction_description => [
+              [:record_code, :numeric, 4, 160],
+              [:record_variant, :alpha, 1, 'A'],
+              [:description, :alpha, 32],
+            ],
+          :payment_name =>[
+              [:record_code, :numeric, 4, 170],
+              [:record_variant, :alpha, 1, 'B'],
+              [:name, :alpha, 35],
+            ],
+          :payment_city =>[
+              [:record_code, :numeric, 4, 173],
+              [:record_variant, :alpha, 1, 'B'],
+              [:city, :alpha, 35],
+            ],         
+      }
+
+      attr_accessor :definition, :data
+
+      def initialize record_type, record_data = {}
+
+        # load record definition
+        raise "Unknown record type" unless Clieop::Payment::Record::TYPE_DEFINITIONS[record_type.to_sym]
+        @definition = Clieop::Payment::Record::TYPE_DEFINITIONS[record_type.to_sym]
+
+        # set default values according to definition
+        @data = @definition.inject({}) { |memo, field| memo[field[0]] = field[3] if field[3] ; memo }
+
+        # set values for all the provided data
+        record_data.each { |field, value| @data[field] = value }
+      end
+
+      def to_clieop
+        line = ""
+        # format each field
+        @definition.each do |field, type, length, content|
+          fmt = '%'
+          fmt << (type == :numeric ? '0' : '-')
+          fmt << (length.to_s)
+          fmt << (type == :numeric ? 'd' : 's')
+          raw_data = (type == :numeric) ? @data[field].to_i : @data[field]
+          value = sprintf(fmt, raw_data)
+          line << (type == :numeric ? value[0 - length, length] : value[0, length])
+        end
+        # fill each line with spaces up to 50 characters and close with a CR/LF
+        line.ljust(50) + LINE_SEPARATOR
+      end
+
+      alias_method :to_s, :to_clieop
+    end
+  end
+end

data/lib/clieop/process_info/batch.rb

@@ -0,0 +1,27 @@
+module Clieop
+  module ProcessInfo
+    
+    class Batch
+
+      attr_accessor :info, :transactions
+
+      def initialize
+        self.transactions = []
+        self.info = {}
+      end
+      
+      def add_record record, current_transaction = nil
+        if [:batch_header, :batch_info, :batch_footer].include?(record.type)
+          info.merge!(record.data.except(:record_code, :filler))
+        elsif current_transaction
+          if record == current_transaction.record
+            transactions << current_transaction
+          else
+            current_transaction.add_record(record)
+          end
+        end
+      end
+
+    end
+  end
+end

data/lib/clieop/process_info/file.rb

@@ -0,0 +1,51 @@
+module Clieop
+  module ProcessInfo
+
+    # Reads VERWINFO 4.1 process info, see record.rb for details
+    class File
+      
+      attr_accessor :records, :batches, :info
+
+      def initialize(verwinfo_string, whiny_mode = false)
+        self.records = verwinfo_string.split(Clieop::ProcessInfo::Record::LINE_SEPARATOR).map do |record_line| 
+          unless record_line.size < 3 # No record code available
+            begin
+              Clieop::ProcessInfo::Record.new(record_line)
+            rescue Exception => e
+              whiny_mode ? raise(e) : nil
+            end
+          end
+        end.compact
+        
+        raise 'No valid records found in VERWINFO data' unless @records.any?
+        
+        self.batches = []
+        self.info = records.first.data.merge(records.last.data).except(:record_code, :filler) # Get file header and footer
+        
+        current_batch = nil; current_transaction = nil
+        records.each do |record|
+          case record.type
+          when :batch_header 
+            current_batch = Clieop::ProcessInfo::Batch.new
+            current_transaction = nil
+            batches << current_batch
+          when :transaction_info, :changed_account_info
+            current_transaction = Clieop::ProcessInfo::Transaction.new(record)
+          end
+          
+          current_batch.add_record(record, current_transaction) if current_batch          
+        end
+      end
+   
+      def self.from_file(verwinfo_file, whiny_mode = false)
+        verwinfo_file = File.open(verwinfo_file) if verwinfo_file.is_a?(String)
+        self.from_string(verwinfo_file.read, whiny_mode)
+      end
+    
+      def self.from_string(verwinfo_string, whiny_mode = false)
+        self.new(verwinfo_string, whiny_mode)
+      end
+      
+    end
+  end
+end

data/lib/clieop/process_info/record.rb

@@ -0,0 +1,221 @@
+require 'time'
+require 'bigdecimal'
+
+module Clieop  
+  module ProcessInfo
+    
+    # Reads VERWINFO 4.1 process info
+    # Docs: http://www.equens.com/Images/VERWINFO%20NL%204.1_11-2009.pdf
+    class Record
+      
+      attr_accessor :type, :raw_line, :definition, :data
+    
+      LINE_SEPARATOR = "\r\n"
+
+      TYPE_DEFINITIONS = {
+          :file_header => [
+              [:record_code, :numeric, 3, 10],
+              [:filename, :alpha, 8, 'VERWINFO'],
+              [:filler, :alpha, 1, 'A'],
+              [:file_version, :alpha, 3, '4.1'],
+              [:date, :date, 6],            
+              [:run_number, :numeric, 4],
+              [:account_nr, :numeric, 10],
+              [:serial_nr, :numeric, 4],    
+              [:file_nr, :numeric, 2]
+            ],
+          :file_footer => [
+              [:record_code, :numeric, 3, 990],
+              [:batches_count, :numeric, 6],
+              [:next_file_nr, :numeric, 2]           
+            ],
+          :batch_header => [
+              [:record_code, :numeric, 3, 50],
+              [:account_nr, :numeric, 10],            
+              [:filler, :alpha, 3],
+              [:total_amount, :amount, 18],  
+              [:transaction_count, :numeric, 7],
+              [:test_code, :alpha, 1], # P(roduction), T(est)
+              [:batch_type, :alpha, 1],
+              [:period_type, :alpha, 1],
+              [:period_length, :numeric, 2],
+              [:period_nr, :numeric, 3]
+            ],
+          :batch_info => [
+              [:record_code, :numeric, 3, 51],
+              [:currency, :alpha, 3],
+              [:batch_identifier, :alpha, 16]            
+            ],
+          :batch_footer => [
+              [:record_code, :numeric, 3, 950],
+              [:total_rejected, :numeric, 7],
+              [:total_reversed, :numeric, 7],
+              [:transaction_count, :numeric, 7],
+              [:total_amount, :amount, 18] 
+            ],
+          :transaction_info => [
+              [:record_code, :numeric, 3, 100],
+              [:amount, :amount, 13],
+              [:from_account, :numeric, 10],
+              [:to_account, :numeric, 10],
+              [:entry_account, :numeric, 10],
+            
+              # from_account_verification_nr - Controlecijfer rekeningnummer betaler
+              # 0 – 9   als Rekeningnummer betaler een rekeningnummer met maximaal 7 cijfers bevat
+              # spatie  als Rekeningnummer betaler een gewoon rekeningnummer bevat            
+              [:from_account_verification_nr, :numeric, 1],
+            
+              # transaction_reference_ok - Betalingskenmerkgoed
+              # J       controlecijfer juist
+              # N       controlecijfer onjuist
+              # spatie  geen controlecijfer aanwezig            
+              [:transaction_reference_ok, :alpha, 1]
+            ],
+          :euro_record => [
+              [:record_code, :numeric, 3, 101],
+              [:currency, :alpha, 3],
+              [:amount_nlg, :amount, 13],
+              [:amount_eur, :amount, 13]
+            ],
+          :reverse_info => [
+              [:record_code, :numeric, 3, 105],
+              [:transaction_reference, :alpha, 16],
+              [:inquiry_identifier, :alpha, 19],
+            
+              # reason - Redenstorno Signaalcode Signaaltekst 
+              # 
+              # 01          0010        Administratieve reden 
+              # 02          0011        Rekeningnummer vervallen 
+              # 03          0001        Rekeningnummer onbekend 
+              # 05          0012        Geen incassomachtiging verstrekt 
+              # 06          0013        Niet akkoord met afschrijving  
+              # 07          0014        Dubbel betaald 
+              # 08          0005        Naam/nummer stemmen niet overeen 
+              # 09          0007        Rekeningnummer geblokkeerd 
+              # 10          0008        Selektieve incasso blokkade 
+              # 11          0009        Rekeningnummer WKA            
+              [:reason, :numeric, 2],
+            
+              [:original_to_account, :numeric, 10]
+            ],
+          :transaction_description => [
+              [:record_code, :numeric, 3, 110],
+              [:description, :alpha, 32]
+            ],
+          :bank_info => [
+              [:record_code, :numeric, 3, 115],
+              [:description, :alpha, 30]
+            ],   
+          :settle_info => [
+              [:record_code, :numeric, 3, 500],
+            
+              # status - Poststatus
+              # 00  niet van toepassing (Batchsoorten B en C) 
+              # 01  geweigerde post
+              # 02  teruggebogen post               
+              [:status, :numeric, 2],
+            
+              [:original_settle_date, :date, 6],
+              [:filler, :alpha, 14],
+              [:run_nr, :numeric, 4],
+              [:settle_date, :date, 6],
+            
+              # transaction_type - Transactiesoort
+              # 0000  crediteuren betalingen 
+              # 0001  door bank geconverteerde opdrachten 
+              # 0002  periodieke overboekingen
+              # 0003  salarissen
+              # 0006  iDEAL internet betalingen 
+              # 0009  Digitale Nota betalingen 
+              # 0092  EBALink betaling
+              # 0220  doorlopende machtiging algemeen 
+              # 0221  eenmalige machtiging 
+              # 0222  doorlopende machtiging bedrijven 
+              # 0223  doorlopende machtiging kansspelen 
+              # 0227  doorlopende machtiging bedrijven zonder terugboekingsrecht debiteur 
+              # 0228  doorlopende telefonische machtiging 
+              # 0229  eenmalige telefonische machtiging 
+              # 0284  doorlopende telefonische machtiging kansspelen 
+              # 0285  overheidsvordering 
+              # 0330  terugboeking op doorlopende machtiging algemeen 
+              # 0331  terugboeking op eenmalige machtiging 
+              # 0332  terugboeking op doorlopende machtiging bedrijven
+              # 0333  terugboeking op doorlopende machtiging kansspelen
+              # 0337  terugboeking op doorlopende machtiging bedrijven zonder terugboekingsrecht debiteur 
+              # 0338  terugboeking op doorlopende telefonische machtiging
+              # 0339  terugboeking op eenmalige telefonische machtiging 
+              # 0394  terugboeking op doorlopende telefonische machtiging kansspelen 
+              # 0395  terugboeking op Overheidsvordering
+              # 1010  betaalautomaat transactie
+              # 1144  acceptgiro zonder bedrag in coderegel 
+              # 1145  acceptgiro met bedrag in coderegel             
+              [:transaction_type, :numeric, 4]
+            ],
+          :changed_account_info => [
+              [:record_code, :numeric, 3, 503],
+              [:account_nr, :numeric, 10],
+              [:original_account_nr, :numeric, 10]
+            ],
+          :name_info => [
+              [:record_code, :numeric, 3, 505],
+              [:name, :alpha, 35]
+            ],
+          :street_info => [
+              [:record_code, :numeric, 3, 510],
+              [:street, :alpha, 35]
+            ],
+          :city_info => [
+              [:record_code, :numeric, 3, 515],
+              [:city, :alpha, 35]
+            ],
+          
+          # See 'Bijlage 1'
+          :reject_info => [
+              [:record_code, :numeric, 3, 600],
+              [:code, :numeric, 4],
+              [:description, :alpha, 32]
+            ]
+      }
+      
+      TYPE_FOR_RECORD_CODE = TYPE_DEFINITIONS.inject({}){|m, (k,v)| m[v.first.last] = k; m }
+      
+      def initialize record_line
+        self.raw_line = record_line
+        self.type = TYPE_FOR_RECORD_CODE[raw_line[0,3].to_i]
+        self.data = {}
+        self.definition = TYPE_DEFINITIONS[type]
+        
+        skip = 0
+        definition.each do |attribute_definition|
+          # Get the right substring
+          attribute_line = raw_line[skip, attribute_definition[2]]
+          # Parse the attribute
+          data[attribute_definition[0]] =  attribute_line.to_s.present? ? self.class.send("parse_#{attribute_definition[1]}_value", attribute_line) : nil
+          # Update the skip
+          skip += attribute_definition[2]
+        end        
+      end
+      
+      private
+      
+      def self.parse_alpha_value attribute_line
+        attribute_line.strip 
+      end
+      
+      def self.parse_numeric_value attribute_line
+        attribute_line.to_i
+      end
+      
+      def self.parse_amount_value attribute_line
+        (BigDecimal(attribute_line) / 100).round(2)
+      end      
+      
+      # Format: jjmmdd
+      def self.parse_date_value attribute_line
+        Time.parse(attribute_line).send(:to_date)
+      end
+      
+
+    end    
+  end  
+end

data/lib/clieop/process_info/transaction.rb

@@ -0,0 +1,24 @@
+module Clieop
+  module ProcessInfo
+    
+    class Transaction
+
+      attr_accessor :info, :descriptions, :record
+
+      def initialize(record)
+        self.record = record
+        self.info = record.data.except(:record_code)
+      end
+      
+      def add_record record
+        unless record.type == :transaction_description
+          info[record.type] = record.data.except(:record_code, :filler)
+        else
+          info[:transaction_descriptions] ||= []
+          info[:transaction_descriptions] << record.data[:description]         
+        end
+      end
+
+    end
+  end
+end