rconomic 0.1.0 → 0.2.0

data/README.md

@@ -63,9 +63,10 @@ Not even remotely... For now, limited to a small subset of all the [available op
 
                        | Create | Read | Update
     -------------------+--------+------+-------
-    Debtor             | X      | X    | X
     CurrentInvoice     | X      | X    | X
     CurrentInvoiceLine | X      | X    | X
+    Debtor             | X      | X    | X
+    DebtorContact      | X      | X    | X
 
 
 Credits

data/lib/economic/current_invoice.rb

@@ -2,9 +2,29 @@ require 'economic/entity'
 
 module Economic
 
-  # Current invoices are invoices that are not yet booked. They are therefore not read-only.
+  # CurrentInvoices are invoices that are not yet booked. They are therefore not read-only.
   #
-  # http://www.e-conomic.com/apidocs/Documentation/T_Economic_Api_ICurrentInvoice.html
+  # API documentation: http://www.e-conomic.com/apidocs/Documentation/T_Economic_Api_ICurrentInvoice.html
+  #
+  # Examples
+  #
+  #   # Create invoice for debtor:
+  #   invoice = debtor.current_invoices.build
+  #   invoice.date = Time.now
+  #   invoice.due_date = Time.now + 15
+  #   invoice.exchange_rate = 100
+  #   invoice.is_vat_included = false
+  #
+  #   # Add a line to the invoice
+  #   invoice_line = invoice.lines.build
+  #   invoice_line.description = 'Line on invoice'
+  #   invoice_line.unit_handle = { :number => 1 }
+  #   invoice_line.product_handle = { :number => 101 }
+  #   invoice_line.quantity = 12
+  #   invoice_line.unit_net_price = 19.95
+  #   invoice.lines << invoice_line
+  #
+  #   invoice.save
   class CurrentInvoice < Entity
     has_properties :id, :debtor_handle, :debtor_name, :debtor_address, :debtor_postal_code, :debtor_city, :debtor_country, :date, :term_of_payment_handle, :due_date, :currency_handle, :exchange_rate, :is_vat_included, :layout_handle, :delivery_date, :net_amount, :vat_amount, :gross_amount, :margin, :margin_as_percent
 
@@ -12,6 +32,25 @@ module Economic
       super
     end
 
+    def debtor
+      return nil if debtor_handle.blank?
+      @debtor ||= session.debtors.find(debtor_handle)
+    end
+
+    def debtor=(debtor)
+      self.debtor_handle = debtor.handle
+      @debtor = debtor
+    end
+
+    def debtor_handle=(handle)
+      @debtor = nil unless handle == @debtor_handle
+      @debtor_handle = handle
+    end
+
+    def handle
+      Handle.new(:id => @id)
+    end
+
     # Returns the current invoice lines of CurrentInvoice
     def lines
       @lines ||= CurrentInvoiceLineProxy.new(self)
@@ -40,7 +79,7 @@ module Economic
       data = ActiveSupport::OrderedHash.new
 
       data['Id'] = id
-      data['DebtorHandle'] = { 'Number' => debtor_handle[:number] } unless debtor_handle.blank?
+      data['DebtorHandle'] = debtor.handle.to_hash unless debtor.blank?
       data['DebtorName'] = debtor_name
       data['DebtorAddress'] = debtor_address unless debtor_address.blank?
       data['DebtorPostalCode'] = debtor_postal_code unless debtor_postal_code.blank?
@@ -69,7 +108,7 @@ module Economic
 
       self.lines.each do |invoice_line|
         invoice_line.session = session
-        invoice_line.invoice_handle = { :id => id }
+        invoice_line.invoice = self
         invoice_line.save
       end
     end

data/lib/economic/current_invoice_line.rb

@@ -3,9 +3,33 @@ require 'economic/current_invoice'
 
 module Economic
 
+  # Represents a current invoice line.
+  #
+  # API documentation: http://www.e-conomic.com/apidocs/Documentation/T_Economic_Api_ICurrentInvoiceLine.html
+  #
+  # See Economic::CurrentInvoice for usage example
   class CurrentInvoiceLine < Entity
     has_properties :invoice_handle, :description, :delivery_date, :unit_handle, :product_handle, :quantity, :unit_net_price, :discount_as_percent, :unit_cost_price, :total_net_amount, :total_margin, :margin_as_percent
 
+    def handle
+      Handle.new(:number => number)
+    end
+
+    def invoice
+      return nil if invoice_handle.blank?
+      @invoice ||= session.current_invoices.find(invoice_handle)
+    end
+
+    def invoice=(invoice)
+      self.invoice_handle = invoice.handle
+      @invoice = invoice
+    end
+
+    def invoice_handle=(handle)
+      @invoice = nil unless handle == @invoice_handle
+      @invoice_handle = handle
+    end
+
     def initialize_defaults
       self.invoice_handle = nil
       self.description = nil
@@ -27,7 +51,7 @@ module Economic
       data = ActiveSupport::OrderedHash.new
 
       data['Number'] = 0 # Doesn't seem to be used
-      data['InvoiceHandle'] = { 'Id' => invoice_handle[:id] } unless invoice_handle.blank?
+      data['InvoiceHandle'] = invoice.handle.to_hash unless invoice.blank?
       data['Description'] = description unless description.blank?
       data['DeliveryDate'] = delivery_date
       data['UnitHandle'] = { 'Number' => unit_handle[:number] } unless unit_handle.blank?

data/lib/economic/debtor.rb

@@ -2,9 +2,39 @@ require 'economic/entity'
 
 module Economic
 
+  # Represents a debtor in E-conomic.
+  #
+  # API documentation: http://www.e-conomic.com/apidocs/Documentation/T_Economic_Api_IDebtor.html
+  #
+  # Examples
+  #
+  #   # Find a debtor:
+  #   debtor = economic.debtors.find(558)
+  #
+  #   # Creating a debtor:
+  #   debtor = economic.debtors.build
+  #   debtor.number = economic.debtors.next_available_number
+  #   debtor.debtor_group_handle = { :number => 1 }
+  #   debtor.name = 'Apple Inc'
+  #   debtor.vat_zone = 'HomeCountry' # HomeCountry, EU, Abroad
+  #   debtor.currency_handle = { :code => 'DKK' }
+  #   debtor.price_group_handle = { :number => 1 }
+  #   debtor.is_accessible = true
+  #   debtor.ci_number = '12345678'
+  #   debtor.term_of_payment_handle = { :id => 1 }
+  #   debtor.layout_handle = { :id => 16 }
+  #   debtor.save
   class Debtor < Entity
     has_properties :handle, :number, :debtor_group_handle, :name, :vat_zone, :currency_handle, :price_group_handle, :is_accessible, :ean, :public_entry_number, :email, :telephone_and_fax_number, :website, :address, :postal_code, :city, :country, :credit_maximum, :vat_number, :county, :ci_number, :term_of_payment_handle, :layout_handle, :attention_handle, :your_reference_handle, :our_reference_handle, :balance
 
+    def handle
+      Handle.new({:number => @number})
+    end
+
+    def contacts
+      @contacts ||= DebtorContactProxy.new(self)
+    end
+
     # Provides access to the current invoices - ie invoices that haven't yet been booked
     def current_invoices
       @current_invoices ||= CurrentInvoiceProxy.new(self)
@@ -15,8 +45,8 @@ module Economic
     def build_soap_data
       data = ActiveSupport::OrderedHash.new
 
-      data['Handle'] = { 'Number' => number }
-      data['Number'] = number
+      data['Handle'] = handle.to_hash
+      data['Number'] = handle.number
       data['DebtorGroupHandle'] = { 'Number' => debtor_group_handle[:number] } unless debtor_group_handle.blank?
       data['Name'] = name
       data['VatZone'] = vat_zone

data/lib/economic/debtor_contact.rb

@@ -0,0 +1,64 @@
+require 'economic/entity'
+
+module Economic
+
+  # Represents a debtor contact.
+  #
+  # API documentation: http://www.e-conomic.com/apidocs/Documentation/T_Economic_Api_IDebtorContact.html
+  #
+  # Examples
+  #
+  #   # Find contact
+  #   contact = economic.contacts.find(5)
+  #
+  #   # Creating a contact
+  #   contact = debtor.contacts.build
+  #   contact.id = 0
+  #   contact.number = 0
+  #   contact.name = 'John Appleseed'
+  #   contact.save
+  class DebtorContact < Entity
+    has_properties :handle, :id, :debtor_handle, :name, :number, :telephone_number, :email, :comments, :external_id, :is_to_receive_email_copy_of_order, :is_to_receive_email_copy_of_invoice
+
+    def debtor
+      return nil if debtor_handle.blank?
+      @debtor ||= session.debtors.find(debtor_handle)
+    end
+
+    def debtor=(debtor)
+      self.debtor_handle = debtor.handle
+      @debtor = debtor
+    end
+
+    def debtor_handle=(handle)
+      @debtor = nil unless handle == @debtor_handle
+      @debtor_handle = handle
+    end
+
+    def handle
+      Handle.new({:id => @id})
+    end
+
+    protected
+
+    def build_soap_data
+      data = ActiveSupport::OrderedHash.new
+
+      data['Handle'] = handle.to_hash
+      data['Id'] = handle.id
+      data['DebtorHandle'] = debtor.handle.to_hash unless debtor.blank?
+      data['Name'] = name
+      data['Number'] = number unless number.blank?
+      data['TelephoneNumber'] = telephone_number unless telephone_number.blank?
+      data['Email'] = email unless email.blank?
+      data['Comments'] = comments unless comments.blank?
+      data['ExternalId'] = external_id unless external_id.blank?
+      data['IsToReceiveEmailCopyOfOrder'] = is_to_receive_email_copy_of_order || false
+      data['IsToReceiveEmailCopyOfInvoice'] = is_to_receive_email_copy_of_invoice || false
+
+      return data
+    end
+
+  end
+
+end

data/lib/economic/entity.rb

@@ -1,8 +1,30 @@
+module Economic
+  class Entity
+    class Handle
+      attr_accessor :id, :number
 
+      def initialize(hash)
+        @id = hash[:id]
+        @number = hash[:number]
+      end
 
-module Economic
+      def to_hash
+        hash = {}
+        hash['Id'] = id unless id.blank?
+        hash['Number'] = number unless number.blank?
+        hash
+      end
 
-  class Entity
+      def [](key)
+        {:id => @id, :number => @number}[key]
+      end
+
+      def ==(other)
+        return false if other.nil?
+        return false unless other.respond_to?(:id) && other.respond_to?(:number)
+        self.id == other.id && self.number == other.number
+      end
+    end
 
     # Internal accessors
     attr_accessor :persisted, :session, :partial
@@ -36,6 +58,13 @@ module Economic
         @properties || []
       end
 
+      # Returns the class used to instantiate a proxy for Entity
+      def proxy
+        class_name = name.split('::').last
+        proxy_class_name = "#{class_name}Proxy"
+        Economic.const_get(proxy_class_name)
+      end
+
       # Returns the E-conomic API action name to call
       def soap_action(action)
         class_name = self.name
@@ -44,6 +73,10 @@ module Economic
       end
     end
 
+    def handle
+      Handle.new({:number => @number, :id => @id})
+    end
+
     def initialize(properties = {})
       initialize_defaults
       update_properties(properties)
@@ -57,13 +90,7 @@ module Economic
 
     # Updates Entity with its data from the API
     def get_data
-      response = session.request soap_action(:get_data) do
-        soap.body = {
-          'entityHandle' => {
-            'Number' => number
-          }
-        }
-      end
+      response = proxy.get_data(number)
       self.update_properties(response)
       self.partial = false
       self.persisted = true
@@ -97,6 +124,13 @@ module Economic
       !!@partial
     end
 
+    # Returns a proxy for entities of the current class. For example if called on an
+    # Economic::Debtor it returns an instance of Economic::DebtorProxy with the Debtors session as
+    # owner.
+    def proxy
+      self.class.proxy.new(session)
+    end
+
     def inspect
       props = self.class.properties.collect { |p| "#{p}=#{self.send(p).inspect}" }
       "#<#{self.class}:#{self.object_id} partial=#{partial?}, persisted=#{persisted?}, #{props.join(', ')}>"
@@ -128,7 +162,7 @@ module Economic
     end
 
     def create
-      response = session.request soap_action('CreateFromData') do
+      response = session.request soap_action(:create_from_data) do
         soap.body = {'data' => build_soap_data}
       end
 

data/lib/economic/proxies/current_invoice_line_proxy.rb

@@ -2,13 +2,6 @@ require 'economic/proxies/entity_proxy'
 
 module Economic
   class CurrentInvoiceLineProxy < EntityProxy
-    class << self
-      # Returns the class this proxy is a proxy for
-      def entity_class
-        CurrentInvoiceLine
-      end
-    end
-
     # Returns a new, unpersisted Economic::CurrentInvoiceLine
     def build(properties = {})
       invoice_line = super
@@ -20,7 +13,7 @@ module Economic
 
     # Initialize properties in invoice_line with values from owner
     def initialize_properties_with_values_from_owner(invoice_line)
-      invoice_line.invoice_handle = owner.handle
+      invoice_line.invoice = owner
       invoice_line
     end
 

data/lib/economic/proxies/current_invoice_proxy.rb

@@ -2,13 +2,6 @@ require 'economic/proxies/entity_proxy'
 
 module Economic
   class CurrentInvoiceProxy < EntityProxy
-    class << self
-      # Returns the class this proxy is a proxy for
-      def entity_class
-        CurrentInvoice
-      end
-    end
-
     # Returns a new, unpersisted Economic::CurrentInvoice
     def build(properties = {})
       invoice = super
@@ -20,7 +13,7 @@ module Economic
 
     # Initialize properties in invoice with values from owner
     def initialize_properties_with_values_from_owner(invoice)
-      invoice.debtor_handle = owner.handle
+      invoice.debtor = owner
 
       invoice.debtor_name         ||= owner.name
       invoice.debtor_address      ||= owner.address

data/lib/economic/proxies/debtor_contact_proxy.rb

@@ -0,0 +1,38 @@
+require 'economic/proxies/entity_proxy'
+
+module Economic
+  class DebtorContactProxy < EntityProxy
+
+    # Returns a new, unpersisted Economic::DebtorContact
+    def build(properties = {})
+      contact = super
+      initialize_properties_with_values_from_owner(contact) if owner.is_a?(Debtor)
+      contact
+    end
+
+    # Gets data for DebtorContact from the API
+    def find(id)
+      # This is basically EntityProxy::find duplicated so we can pass id to the API instead of
+      # Number...
+      entity_hash = session.request entity_class.soap_action(:get_data)  do
+        soap.body = {
+          'entityHandle' => {
+            'Id' => id
+          }
+        }
+      end
+      entity = build(entity_hash)
+      entity.persisted = true
+      entity
+    end
+
+  private
+
+    # Initialize properties in contact with values from owner. Returns contact.
+    def initialize_properties_with_values_from_owner(contact)
+      contact.debtor = owner
+      contact
+    end
+
+  end
+end

data/lib/economic/proxies/debtor_proxy.rb

@@ -2,17 +2,10 @@ require 'economic/proxies/entity_proxy'
 
 module Economic
   class DebtorProxy < EntityProxy
-    class << self
-      # Returns the class this proxy is a proxy for
-      def entity_class
-        Debtor
-      end
-    end
-
     # Returns Debtors that have the given ci_number. The Debtor objects will only be partially loaded
     def find_by_ci_number(ci_number)
       # Get a list of DebtorHandles from e-conomic
-      response = session.request self.class.entity_class.soap_action('FindByCINumber') do
+      response = session.request entity_class.soap_action('FindByCINumber') do
         soap.body = {
           'ciNumber' => ci_number
         }

data/lib/economic/proxies/entity_proxy.rb

@@ -3,7 +3,9 @@ module Economic
     class << self
       # Returns the class this Proxy is a proxy for
       def entity_class
-        Entity
+        proxy_class_name = name.split('::').last
+        entity_class_name = proxy_class_name.sub(/Proxy$/, '')
+        Economic.const_get(entity_class_name)
       end
     end
 
@@ -30,20 +32,31 @@ module Economic
       entity
     end
 
-    # Gets data for Entity from the API
-    def find(number)
-      entity_hash = session.request self.class.entity_class.soap_action(:get_data)  do
-        soap.body = {
-          'entityHandle' => {
-            'Number' => number
-          }
-        }
-      end
+    # Returns the class this proxy manages
+    def entity_class
+      self.class.entity_class
+    end
+
+    # Fetches Entity data from API and returns an Entity initialized with that data
+    def find(handle)
+      handle = Entity::Handle.new(:number => handle) unless handle.is_a?(Entity::Handle)
+      entity_hash = get_data(handle)
       entity = build(entity_hash)
       entity.persisted = true
       entity
     end
 
+    # Gets data for Entity from the API. Returns Hash with the response data
+    def get_data(handle)
+      handle = Entity::Handle.new(:number => handle) unless handle.is_a?(Entity::Handle)
+      entity_hash = session.request(entity_class.soap_action(:get_data)) do
+        soap.body = {
+          'entityHandle' => handle.to_hash
+        }
+      end
+      entity_hash
+    end
+
     # Add item to proxy
     def <<(item)
       items << item

data/lib/economic/session.rb

@@ -28,6 +28,11 @@ module Economic
       client.http.headers["Cookie"] = response.http.headers["Set-Cookie"]
     end
 
+    # Provides access to the DebtorContacts
+    def contacts
+      @contacts ||= DebtorContactProxy.new(self)
+    end
+
     # Provides access to the current invoices - ie invoices that haven't yet been booked
     def current_invoices
       @current_invoices ||= CurrentInvoiceProxy.new(self)

data/lib/rconomic/version.rb

@@ -1,3 +1,3 @@
 module Rconomic
-  VERSION = "0.1.0"
+  VERSION = "0.2.0"
 end

data/lib/rconomic.rb

@@ -5,12 +5,14 @@ require 'active_support/ordered_hash'
 
 require 'economic/session'
 require 'economic/debtor'
+require 'economic/debtor_contact'
 require 'economic/current_invoice'
 require 'economic/current_invoice_line'
 
 require 'economic/proxies/current_invoice_proxy'
 require 'economic/proxies/current_invoice_line_proxy'
 require 'economic/proxies/debtor_proxy'
+require 'economic/proxies/debtor_contact_proxy'
 
 # http://www.e-conomic.com/apidocs/Documentation/index.html
 # https://www.e-conomic.com/secure/api1/EconomicWebService.asmx

data/spec/economic/current_invoice_line_spec.rb

@@ -7,4 +7,15 @@ describe Economic::CurrentInvoiceLine do
   it "inherits from Economic::Entity" do
     Economic::CurrentInvoiceLine.ancestors.should include(Economic::Entity)
   end
+
+  describe ".proxy" do
+    it "should return a CurrentInvoiceLineProxy" do
+      subject.proxy.should be_instance_of(Economic::CurrentInvoiceLineProxy)
+    end
+
+    it "should return a proxy owned by session" do
+      subject.proxy.session.should == session
+    end
+  end
+
 end

data/spec/economic/current_invoice_spec.rb

@@ -15,6 +15,16 @@ describe Economic::CurrentInvoice do
     end
   end
 
+  describe ".proxy" do
+    it "should return a CurrentInvoiceProxy" do
+      subject.proxy.should be_instance_of(Economic::CurrentInvoiceProxy)
+    end
+
+    it "should return a proxy owned by session" do
+      subject.proxy.session.should == session
+    end
+  end
+
   describe "save" do
     context "when successful" do
       before :each do
@@ -32,7 +42,7 @@ describe Economic::CurrentInvoice do
 
         it "adds the lines to the invoice" do
           subject.lines.each do |line|
-            line.expects(:invoice_handle=).with({:id => '42'})
+            line.expects(:invoice=).with(subject)
           end
 
           subject.save

data/spec/economic/debtor_contact_spec.rb

@@ -0,0 +1,106 @@
+require './spec/spec_helper'
+
+describe Economic::DebtorContact do
+  let(:session) { make_session }
+  subject { Economic::DebtorContact.new(:session => session) }
+
+  it "inherits from Economic::Entity" do
+    Economic::DebtorContact.ancestors.should include(Economic::Entity)
+  end
+
+  context "when saving" do
+    context "when debtor contact is new" do
+      subject { Economic::DebtorContact.new(:session => session) }
+
+      context "when debtor_handle is nil" do
+        before :each do
+          subject.debtor_handle = nil
+        end
+
+        it "should send request and let e-conomic return an error" do
+          session.expects(:request)
+          subject.save
+        end
+      end
+    end
+  end
+
+  describe ".debtor" do
+    context "when debtor_handle is not set" do
+      it "returns nil" do
+        subject.debtor.should be_nil
+      end
+    end
+
+    context "when debtor_handle is set" do
+      let(:handle) { Economic::DebtorContact::Handle.new({:number => 42}) }
+
+      before :each do
+        subject.debtor_handle = handle
+      end
+
+      it "returns a Debtor" do
+        session.debtors.expects(:find).with(handle).returns(Economic::Debtor.new)
+        subject.debtor.should be_instance_of(Economic::Debtor)
+      end
+
+      it "only looks up the debtor the first time" do
+        session.debtors.expects(:find).with(handle).returns(Economic::Debtor.new)
+        subject.debtor.should === subject.debtor
+      end
+    end
+  end
+
+  describe ".debtor=" do
+    let(:debtor) { make_debtor }
+    it "should set debtor_handle" do
+      subject.debtor = debtor
+      subject.debtor_handle.should == debtor.handle
+    end
+  end
+
+  describe ".debtor_handle=" do
+    let(:debtor) { make_debtor }
+    let(:handle) { debtor.handle }
+
+    it "should set debtor_handle" do
+      subject.debtor_handle = handle
+      subject.debtor_handle.should == handle
+    end
+
+    context "when debtor handle is for a different Debtor" do
+      before :each do
+        subject.debtor = debtor
+      end
+
+      it "should clear cached debtor and fetch the new debtor from API" do
+        savon.stubs('Debtor_GetData').returns(:success)
+        subject.debtor_handle = Economic::Debtor::Handle.new({:number => 1234})
+        subject.debtor.should be_instance_of(Economic::Debtor)
+      end
+    end
+
+    context "when debtor handle is for the current Debtor" do
+      before :each do
+        subject.debtor = debtor
+      end
+
+      it "should not clear cached debtor nor fetch the debtor from API" do
+        savon.stubs('Debtor_GetData').never
+        subject.debtor_handle = handle
+        subject.debtor.should be_instance_of(Economic::Debtor)
+      end
+    end
+  end
+
+  describe ".proxy" do
+    it "should return a DebtorContactProxy" do
+      subject.proxy.should be_instance_of(Economic::DebtorContactProxy)
+    end
+
+    it "should return a proxy owned by session" do
+      subject.proxy.session.should == session
+    end
+  end
+
+end

data/spec/economic/debtor_spec.rb

@@ -8,6 +8,16 @@ describe Economic::Debtor do
     Economic::Debtor.ancestors.should include(Economic::Entity)
   end
 
+  describe "class methods" do
+    subject { Economic::Debtor }
+
+    describe ".proxy" do
+      it "should return DebtorProxy" do
+        subject.proxy.should == Economic::DebtorProxy
+      end
+    end
+  end
+
   context "when saving" do
     context "when debtor is new" do
       subject { Economic::Debtor.new(:session => session) }
@@ -40,4 +50,29 @@ describe Economic::Debtor do
     end
   end
 
+  describe ".contacts" do
+    it "returns a DebtorContactProxy" do
+      subject.contacts.should be_instance_of(Economic::DebtorContactProxy)
+    end
+
+    it "memoizes the proxy" do
+      subject.contacts.should === subject.contacts
+    end
+
+    it "should store the session" do
+      subject.session.should_not be_nil
+      subject.contacts.session.should == subject.session
+    end
+  end
+
+  describe ".proxy" do
+    it "should return a DebtorProxy" do
+      subject.proxy.should be_instance_of(Economic::DebtorProxy)
+    end
+
+    it "should return a proxy owned by session" do
+      subject.proxy.session.should == session
+    end
+  end
+
 end

data/spec/economic/entity_spec.rb

@@ -4,8 +4,12 @@ class SpecEntity < Economic::Entity
   has_properties :foo, :baz
 
   def existing_method; end
+
+  def proxy; Economic::SpecEntityProxy.new(session); end
 end
 
+class Economic::SpecEntityProxy < Economic::EntityProxy; end
+
 describe Economic::Entity do
   let(:session) { make_session }
 
@@ -150,6 +154,14 @@ describe Economic::Entity do
     end
   end
 
+  describe ".proxy" do
+    subject { (e = SpecEntity.new).tap { |e| e.session = session } }
+
+    it "should return SpecEntityProxy" do
+      subject.proxy.should be_instance_of(Economic::SpecEntityProxy)
+    end
+  end
+
   describe "update" do
     subject { (e = SpecEntity.new).tap { |e| e.persisted = true; e.session = session } }
 
@@ -177,3 +189,24 @@ describe Economic::Entity do
   end
 end
 
+describe Economic::Entity::Handle do
+
+  describe "equality" do
+    let(:handle_a) { Economic::Entity::Handle.new(:id => 1, :number => 2) }
+    let(:handle_b) { Economic::Entity::Handle.new(:id => 1, :number => 2) }
+    let(:handle_c) { Economic::Entity::Handle.new(:id => 1) }
+    let(:handle_d) { Economic::Entity::Handle.new(:id => 1, :number => 3) }
+
+    it "should be equal when both id and number are equal" do
+      handle_a.should == handle_b
+    end
+
+    it "should not be equal when id or number is missing" do
+      handle_a.should_not == handle_c
+    end
+
+    it "should not be equal when id or number is equal and the other isn't" do
+      handle_a.should_not == handle_d
+    end
+  end
+end

data/spec/economic/proxies/debtor_contact_proxy_spec.rb

@@ -0,0 +1,55 @@
+require './spec/spec_helper'
+
+describe Economic::DebtorContactProxy do
+  let(:session) { make_session }
+  subject { Economic::DebtorContactProxy.new(session) }
+
+  describe ".new" do
+    it "stores session" do
+      subject.session.should === session
+    end
+  end
+
+  describe ".build" do
+    it "instantiates a new DebtorContact" do
+      subject.build.should be_instance_of(Economic::DebtorContact)
+    end
+
+    it "assigns the session to the DebtorContact" do
+      subject.build.session.should === session
+    end
+
+    it "should not build a partial DebtorContact" do
+      subject.build.should_not be_partial
+    end
+
+    context "when owner is a Debtor" do
+      let(:debtor) { make_debtor(:session => session) }
+      subject { debtor.contacts }
+
+      it "should use the Debtors session" do
+        subject.build.session.should == debtor.session
+      end
+
+      it "should initialize with values from Debtor" do
+        contact = subject.build
+        contact.debtor_handle.should == debtor.handle
+      end
+    end
+  end
+
+  describe ".find" do
+    before :each do
+      savon.stubs('DebtorContact_GetData').returns(:success)
+    end
+
+    it "gets contact data from API" do
+      savon.expects('DebtorContact_GetData').with('entityHandle' => {'Id' => 42}).returns(:success)
+      subject.find(42)
+    end
+
+    it "returns DebtorContact object" do
+      subject.find(42).should be_instance_of(Economic::DebtorContact)
+    end
+  end
+end

data/spec/economic/proxies/debtor_proxy_spec.rb

@@ -71,4 +71,10 @@ describe Economic::DebtorProxy do
       subject.session.should === session
     end
   end
+
+  describe "#entity_class" do
+    it "should return Economic::Debtor" do
+      Economic::DebtorProxy.entity_class.should == Economic::Debtor
+    end
+  end
 end

data/spec/economic/session_spec.rb

@@ -38,6 +38,16 @@ describe Economic::Session do
     end
   end
 
+  describe "contacts" do
+    it "returns a DebtorContactProxy" do
+      subject.contacts.should be_instance_of(Economic::DebtorContactProxy)
+    end
+
+    it "memoizes the proxy" do
+      subject.contacts.should === subject.contacts
+    end
+  end
+
   describe "current_invoices" do
     it "returns an CurrentInvoiceProxy" do
       subject.current_invoices.should be_instance_of(Economic::CurrentInvoiceProxy)

data/spec/fixtures/debtor_contact_get_data/success.xml

@@ -0,0 +1,24 @@
+<?xml version="1.0" encoding="utf-8"?>
+<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
+  <soap:Body>
+    <DebtorContact_GetDataResponse xmlns="http://e-conomic.com">
+      <DebtorContact_GetDataResult>
+        <Handle>
+          <Id>int</Id>
+        </Handle>
+        <Id>int</Id>
+        <DebtorHandle>
+          <Number>string</Number>
+        </DebtorHandle>
+        <Name>string</Name>
+        <Number>int</Number>
+        <TelephoneNumber>string</TelephoneNumber>
+        <Email>string</Email>
+        <Comments>string</Comments>
+        <ExternalId>string</ExternalId>
+        <IsToReceiveEmailCopyOfOrder>boolean</IsToReceiveEmailCopyOfOrder>
+        <IsToReceiveEmailCopyOfInvoice>boolean</IsToReceiveEmailCopyOfInvoice>
+      </DebtorContact_GetDataResult>
+    </DebtorContact_GetDataResponse>
+  </soap:Body>
+</soap:Envelope>

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: rconomic
 version: !ruby/object:Gem::Version 
-  hash: 27
+  hash: 23
   prerelease: 
   segments: 
   - 0
-  - 1
+  - 2
   - 0
-  version: 0.1.0
+  version: 0.2.0
 platform: ruby
 authors: 
 - Jakob Skjerning
@@ -15,8 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-08-02 00:00:00 +02:00
-default_executable: 
+date: 2011-08-09 00:00:00 Z
 dependencies: 
 - !ruby/object:Gem::Dependency 
   name: savon
@@ -67,10 +66,12 @@ files:
 - lib/economic/current_invoice.rb
 - lib/economic/current_invoice_line.rb
 - lib/economic/debtor.rb
+- lib/economic/debtor_contact.rb
 - lib/economic/economic.wsdl
 - lib/economic/entity.rb
 - lib/economic/proxies/current_invoice_line_proxy.rb
 - lib/economic/proxies/current_invoice_proxy.rb
+- lib/economic/proxies/debtor_contact_proxy.rb
 - lib/economic/proxies/debtor_proxy.rb
 - lib/economic/proxies/entity_proxy.rb
 - lib/economic/session.rb
@@ -79,16 +80,19 @@ files:
 - rconomic.gemspec
 - spec/economic/current_invoice_line_spec.rb
 - spec/economic/current_invoice_spec.rb
+- spec/economic/debtor_contact_spec.rb
 - spec/economic/debtor_spec.rb
 - spec/economic/entity_spec.rb
 - spec/economic/proxies/current_invoice_line_proxy_spec.rb
 - spec/economic/proxies/current_invoice_proxy_spec.rb
+- spec/economic/proxies/debtor_contact_proxy_spec.rb
 - spec/economic/proxies/debtor_proxy_spec.rb
 - spec/economic/session_spec.rb
 - spec/fixtures/connect/success.xml
 - spec/fixtures/current_invoice_create_from_data/success.xml
 - spec/fixtures/current_invoice_get_data/success.xml
 - spec/fixtures/current_invoice_line_get_data/success.xml
+- spec/fixtures/debtor_contact_get_data/success.xml
 - spec/fixtures/debtor_find_by_ci_number/many.xml
 - spec/fixtures/debtor_get_data/success.xml
 - spec/fixtures/debtor_get_next_available_number/success.xml
@@ -97,7 +101,6 @@ files:
 - spec/fixtures/spec_entity_update_from_data/success.xml
 - spec/fixtures/wsdl.xml
 - spec/spec_helper.rb
-has_rdoc: true
 homepage: https://github.com/lokalebasen/rconomic
 licenses: []
 
@@ -127,7 +130,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: 
-rubygems_version: 1.6.2
+rubygems_version: 1.8.6
 signing_key: 
 specification_version: 3
 summary: Wrapper for e-conomic.dk's SOAP API.