xrechnung 0.1.0

data/lib/xrechnung/allowance_charge.rb

@@ -0,0 +1,32 @@
+module Xrechnung
+  class AllowanceCharge
+    include MemberContainer
+
+    # @!attribute charge_indicator
+    #   @return [TrueClass, FalseClass]
+    member :charge_indicator, type: [TrueClass, FalseClass]
+
+    # @!attribute amount
+    #   @return [Xrechnung::Currency]
+    member :amount, type: Xrechnung::Currency
+
+    # @!attribute base_amount
+    #   @return [Xrechnung::Currency]
+    member :base_amount, type: Xrechnung::Currency
+
+    def initialize(**kwargs)
+      kwargs[:amount]      = Currency::EUR(kwargs[:amount])
+      kwargs[:base_amount] = Currency::EUR(kwargs[:base_amount])
+      super(**kwargs)
+    end
+
+    # noinspection RubyResolve
+    def to_xml(xml)
+      xml.cac :AllowanceCharge do
+        xml.cbc :ChargeIndicator, charge_indicator
+        xml.cbc :Amount, *amount.xml_args
+        xml.cbc :BaseAmount, *base_amount.xml_args
+      end
+    end
+  end
+end

data/lib/xrechnung/contact.rb

@@ -0,0 +1,26 @@
+module Xrechnung
+  class Contact
+    include MemberContainer
+
+    # @!attribute name
+    #   @return [String]
+    member :name, type: String
+
+    # @!attribute telephone
+    #   @return [String]
+    member :telephone, type: String
+
+    # @!attribute electronic_mail
+    #   @return [String]
+    member :electronic_mail, type: String
+
+    # noinspection RubyResolve
+    def to_xml(xml)
+      xml.cac :Contact do
+        xml.cbc :Name, name
+        xml.cbc :Telephone, telephone
+        xml.cbc :ElectronicMail, electronic_mail
+      end
+    end
+  end
+end

data/lib/xrechnung/currency.rb

@@ -0,0 +1,22 @@
+require "bigdecimal"
+require "bigdecimal/util"
+
+module Xrechnung
+  Currency = Struct.new(:currency_id, :value, keyword_init: true) do
+    def value_to_s
+      format("%0.2f", value)
+    end
+
+    def xml_args
+      [value_to_s, currencyID: currency_id]
+    end
+  end
+
+  class << Currency
+    def EUR(value)
+      raise ArgumentError, "value must respond to :to_d" unless value.respond_to? :to_d
+
+      Currency.new(currency_id: "EUR", value: value.to_d)
+    end
+  end
+end

data/lib/xrechnung/id.rb

@@ -0,0 +1,3 @@
+module Xrechnung
+  Id = Struct.new(:id, :scheme_id)
+end

data/lib/xrechnung/invoice_document_reference.rb

@@ -0,0 +1,20 @@
+module Xrechnung
+  class InvoiceDocumentReference
+    include MemberContainer
+
+    # @!attribute id
+    #   @return [String]
+    member :id, type: String
+
+    # @!attribute issue_date
+    #   @return [Date]
+    member :issue_date, type: Date
+
+    def to_xml(xml)
+      xml.cac :InvoiceDocumentReference do
+        xml.cbc :ID, id
+        xml.cbc :IssueDate, issue_date
+      end
+    end
+  end
+end

data/lib/xrechnung/invoice_line.rb

@@ -0,0 +1,41 @@
+module Xrechnung
+  class InvoiceLine
+    include MemberContainer
+
+    # @!attribute id
+    #   @return [Integer]
+    member :id, type: Integer
+
+    # @!attribute invoiced_quantity
+    #   @return [Xrechnung::Quantity]
+    member :invoiced_quantity, type: Xrechnung::Quantity
+
+    # @!attribute line_extension_amount
+    #   @return [Xrechnung::Currency]
+    member :line_extension_amount, type: Xrechnung::Currency
+
+    # @!attribute item
+    #   @return [Xrechnung::Item]
+    member :item, type: Xrechnung::Item
+
+    # @!attribute price
+    #   @return [Xrechnung::Price]
+    member :price, type: Xrechnung::Price
+
+    def initialize(**kwargs)
+      kwargs[:line_extension_amount] = Currency::EUR(kwargs[:line_extension_amount])
+      super(**kwargs)
+    end
+
+    # noinspection RubyResolve
+    def to_xml(xml)
+      xml.cac :InvoiceLine do
+        xml.cbc :ID, id
+        xml.cbc :InvoicedQuantity, invoiced_quantity.amount_to_s, unitCode: invoiced_quantity.unit_code
+        xml.cbc :LineExtensionAmount, *line_extension_amount.xml_args
+        item&.to_xml(xml)
+        price&.to_xml(xml)
+      end
+    end
+  end
+end

data/lib/xrechnung/item.rb

@@ -0,0 +1,40 @@
+module Xrechnung
+  class Item
+    include MemberContainer
+
+    # @!attribute description
+    #   @return [String]
+    member :description, type: String
+
+    # @!attribute name
+    #   @return [String]
+    member :name, type: String
+
+    # @!attribute standard_item_identification_id
+    #   @return [Xrechnung::Id]
+    member :standard_item_identification_id, type: Xrechnung::Id, optional: true
+
+    # @!attribute commodity_classification
+    #   @return [Xrechnung::TaxCategory]
+    member :commodity_classification, type: Xrechnung::TaxCategory
+
+    # @!attribute classified_tax_category
+    #   @return [Xrechnung::TaxCategory]
+    member :classified_tax_category, type: Xrechnung::TaxCategory
+
+    # noinspection RubyResolve
+    def to_xml(xml)
+      xml.cac :Item do
+        xml.cbc :Description, description
+        xml.cbc :Name, name
+        unless standard_item_identification_id.nil?
+          xml.cac :StandardItemIdentification do
+            xml.cbc :ID, standard_item_identification_id.id, schemeID: standard_item_identification_id.scheme_id
+          end
+        end
+        xml.cac :CommodityClassification, commodity_classification
+        classified_tax_category&.to_xml(xml, root_tag_name: :ClassifiedTaxCategory)
+      end
+    end
+  end
+end

data/lib/xrechnung/legal_monetary_total.rb

@@ -0,0 +1,51 @@
+module Xrechnung
+  class LegalMonetaryTotal
+    include MemberContainer
+
+    transform_currency = ->(v) {
+      Currency::EUR(v)
+    }
+
+    # @!attribute line_extension_amount
+    #   @return [Xrechnung::Currency]
+    member :line_extension_amount, type: Xrechnung::Currency, transform_value: transform_currency
+
+    # @!attribute tax_exclusive_amount
+    #   @return [Xrechnung::Currency]
+    member :tax_exclusive_amount, type: Xrechnung::Currency, transform_value: transform_currency
+
+    # @!attribute tax_inclusive_amount
+    #   @return [Xrechnung::Currency]
+    member :tax_inclusive_amount, type: Xrechnung::Currency, transform_value: transform_currency
+
+    # @!attribute allowance_total_amount
+    #   @return [Xrechnung::Currency]
+    member :allowance_total_amount, type: Xrechnung::Currency, transform_value: transform_currency
+
+    # @!attribute charge_total_amount
+    #   @return [Xrechnung::Currency]
+    member :charge_total_amount, type: Xrechnung::Currency, transform_value: transform_currency
+
+    # @!attribute prepaid_amount
+    #   @return [Xrechnung::Currency]
+    member :prepaid_amount, type: Xrechnung::Currency, transform_value: transform_currency
+
+    # @!attribute payable_rounding_amount
+    #   @return [Xrechnung::Currency]
+    member :payable_rounding_amount, type: Xrechnung::Currency, transform_value: transform_currency
+
+    # @!attribute payable_amount
+    #   @return [Xrechnung::Currency]
+    member :payable_amount, type: Xrechnung::Currency, transform_value: transform_currency
+
+    # noinspection RubyResolve
+    def to_xml(xml)
+      members.each do |member, _options|
+        next if self[member].nil?
+
+        xml.cbc :"#{member.to_s.split("_").map(&:capitalize).join}", *self[member].xml_args
+      end
+      xml.target!
+    end
+  end
+end

data/lib/xrechnung/member_container.rb

@@ -0,0 +1,68 @@
+module Xrechnung
+  module MemberContainer
+    def self.included(base)
+      base.instance_variable_set :@members, {}
+      base.extend ClassMethods
+    end
+
+    def initialize(**kwargs)
+      self.class.after_initialize.each do |block|
+        instance_eval(&block)
+      end
+
+      kwargs.each do |k, v|
+        self[k] = v
+      end
+    end
+
+    def members
+      self.class.instance_variable_get :@members
+    end
+
+    def [](key)
+      send(key)
+    end
+
+    def []=(key, value)
+      send(members[key].fetch(:setter_name), value)
+    end
+
+    module ClassMethods
+      # @param [String] member_name
+      # @param [Array<Class>, Class] type
+      # @param [Object] default
+      # @param [TrueClass, FalseClass] optional When true, omits tag rather than rendering an empty tag on nil
+      # @param [Proc] transform_value A Proc which is called with the input value to perform type conversion.
+      def member(member_name, type: nil, default: nil, optional: false, transform_value: nil)
+        attr_reader member_name
+        setter_name           = :"#{member_name}="
+        @members[member_name] = { optional: optional, setter_name: setter_name }
+
+        if default
+          after_initialize do
+            send(setter_name, default)
+          end
+        end
+
+        define_method setter_name do |in_value|
+          in_value = transform_value.call(in_value) if transform_value
+
+          if type && !in_value.nil? && Array(type).none? { |t| in_value.is_a?(t) }
+            raise ArgumentError, "expected #{type} for :#{member_name}, got: #{in_value.class}"
+          end
+
+          instance_variable_set :"@#{member_name}", in_value
+        end
+      end
+
+      def after_initialize(&block)
+        @after_initialize_blocks ||= []
+        if block
+          @after_initialize_blocks << block
+        else
+          @after_initialize_blocks
+        end
+      end
+    end
+  end
+end

data/lib/xrechnung/party.rb

@@ -0,0 +1,61 @@
+module Xrechnung
+  class Party
+    include MemberContainer
+
+    # @!attribute name
+    #   @return [String]
+    member :name, type: String
+
+    # @!attribute postal_address
+    #   @return [Xrechnung::PostalAddress]
+    member :postal_address, type: Xrechnung::PostalAddress
+
+    # @!attribute party_tax_scheme
+    #   @return [Xrechnung::PartyTaxScheme]
+    member :party_tax_scheme, type: Xrechnung::PartyTaxScheme
+
+    # @!attribute party_legal_entity
+    #   @return [Xrechnung::PartyLegalEntity]
+    member :party_legal_entity, type: Xrechnung::PartyLegalEntity
+
+    # @!attribute contact
+    #   @return [Xrechnung::Contact]
+    member :contact, type: Xrechnung::Contact
+
+    attr_accessor :nested
+
+    def initialize(nested: true, **kwargs)
+      super(**kwargs)
+      self.nested = nested
+    end
+
+    # noinspection RubyResolve
+    def to_xml(xml)
+      if nested
+        xml.cac :Party do
+          party_body(xml)
+        end
+      else
+        party_body(xml)
+      end
+    end
+
+    private
+
+    def party_body(xml)
+      unless name.nil? # if blank? -> empty name tag
+        xml.cac :PartyName do
+          if name == ""
+            xml.cbc :Name
+          else
+            xml.cbc :Name, name
+          end
+        end
+      end
+      postal_address&.to_xml(xml)
+      party_tax_scheme&.to_xml(xml)
+      party_legal_entity&.to_xml(xml)
+      contact&.to_xml(xml)
+    end
+  end
+end

data/lib/xrechnung/party_legal_entity.rb

@@ -0,0 +1,16 @@
+module Xrechnung
+  class PartyLegalEntity
+    include MemberContainer
+
+    # @!attribute registration_name
+    #   @return [String]
+    member :registration_name, type: String
+
+    # noinspection RubyResolve
+    def to_xml(xml)
+      xml.cac :PartyLegalEntity do
+        xml.cbc :RegistrationName, registration_name
+      end
+    end
+  end
+end

data/lib/xrechnung/party_tax_scheme.rb

@@ -0,0 +1,23 @@
+module Xrechnung
+  class PartyTaxScheme
+    include MemberContainer
+
+    # @!attribute company_id
+    #   @return [String]
+    member :company_id, type: String
+
+    # @!attribute tax_scheme_id
+    #   @return [String]
+    member :tax_scheme_id, type: String, default: "VAT"
+
+    # noinspection RubyResolve
+    def to_xml(xml)
+      xml.cac :PartyTaxScheme do
+        xml.cbc :CompanyID, company_id
+        xml.cac :TaxScheme do
+          xml.cbc :ID, tax_scheme_id
+        end
+      end
+    end
+  end
+end

data/lib/xrechnung/payee_financial_account.rb

@@ -0,0 +1,35 @@
+module Xrechnung
+  #   <cac:PayeeFinancialAccount>
+  #     <cbc:ID>DE12500105170648489890</cbc:ID>
+  #     <cbc:Name>Harry Hirsch</cbc:Name>
+  #     <cac:FinancialInstitutionBranch>
+  #       <cbc:ID>XUFUXHB</cbc:ID>
+  #     </cac:FinancialInstitutionBranch>
+  #   </cac:PayeeFinancialAccount>
+  class PayeeFinancialAccount
+    include MemberContainer
+
+    # @!attribute id
+    #   @return [String]
+    member :id, type: String
+
+    # @!attribute name
+    #   @return [String]
+    member :name, type: String
+
+    # @!attribute financial_institution_branch_id
+    #   @return [String]
+    member :financial_institution_branch_id, type: String
+
+    # noinspection RubyResolve
+    def to_xml(xml)
+      xml.cac :PayeeFinancialAccount do
+        xml.cbc :ID, id
+        xml.cbc :Name, name
+        xml.cac :FinancialInstitutionBranch do
+          xml.cbc :ID, financial_institution_branch_id
+        end
+      end
+    end
+  end
+end