bankserv 0.1.3

data/lib/bankserv/transmission/output_document.rb

@@ -0,0 +1,27 @@
+class Bankserv::OutputDocument < Bankserv::Document
+  
+  def self.document_type
+    'output'
+  end
+  
+  def self.store(string)
+    options = Absa::H2h::Transmission::Document.hash_from_s(string, 'output')
+    
+    raise "Expected a document set" unless options[:type] == "document"
+    
+    document = Bankserv::OutputDocument.new(type: 'output')
+    document.set = Bankserv::Set.from_hash(options)
+    document.set.document = document # whaaaaaa?
+    document.save!
+    document
+  end
+  
+  def process!
+    raise "Document already processed" if processed?
+    
+    self.set.process
+    self.processed = true
+    self.save
+  end
+  
+end

data/lib/bankserv/transmission/record.rb

@@ -0,0 +1,13 @@
+module Bankserv
+  
+  class Record < ActiveRecord::Base
+    belongs_to :set
+    serialize :data
+    serialize :error
+    
+    def to_hash
+      {type: record_type, data: data}
+    end
+  end
+  
+end

data/lib/bankserv/transmission/reply_document.rb

@@ -0,0 +1,27 @@
+class Bankserv::ReplyDocument < Bankserv::Document
+  
+  def self.document_type
+    'reply'
+  end
+  
+  def self.store(string)
+    options = Absa::H2h::Transmission::Document.hash_from_s(string, 'output')
+    
+    raise "Expected a document set" unless options[:type] == "document"
+    
+    document = Bankserv::ReplyDocument.new(type: 'output')
+    document.set = Bankserv::Set.from_hash(options)
+    document.set.document = document # whaaaaaa?
+    document.save!
+    document
+  end
+  
+  def process!
+    raise "Document already processed" if processed?
+    
+    self.set.process
+    self.processed = true
+    self.save
+  end
+  
+end

data/lib/bankserv/transmission/set.rb

@@ -0,0 +1,120 @@
+module Bankserv
+  
+  class Set < ActiveRecord::Base
+    belongs_to :set
+    has_many :sets
+    
+    has_one :document
+    has_many :records
+    
+    def build_header(options = {})
+      records.build(record_type: "header", data: options)
+    end
+  
+    def build_trailer(options = {})
+      records.build(record_type: "trailer", data: options)
+    end
+    
+    def parent
+      set
+    end
+    
+    def rec_status # is it test/live data
+      return document.rec_status if document
+      return parent.rec_status if parent
+      "T"
+    end
+    
+    def header
+      records.select {|rec| rec.record_type == "header"}.first
+    end
+    
+    def trailer
+      records.select {|rec| rec.record_type == "trailer"}.first
+    end
+    
+    def transactions
+      records.select {|rec| !(["header", "trailer"].include? rec.record_type)  }
+    end
+        
+    def decorate_records
+      klass = "Absa::H2h::Transmission::#{set_type.camelize}".constantize
+      
+      records.each do |record|
+        defaults = klass.record_type(record.record_type).template_options
+        record.data = defaults.merge(record.data)
+        record.data[:rec_status] = rec_status unless record.data[:rec_status]
+      end
+      
+      self.records.each{|rec| rec.save!} # TODO: does this cause records to save before set?
+    end
+    
+    def self.partial_class_name
+      self.name.split("::")[-1]
+    end
+    
+    def number_of_records
+      records.size + sets.inject(0) { |sum, set| sum + set.number_of_records }
+    end
+    
+    def set_type
+      self.class.partial_class_name.underscore
+    end
+    
+    def to_hash
+      data = []
+      data << header.to_hash if header
+      data << transactions.collect{|rec| rec.to_hash}
+      data << sets.collect{|s| s.to_hash}
+      data << trailer.to_hash if trailer
+      data.flatten!
+      
+      {
+        type: set_type,
+        data: data
+      }
+    end
+    
+    def process
+      sets.each{|s| s.process}
+    end
+    
+    def self.from_hash(options)
+      header_options = options[:data].select{|h| h[:type] == 'header'}.first
+      trailer_options = options[:data].select{|h| h[:type] == 'trailer'}.first
+      transaction_options = options[:data].select{|h| not ['header','trailer'].include?(h[:type])}
+
+      klass_name = "Bankserv::Transmission::UserSet::#{options[:type].camelize}"
+      
+      if klass_name == "Bankserv::Transmission::UserSet::Eft"
+        # hack for debit/credit eft
+        klass_name = "Bankserv::Transmission::UserSet::Debit" if header_options[:data][:rec_id] == "001"
+        klass_name = "Bankserv::Transmission::UserSet::Credit" if header_options[:data][:rec_id] == "020"  
+      end
+      
+      set = klass_name.constantize.new
+      set.build_header(header_options[:data]) if header_options
+      
+      transaction_options.each do |option|
+        if option[:data].is_a? Array
+          set.sets << self.from_hash(option)
+        else
+          set.records << Record.new(record_type: option[:type], data: option[:data], reference: option[:data][:user_ref])
+        end
+      end
+      
+      set.build_trailer(trailer_options[:data]) if trailer_options
+      set
+    end
+    
+    def contained_sets
+      ([self] + sets.map(&:contained_sets)).flatten
+    end
+    
+    def record_with_sequence_number(sequence_number)
+      transactions.select{|rec| rec.data[:user_sequence_number] == sequence_number}.first
+    end
+    
+  end
+    
+end

data/lib/bankserv/transmission/set/account_holder_verification.rb

@@ -0,0 +1,81 @@
+module Bankserv
+  module Transmission::UserSet
+  
+    class AccountHolderVerification < Set
+    
+      before_save :set_trailer, :decorate_records
+      after_save :set_header
+    
+      def self.generate(options = {})
+        [:internal, :external].collect do |type|
+          ahvs = Bankserv::AccountHolderVerification.unprocessed.send(type)
+          
+          if options[:rec_status] == "L"
+            ahvs.select!{|ahv| not ahv.request.test?}
+          else
+            ahvs.select!{|ahv| ahv.request.test?}            
+          end
+          
+          if ahvs.count > 0
+            set = self.new
+            set.build_header
+            ahvs.each{|ahv| set.build_transaction(ahv)}
+            set.build_trailer
+            set
+          end
+        end.compact
+      end
+    
+      def self.has_work?
+        Bankserv::AccountHolderVerification.unprocessed.select{|item| not item.request.test?}.any?
+      end
+      
+      def self.has_test_work?
+        Bankserv::AccountHolderVerification.unprocessed.select{|item| item.request.test?}.any?
+      end
+    
+      def build_transaction(ahv)
+        record_data = if ahv.external?
+          Absa::H2h::Transmission::AccountHolderVerification.record_type('external_account_detail').template_options
+        else
+          Absa::H2h::Transmission::AccountHolderVerification.record_type('internal_account_detail').template_options
+        end
+        
+        record_data.merge!(
+          seq_no: (transactions.count + 1).to_s,
+          account_number: ahv.bank_account.account_number,
+          id_number: ahv.bank_account.id_number,
+          initials: ahv.bank_account.initials,
+          surname: ahv.bank_account.account_name,
+          user_ref: ahv.internal_user_ref
+        )
+      
+        record_data.merge!(branch_code: ahv.bank_account.branch_code) if ahv.external?
+        
+        record_type = ahv.internal? ? "internal_account_detail" : "external_account_detail"      
+        records.build(record_type: record_type, data: record_data)
+      end
+    
+      def account_number_total
+        transactions.inject(0) {|res, e| res + e.data[:account_number].to_i}
+      end
+   
+      private
+    
+      def set_header
+        self.generation_number = Bankserv::Configuration.reserve_user_generation_number!.to_s
+        header.data[:gen_no] = generation_number
+        header.data[:dept_code] = Bankserv::Configuration.department_code
+        header.save!
+      end
+    
+      def set_trailer
+        trailer.data[:no_det_recs] = self.transactions.count.to_s
+        trailer.data[:acc_total] = self.account_number_total.to_s
+        trailer.save!
+      end
+    
+    end
+  
+  end
+end

data/lib/bankserv/transmission/set/account_holder_verification_output.rb

@@ -0,0 +1,17 @@
+module Bankserv
+  
+  module Transmission::UserSet
+  
+    class AccountHolderVerificationOutput < Set
+      
+      def process
+        transactions.each do |transaction|
+          Bankserv::AccountHolderVerification.for_internal_reference(transaction.reference).first.process_response(transaction.data)
+        end
+      end
+     
+    end
+   
+  end
+  
+end

data/lib/bankserv/transmission/set/credit.rb

@@ -0,0 +1,44 @@
+module Bankserv
+  module Transmission::UserSet
+  
+    class Credit < Eft
+      
+      before_save :decorate_records, :decorate_header, :decorate_trailer
+      
+      attr_accessor :type_of_service, :accepted_report, :account_type_correct
+      
+      def self.class_type
+        Bankserv::Credit
+      end
+      
+      def class_type
+        Bankserv::Credit
+      end
+      
+      def rec_id
+        '020'
+      end
+      
+      def standard_bankserv_record_identifier
+        "10"
+      end
+      
+      def standard_entry_class
+        "88"
+      end
+      
+      def contra_bankserv_record_identifier
+        "12"
+      end
+      
+      def debit_records
+        contra_records
+      end
+      
+      def credit_records
+        standard_records
+      end
+          
+    end
+  end
+end

data/lib/bankserv/transmission/set/debit.rb

@@ -0,0 +1,44 @@
+module Bankserv
+  module Transmission::UserSet
+  
+    class Debit < Eft
+      
+      before_save :decorate_records, :decorate_header, :decorate_trailer
+      
+      attr_accessor :type_of_service, :account_type_correct, :accepted_report
+      
+      def self.class_type
+        Bankserv::Debit
+      end
+      
+      def class_type
+        Bankserv::Debit
+      end
+      
+      def rec_id
+        '001'
+      end
+      
+      def standard_bankserv_record_identifier
+        "50"
+      end
+      
+      def standard_entry_class
+        "44"
+      end
+            
+      def contra_bankserv_record_identifier
+        "52"
+      end
+      
+      def debit_records
+        standard_records
+      end
+      
+      def credit_records
+        contra_records
+      end
+
+    end
+  end
+end

data/lib/bankserv/transmission/set/document.rb

@@ -0,0 +1,45 @@
+module Bankserv
+  module Transmission
+    module UserSet
+  
+      class Document < Set
+    
+        before_save :decorate_records
+    
+        def self.generate(options)
+          set = self.new
+          set.build_header(options)
+          set.build_trailer(no_of_recs: options[:no_of_recs])
+          set
+        end
+    
+        def build_header(options = {})
+          defaults = {
+            client_code: Bankserv::Configuration.active.client_code,
+            client_name: Bankserv::Configuration.active.client_name,
+            date: Date.today.strftime("%Y%m%d"),
+            destination: "0"
+          }
+          
+          records.build(record_type: "header", data: defaults.merge(options))
+        end
+    
+        def build_trailer(options = {})
+          options[:no_of_recs] = options[:no_of_recs].to_s
+          records.build(record_type: "trailer", data: options)
+        end
+        
+        def decorate_records
+          super
+          set_trailer_number_of_records
+        end
+        
+        def set_trailer_number_of_records
+          trailer.data.merge!(no_of_recs: number_of_records.to_s)
+        end
+    
+      end
+  
+    end
+  end
+end

data/lib/bankserv/transmission/set/eft.rb

@@ -0,0 +1,228 @@
+module Bankserv
+  module Transmission::UserSet
+  
+    class Eft < Set
+      
+      before_save :decorate_records, :decorate_header, :decorate_trailer
+      
+      attr_accessor :type_of_service, :account_type_correct, :accepted_report
+      
+      def self.has_work?
+        class_type.has_work?
+      end
+      
+      def self.has_test_work?
+        class_type.has_test_work?
+      end
+      
+      def self.unprocessed_efts(rec_status)
+        if rec_status == "L"
+          self.class_type.unprocessed.select{|item| not item.request.test?}
+        else
+          self.class_type.unprocessed.select{|item| item.request.test?}
+        end
+      end
+      
+      def self.generate(options = {})
+        efts = self.unprocessed_efts(options[:rec_status])
+        
+        if efts.count > 0
+          set = self.new
+          set.type_of_service = efts.first.request.data[:type_of_service]
+          set.accepted_report = efts.first.request.data[:accepted_report] || ""
+          set.account_type_correct = efts.first.request.data[:account_type_correct] || ""
+          set.build_header
+          set.build_batches(options[:rec_status])
+          set.build_trailer
+          set
+        end
+      end
+      
+      def set_type
+        "eft"
+      end
+      
+      def short_date(date)        
+        date = Date.strptime(date, "%Y-%m-%d")
+        date.strftime("%y%m%d")
+      end
+      
+      def last_sequence_number_today
+        last = Record.where("date(created_at) = ? AND record_type = 'standard_record'", Date.today).last
+        last.nil? ? 0 : last.data[:user_sequence_number].to_i
+      end
+      
+      def user_sequence_number
+        (last_sequence_number_today + transactions.count + 1).to_s
+      end
+      
+      def contra_records
+        records.where(record_type: "contra_record")
+      end
+      
+      def standard_records
+        records.where(record_type: "standard_record")
+      end
+      
+      def get_user_generation_number
+        Bankserv::Configuration.reserve_user_generation_number!.to_s #Equal to the last accepted user gen number + 1
+      end
+      
+      def build_header(options = {})
+        self.generation_number = options[:user_generation_number] || get_user_generation_number
+        record_data = Absa::H2h::Transmission::Eft.record_type('header').template_options
+        
+        record_data.merge!(
+          rec_id: rec_id,
+          bankserv_creation_date: Time.now.strftime("%y%m%d"),
+          first_sequence_number: (last_sequence_number_today + 1).to_s,
+          user_generation_number: generation_number,
+          type_of_service: @type_of_service,
+          accepted_report: @accepted_report.nil? ? "" : @accepted_report,
+          account_type_correct: @account_type_correct
+        )
+        
+        records.build(record_type: "header", data: record_data)
+      end
+      
+      def build_trailer(options = {})
+        record_data = Absa::H2h::Transmission::Eft.record_type('trailer').template_options
+        records.build(record_type: "trailer", data: record_data.merge(rec_id: rec_id))
+      end
+      
+      def build_batches(rec_status)
+        efts = self.class.unprocessed_efts(rec_status)
+        
+        efts.group_by(&:batch_id).each do |batch_id, eft|
+          eft.select(&:standard?).each{|t| build_standard t}
+          eft.select(&:contra?).each{|t| build_contra t}
+        end
+      end
+      
+      def build_standard(transaction)
+        record_data = Absa::H2h::Transmission::Eft.record_type('standard_record').template_options
+        homing_account_number = transaction.bank_account.account_number.to_i.to_s
+        homing_branch_code = transaction.bank_account.branch_code.to_i.to_s
+        
+        record_data.merge!(
+          rec_id: rec_id,
+          user_sequence_number: user_sequence_number,
+          user_nominated_account: transaction.contra_bank_details.account_number, 
+          user_branch: transaction.contra_bank_details.branch_code, 
+          user_code: Bankserv::Configuration.active.user_code,
+          bankserv_record_identifier: standard_bankserv_record_identifier,
+          homing_branch: homing_branch_code,
+          homing_account_number: homing_account_number.length <= 11 ? homing_account_number : "0",
+          type_of_account: transaction.bank_account.account_type_id,
+          amount: transaction.amount_in_cents.to_s,
+          action_date: short_date(transaction.action_date),
+          entry_class: standard_entry_class,
+          tax_code: "0",
+          user_ref: transaction.formatted_user_ref,
+          homing_account_name: transaction.bank_account.account_name,
+          non_standard_homing_account_number: homing_account_number.length > 11 ? homing_account_number : "0"
+        )
+        
+        records.build(record_type: transaction.record_type + "_record", data: record_data)
+      end
+      
+      def build_contra(transaction)
+        record_data = Absa::H2h::Transmission::Eft.record_type('contra_record').template_options
+        
+        record_data.merge!(
+          rec_id: rec_id,
+          user_sequence_number: user_sequence_number,
+          bankserv_record_identifier: contra_bankserv_record_identifier,
+          user_branch: transaction.bank_account.branch_code,
+          user_nominated_account: transaction.bank_account.account_number.to_i.to_s,
+          user_code: Bankserv::Configuration.active.user_code,
+          homing_branch: transaction.bank_account.branch_code,
+          homing_account_number: transaction.bank_account.account_number,
+          type_of_account: "1",
+          amount: transaction.amount_in_cents.to_s,
+          action_date: short_date(transaction.action_date),
+          entry_class: "10",
+          user_ref: transaction.formatted_user_ref
+        )
+        
+        records.build(record_type: transaction.record_type + "_record", data: record_data)
+      end
+      
+      def first_action_date
+        fad = Date.today
+        transactions.map(&:data).each do |hash|
+          first = Date.strptime(hash[:action_date], "%y%m%d")
+          fad = first if first < fad
+        end
+        fad.strftime("%y%m%d")
+      end
+      
+      def last_action_date
+        lad = Date.today
+        transactions.map(&:data).each do |hash|
+          last = Date.strptime(hash[:action_date], "%y%m%d")
+          lad = last if last < lad
+        end
+        lad = lad + 3.days
+        lad.strftime("%y%m%d")
+      end
+      
+      def purge_date
+        date = Date.strptime("#{self.last_action_date}", "%y%m%d") + 4.days
+        date.strftime("%y%m%d")
+      end
+      
+      def hash_total_of_homing_account_numbers
+        hash_total = 0
+
+        transactions.each do |transaction|
+          hash_total += transaction.data[:homing_account_number].to_i
+          hash_total += transaction.data[:non_standard_homing_account_number].to_i if transaction.record_type == "standard_record"
+        end
+
+        hash_total.to_s.reverse[0,12].reverse.to_i
+      end
+      
+      def total_debit_value
+        debit_records.inject(0) { |sum, record| sum + record.data[:amount].to_i }
+      end
+      
+      def total_credit_value
+        credit_records.inject(0) { |sum, record| sum + record.data[:amount].to_i }
+      end
+      
+      def no_debit_records
+        debit_records.count.to_s
+      end
+      
+      def no_credit_records
+        credit_records.count.to_s
+      end
+      
+      private
+      
+      def decorate_header
+        header.data[:bankserv_user_code] = Bankserv::Configuration.active.user_code
+        header.data[:bankserv_purge_date] = purge_date
+        header.data[:first_action_date] = first_action_date
+        header.data[:last_action_date] = last_action_date
+        header.save!
+      end
+      
+      def decorate_trailer          
+        trailer.data[:bankserv_user_code] = Bankserv::Configuration.active.user_code
+        trailer.data[:first_sequence_number] = transactions.first.data[:user_sequence_number].to_s
+        trailer.data[:last_sequence_number] = transactions.last.data[:user_sequence_number].to_s
+        trailer.data[:first_action_date] = first_action_date
+        trailer.data[:last_action_date] = last_action_date
+        trailer.data[:no_debit_records] = no_debit_records
+        trailer.data[:no_credit_records] = no_credit_records
+        trailer.data[:no_contra_records] = records.where(record_type: "contra_record").count.to_s
+        trailer.data[:total_debit_value] = total_debit_value.to_s
+        trailer.data[:total_credit_value] = total_debit_value.to_s
+        trailer.data[:hash_total_of_homing_account_numbers] = hash_total_of_homing_account_numbers.to_s
+        trailer.save!
+      end
+    end
+  end
+end