hbci 0.2.0

data/lib/hbci/segments/hikazs.rb

@@ -0,0 +1,31 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HIKAZSv6 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element :max_entries
+      element :min_signatures
+      element :security_class
+      element_group :account do
+        element :retention_period
+        element :allowed_input_entry_quantity
+        element :allowed_request_all_accounts
+        element :data_format
+      end
+    end
+
+    class HIKAZSv7 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element :max_entries
+      element :min_signatures
+      element :security_class
+      element_group :account do
+        element :retention_period
+        element :allowed_input_entry_quantity
+        element :allowed_request_all_accounts
+        element :data_format
+      end
+    end
+  end
+end

data/lib/hbci/segments/hirmg.rb

@@ -0,0 +1,10 @@
+module Hbci
+  module Segments
+    class HIRMGv2 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      1.upto(99) do |i|
+        element_group "ret_val_#{i}".to_sym, type: ElementGroups::RetVal
+      end
+    end
+  end
+end

data/lib/hbci/segments/hirms.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HIRMSv2 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      1.upto(99) do |i|
+        element_group "ret_val_#{i}".to_sym, type: ElementGroups::RetVal
+      end
+
+      def allowed_tan_mechanism
+        groups_with_status_code = element_groups.select { |eg| eg.respond_to?(:code) && eg.code == '3920' }
+        groups_with_status_code.first.parm if groups_with_status_code.any?
+      end
+    end
+  end
+end

data/lib/hbci/segments/hisal.rb

@@ -0,0 +1,100 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HISALv3 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :ktv, type: ElementGroups::KTO
+      element :kontobez
+      element :curr
+      element_group :booked, type: ElementGroups::Saldo
+      element_group :pending, type: ElementGroups::Saldo
+      element_group :kredit, type: ElementGroups::BTG
+      element_group :available, type: ElementGroups::BTG
+      element_group :used, type: ElementGroups::BTG
+    end
+
+    class HISALv4 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :ktv, type: ElementGroups::KTO
+      element :kontobez
+      element :curr
+      element_group :booked, type: ElementGroups::Saldo
+      element_group :pending, type: ElementGroups::Saldo
+      element_group :kredit, type: ElementGroups::BTG
+      element_group :available, type: ElementGroups::BTG
+      element_group :used, type: ElementGroups::BTG
+      element :timestamp_date
+      element :timestamp_time
+
+      def booked_amount
+        sign = case booked.credit_debit
+               when 'C' then 1
+               when 'D' then -1
+               end
+        sign * Monetize.parse(booked.btg_value, booked.btg_curr)
+      end
+    end
+
+    class HISALv5 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :ktv, type: ElementGroups::KTV2
+      element :kontobez
+      element :curr
+      element_group :booked, type: ElementGroups::Saldo
+      element_group :pending, type: ElementGroups::Saldo
+      element_group :kredit, type: ElementGroups::BTG
+      element_group :available, type: ElementGroups::BTG
+      element_group :used, type: ElementGroups::BTG
+      element :timestamp_date
+      element :timestamp_time
+      element :duedate
+    end
+
+    class HISALv6 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :ktv, type: ElementGroups::KTV3
+      element :kontobez
+      element :curr
+      element_group :booked, type: ElementGroups::Saldo2
+      element_group :pending, type: ElementGroups::Saldo2
+      element_group :kredit, type: ElementGroups::BTG
+      element_group :available, type: ElementGroups::BTG
+      element_group :used, type: ElementGroups::BTG
+      element_group :overdrive, type: ElementGroups::BTG
+      element_group :timestamp, type: ElementGroups::Timestamp
+      element :duedate
+
+      def booked_amount
+        sign = case booked.credit_debit
+               when 'C' then 1
+               when 'D' then -1
+               end
+        sign * Monetize.parse(booked.value, booked.curr)
+      end
+    end
+
+    class HISALv7 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :ktv, type: ElementGroups::KTVInt
+      element :kontobez
+      element :curr
+      element_group :booked, type: ElementGroups::Saldo2
+      element_group :pending, type: ElementGroups::Saldo2
+      element_group :kredit, type: ElementGroups::BTG
+      element_group :available, type: ElementGroups::BTG
+      element_group :used, type: ElementGroups::BTG
+      element_group :overdrive, type: ElementGroups::BTG
+      element_group :timestamp, type: ElementGroups::Timestamp
+      element :duedate
+
+      def booked_amount
+        sign = case booked.credit_debit
+               when 'C' then 1
+               when 'D' then -1
+               end
+        sign * Monetize.parse(booked.value, booked.curr)
+      end
+    end
+  end
+end

data/lib/hbci/segments/hisals.rb

@@ -0,0 +1,19 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HISALSv4 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element :max_entries
+      element :min_signatures
+      element :security_class
+    end
+
+    class HISALSv7 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element :max_entries
+      element :min_signatures
+      element :security_class
+    end
+  end
+end

data/lib/hbci/segments/hisyn.rb

@@ -0,0 +1,11 @@
+module Hbci
+  module Segments
+    class HISYNv4 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element :system_id
+      element :msg_number
+      element :sec_ref_key
+      element :sec_ref_sig
+    end
+  end
+end

data/lib/hbci/segments/hiupa.rb

@@ -0,0 +1,12 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HIUPAv4 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element :user_id
+      element :upd_version
+      element :upd_usage
+    end
+  end
+end

data/lib/hbci/segments/hiupd.rb

@@ -0,0 +1,37 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HIUPDv5 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :ktv, type: ElementGroups::KTV2
+      element :customerid
+      element :acctype
+      element :cur
+      element :name1
+      element :name2
+      element :konto
+      element_group :k_limit, type: ElementGroups::KLimit
+      10.times do |i|
+        element_group "allowed_gv_#{i}".to_sym, type: ElementGroups::AllowedGV
+      end
+    end
+
+    class HIUPDv6 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :ktv, type: ElementGroups::KTV2
+      element :iban
+      element :user_id
+      element :account_type
+      element :currency
+      element :name_1
+      element :name_2
+      element :konto
+      element_group :k_limit, type: ElementGroups::KLimit
+      999.times do |i|
+        element_group "allowed_gv_#{i}".to_sym, type: ElementGroups::AllowedGV
+      end
+      element :accountdata
+    end
+  end
+end

data/lib/hbci/segments/hkend.rb

@@ -0,0 +1,14 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HKENDv1 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element :dialog_id
+
+      def compile
+        self.dialog_id = request_message.dialog.id
+      end
+    end
+  end
+end

data/lib/hbci/segments/hkidn.rb

@@ -0,0 +1,22 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HKIDNv2 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :bank do
+        element :country_code, default: 280
+        element :code # blz
+      end
+      element :user_id # "kunden_id"
+      element :system_id
+      element :state, default: 1
+
+      def compile
+        self.bank.code = Connector.instance.credentials.bank_code
+        self.user_id = Connector.instance.credentials.user_id
+        self.system_id = request_message.dialog ? request_message.dialog.system_id : 0
+      end
+    end
+  end
+end

data/lib/hbci/segments/hkkaz.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HKKAZv6 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :account, type: ElementGroups::KTV2
+      element :all_accounts, default: 'N'
+      element :from
+      element :to
+      element :max_entries
+      element :attach
+    end
+
+    class HKKAZv7 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :account, type: ElementGroups::KTVInt
+      element :all_accounts, default: 'N'
+      element :from
+      element :to
+      element :max_entries
+      element :attach
+    end
+  end
+end

data/lib/hbci/segments/hksal.rb

@@ -0,0 +1,31 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HKSALv4 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :account do
+        element :number
+        element :country, default: 280
+        element :code # blz
+      end
+      element :all_accounts, default: 'N'
+    end
+
+    class HKSALv6 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :account, type: ElementGroups::KTV2
+      element :all_accounts, default: 'N'
+      element :max_entries
+      element :attach
+    end
+
+    class HKSALv7 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element_group :account, type: ElementGroups::KTVInt
+      element :all_accounts, default: 'N'
+      element :max_entries
+      element :attach
+    end
+  end
+end

data/lib/hbci/segments/hksyn.rb

@@ -0,0 +1,12 @@
+module Hbci
+  module Segments
+    class HKSYNv3 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element :mode
+
+      def compile
+        self.mode = 0
+      end
+    end
+  end
+end

data/lib/hbci/segments/hkvvb.rb

@@ -0,0 +1,18 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HKVVBv3 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element :bpd_version, default: 0
+      element :upd_version, default: 0
+      element :dialog_language, default: 0
+      element :product_name, default: 'FintasticHBCI'
+      element :product_version, default: Hbci::VERSION
+
+      def compile
+        self.dialog_language = 1
+      end
+    end
+  end
+end

data/lib/hbci/segments/hnhbk.rb

@@ -0,0 +1,27 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HNHBKv3 < Segment
+      element_group :head, type: Hbci::ElementGroups::SegmentHead
+      element :message_size
+      element :hbci_version, default: 300
+      element :dialog_id
+      element :message_number
+      element_group :referenced_message do
+        element :dialog_id
+        element :message_number
+      end
+
+      def compile
+        self.message_size = '000000000000'
+        self.dialog_id = request_message.dialog ? request_message.dialog.id : 0
+        self.message_number = Connector.instance.message_number
+      end
+
+      def after_compile
+        self.message_size = request_message.to_s.size.to_s.rjust(12, '0')
+      end
+    end
+  end
+end

data/lib/hbci/segments/hnhbs.rb

@@ -0,0 +1,14 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    class HNHBSv1 < Segment
+      element_group :head, type: ElementGroups::SegmentHead
+      element :message_number
+
+      def compile
+        self.message_number = Connector.instance.message_number
+      end
+    end
+  end
+end

data/lib/hbci/segments/hnsha.rb

@@ -0,0 +1,31 @@
+# frozen_string_literal: true
+
+module Hbci
+  module Segments
+    # Signature Closing Segment
+    #
+    # Counterpart of the Signature Opening (HNSHK)
+    class HNSHAv2 < Hbci::Segment
+      # Segment Head
+      element_group :head, type: ElementGroups::SegmentHead
+
+      # Security Reference
+      # MUST be the same as in signature opening (HNSHK)
+      element :security_reference
+
+      # Security validation result. Empty when using pin/tan.
+      element :security_validation_result
+
+      # User signature
+      element_group :signature do
+        element :pin
+        element :tan
+      end
+
+      def compile
+        self.security_reference = request_message.sec_ref
+        signature.pin = Connector.instance.credentials.pin
+      end
+    end
+  end
+end