payment_dta 0.0.1

data/lib/payment_dta/dta_file.rb

@@ -0,0 +1,55 @@
+require 'set'
+require 'payment_dta/payments/total_record'
+class DTAFile
+  attr_reader :records
+  
+  def initialize(path, transaction_number = rand(100000000000).to_s)
+    @transaction_number = transaction_number.to_s
+    @path = path
+    @records = SortedSet.new
+  end
+  
+  def write_file
+    File.open(@path,"w") do |file|
+      @records.each{|record| file.puts record.to_dta}
+      file.puts build_total_record.to_dta
+    end
+  end
+  
+  def total
+    @records.inject(0) do |sum, record|
+      sum + record.amount.to_f
+    end
+  end
+  
+  def <<(record)
+    record.transaction_number = @transaction_number
+    @records << record
+    recalculate_output_sequence_numbers
+  end
+
+  def self.create(path)
+    dta_file = self.new(path)
+    yield dta_file
+    dta_file.write_file
+    dta_file
+  end
+  
+  private
+  
+  def recalculate_output_sequence_numbers
+    start = 1
+    @records.each do |record|
+      record.output_sequence_number = start
+      start += 1
+    end
+  end
+  
+  def build_total_record
+    TotalRecord.new(
+      :total_amount => total,
+      :data_file_sender_identification => @records.first.data_file_sender_identification
+    )
+  end
+
+end

data/lib/payment_dta/payment_sorting.rb

@@ -0,0 +1,19 @@
+module DTA
+  module Payment
+    module Sortable
+      include Comparable
+
+      def <=>(other)
+        if  requested_processing_date == other.requested_processing_date
+          if issuer_identification == other.issuer_identification
+            return ordering_party_bank_clearing_number <=> other.ordering_party_bank_clearing_number
+          else
+            return issuer_identification <=> other.issuer_identification
+          end
+        else
+          return requested_processing_date <=> other.requested_processing_date
+        end
+      end
+    end
+  end
+end

data/lib/payment_dta/payments/bank_cheque_payment.rb

@@ -0,0 +1,60 @@
+require 'payment_dta/payments/base'
+require 'payment_dta/payment_sorting'
+
+class BankChequePayment < DTA::Payments::Base
+  include DTA::Payment::Sortable
+  
+  def record
+    @record ||= segment1 + segment2 + segment3 + segment4 + segment5
+  end
+  
+  def transaction_type
+    '832'
+  end
+  
+  def payment_type
+    '0'
+  end
+  
+  def requested_processing_date
+    '000000'
+  end
+  
+  def payment_amount_value
+   @data[:payment_amount].to_s.ljust(15)
+  end
+  
+  def payment_amount_value_date
+   @data[:payment_amount_value_date].to_s.ljust(6)
+  end
+  
+  def convertion_rate
+    @data[:convertion_rate].to_s.ljust(12)
+  end
+  
+  def beneficiary_bank_account_number
+    '/C/'.ljust(24)
+  end
+  
+  protected
+  
+  def build_segment1
+   super + reference_number + account_to_be_debited + payment_amount + reserve_field(11)
+  end
+  
+  def build_segment2
+     super + convertion_rate + ordering_partys_address(24) + reserve_field(18)
+  end
+  
+  def build_segment3
+    super + beneficiary_bank_account_number + beneficiary_address(24) + reserve_field(6)
+  end
+  
+  def build_segment4
+    super + reason_for_payment_message(28) + reserve_field(14)
+  end
+  
+  def build_segment5
+    super + bank_payment_instructions + reserve_field(6)
+  end
+end

data/lib/payment_dta/payments/base.rb

@@ -0,0 +1,288 @@
+require 'date'
+require 'payment_dta/character_conversion'
+
+module DTA
+  module Payments
+    class Base
+      include DTA::CharacterConversion
+      
+      def initialize(data = {})
+        @data = data
+      end
+      
+      def to_dta
+        dta_string(record)
+      end
+
+      def segment1
+        @segment1 ||= build_segment1 
+      end
+
+      def segment2
+        @segment2 ||= build_segment2
+      end
+
+      def segment3
+        @segment3 ||= build_segment3
+      end
+      
+      def segment4
+        @segment4 ||= build_segment4
+      end
+
+      def segment5
+        @segment5 ||= build_segment5
+      end
+
+      def segment6
+        @segment6 ||= build_segment6
+      end
+      
+      def record
+        @record ||= segment1 + segment2 + segment3 + segment4 + segment5 + segment6
+      end
+
+      def header
+        @header ||= build_header
+      end
+      
+      def requested_processing_date
+        @data[:requested_processing_date].to_s
+      end
+
+      def beneficiary_bank_clearing_number
+        @data[:beneficiary_bank_clearing_number].to_s.ljust(12,' ')
+      end
+
+      def output_sequence_number
+        @output_sequence_number.to_s.rjust(5,'0')
+      end
+      
+      def output_sequence_number=(output_sequence_number)
+        @output_sequence_number = output_sequence_number
+      end
+
+      def creation_date
+        Date.today.strftime('%y%m%d')
+      end
+
+      def ordering_party_bank_clearing_number
+        @data[:ordering_party_bank_clearing_number].to_s.ljust(7,'0')
+      end
+
+      def data_file_sender_identification
+        if @data[:data_file_sender_identification].nil?
+          raise 'No file identification'
+        else
+          @data[:data_file_sender_identification]
+        end
+      end
+
+      def entry_sequence_number
+        @data[:entry_sequence_number].to_s.rjust(5,'0')
+      end
+
+      def payment_type
+        '1'
+      end
+
+      def processing_flag
+        '0'
+      end
+
+      def issuer_identification
+        @data[:issuer_identification].to_s
+      end
+
+      def transaction_number
+        (@transaction_number || @data[:transaction_number]).to_s.ljust(11,'0')
+      end
+
+      def transaction_number=(transaction_number)
+        @transaction_number = transaction_number
+      end
+
+      def reference_number
+        issuer_identification + transaction_number
+      end
+      
+      def account_to_be_debited
+        @data[:account_to_be_debited].to_s.ljust(24)
+      end
+      
+      def payment_amount
+        payment_amount_value_date + payment_amount_currency + payment_amount_value
+      end
+
+      def payment_amount_value_date
+        ''.ljust(6)
+      end
+
+      def payment_amount_currency
+        @data[:payment_amount_currency].to_s
+      end
+
+      def amount
+        @data[:payment_amount]
+      end
+
+      def payment_amount_value
+        @data[:payment_amount].to_s.ljust(12)
+      end
+
+      def ordering_partys_address(line_size=24)
+        ordering_partys_address_line1(line_size) + ordering_partys_address_line2(line_size) + ordering_partys_address_line3(line_size) + ordering_partys_address_line4(line_size)
+      end
+
+      def ordering_partys_address_line1(line_size = 24)
+        @data[:ordering_partys_address_line1].to_s.ljust(line_size)
+      end
+
+      def ordering_partys_address_line2(line_size = 24)
+        @data[:ordering_partys_address_line2].to_s.ljust(line_size)
+      end
+
+      def ordering_partys_address_line3(line_size = 24)
+        @data[:ordering_partys_address_line3].to_s.ljust(line_size)
+      end
+
+      def ordering_partys_address_line4(line_size = 24)
+        @data[:ordering_partys_address_line4].to_s.ljust(line_size)
+      end
+
+      def beneficiary_address(line_size=24)
+        beneficiary_address_line1(line_size) + beneficiary_address_line2(line_size) + beneficiary_address_line3(line_size) + beneficiary_address_line4(line_size)
+      end
+
+      def beneficiary_address_line1(line_size=24)
+        @data[:beneficiary_address_line1].to_s.ljust(line_size)
+      end
+
+      def beneficiary_address_line2(line_size=24)
+        @data[:beneficiary_address_line2].to_s.ljust(line_size)
+      end
+
+      def beneficiary_address_line3(line_size=24)
+        @data[:beneficiary_address_line3].to_s.ljust(line_size)
+      end
+
+      def beneficiary_address_line4(line_size=24)
+        @data[:beneficiary_address_line4].to_s.ljust(line_size)
+      end
+
+      def reason_for_payment_message(line_size=24)
+        reason_for_payment_message_line1(line_size) + reason_for_payment_message_line2(line_size) + reason_for_payment_message_line3(line_size) + reason_for_payment_message_line4(line_size)
+      end
+
+      def reason_for_payment_message_line1(line_size=24)
+        @data[:reason_for_payment_message_line1].to_s.ljust(line_size)
+      end
+
+      def reason_for_payment_message_line2(line_size=24)
+        @data[:reason_for_payment_message_line2].to_s.ljust(line_size)
+      end
+
+      def reason_for_payment_message_line3(line_size=24)
+        @data[:reason_for_payment_message_line3].to_s.ljust(line_size)
+      end
+
+      def reason_for_payment_message_line4(line_size=24)
+        @data[:reason_for_payment_message_line4].to_s.ljust(line_size)
+      end
+      
+      def bank_payment_instructions
+        @data[:bank_payment_instructions].to_s.ljust(120)
+      end
+      
+      def identification_bank_address
+        @data[:identification_bank_address].to_s
+      end
+
+      def beneficiary_bank_account_number
+        "/C/#{@data[:beneficiary_bank_account_number].to_s}".ljust(24)
+      end
+
+      def beneficiary_institution_bank_account_number
+        "/C/#{@data[:beneficiary_institution_bank_account_number]}".ljust(24)
+      end
+
+      def beneficiary_institution_address(line_size=24)
+        if identification_bank_address == 'A'
+          @data[:beneficiarys_institution_swift_address_].to_s.ljust(24) + ''.ljust(72)
+        else
+          beneficiary_institution_address_line1 + beneficiary_institution_address_line2 + beneficiary_institution_address_line3 + beneficiary_institution_address_line4
+        end
+      end
+
+      def beneficiary_institution_address_line1
+       @data[:beneficiary_institution_address_line1].to_s.ljust(24)
+      end
+
+      def beneficiary_institution_address_line2
+       @data[:beneficiary_institution_address_line2].to_s.ljust(24)
+      end
+
+      def beneficiary_institution_address_line3
+       @data[:beneficiary_institution_address_line3].to_s.ljust(24)
+      end
+
+      def beneficiary_institution_address_line4
+       @data[:beneficiary_institution_address_line4].to_s.ljust(24)
+      end
+      
+      def beneficiary_iban_number
+        @data[:beneficiary_iban_number].to_s.ljust(34)
+      end
+      
+      def identification_purpose
+        @data[:identification_purpose].to_s[0,1]
+      end
+
+      def purpose
+        if identification_purpose == 'I'
+          @data[:purpose_structured_reference_number].to_s.ljust(105)
+        else
+          @data[:purpose_line_1].to_s.ljust(35) + @data[:purpose_line_2].to_s.ljust(35) + @data[:purpose_line_3].to_s.ljust(35)
+        end
+      end
+
+      def rule_of_charge
+        @data[:rule_of_charge].to_s[0,1]
+      end
+     
+      protected
+
+      def build_segment1
+        '01'+ header
+      end
+
+      def build_segment2
+        '02'
+      end
+
+      def build_segment3
+        '03'
+      end
+      
+      def build_segment4
+        '04'
+      end
+
+      def build_segment5
+        '05'
+      end
+      
+      def build_segment6
+        '06'
+      end
+      
+      def build_header
+        requested_processing_date + beneficiary_bank_clearing_number + output_sequence_number + creation_date + ordering_party_bank_clearing_number + data_file_sender_identification + entry_sequence_number + transaction_type + payment_type + processing_flag    
+      end
+      
+      def reserve_field(length = 14)
+       ''.ljust(length)
+      end
+    end 
+  end
+end

data/lib/payment_dta/payments/domestic_chf_payment.rb

@@ -0,0 +1,67 @@
+require 'payment_dta/payments/base'
+require 'payment_dta/payment_sorting'
+
+class DomesticCHFPayment < DTA::Payments::Base
+  include DTA::Payment::Sortable
+  
+  def record
+    @record ||= segment1 + segment2 + segment3 + segment4 + segment5
+  end
+    
+  def transaction_type
+    '827'
+  end
+  
+  def payment_type
+    '0'
+  end
+  
+  def beneficiarys_bank_account_number
+    "/C/#{@data[:beneficiarys_bank_account_number]}".ljust(30)
+  end
+  
+  def end_beneficiary_address
+    end_beneficiary_address_line1 + end_beneficiary_address_line2 + end_beneficiary_address_line3 + end_beneficiary_address_line4
+  end
+  
+  def end_beneficiary_address_line1
+    @data[:end_beneficiary_address_line1].to_s.ljust(24)
+  end
+  
+  def end_beneficiary_address_line2
+    @data[:end_beneficiary_address_line2].to_s.ljust(24)
+  end
+  
+  def end_beneficiary_address_line3
+    @data[:end_beneficiary_address_line3].to_s.ljust(24)
+  end
+  
+  def end_beneficiary_address_line4
+    @data[:end_beneficiary_address_line4].to_s.ljust(24)
+  end
+  
+  def end_beneficiarys_bank_account_number
+    "/C/#{@data[:end_beneficiarys_bank_account_number]}".ljust(30)
+  end
+  protected
+
+  def build_segment1
+   super + reference_number + account_to_be_debited + payment_amount + reserve_field(14)
+  end
+  
+  def build_segment2
+     super + ordering_partys_address + reserve_field(30)
+  end
+  
+  def build_segment3
+    super + beneficiarys_bank_account_number + beneficiary_address
+  end
+  
+  def build_segment4
+    super + reason_for_payment_message(28) + reserve_field(14)
+  end
+  
+  def build_segment5
+    super + end_beneficiarys_bank_account_number + end_beneficiary_address
+  end
+end