rconomic 0.2.1 → 0.3

data/spec/economic/entity/handle_spec.rb

@@ -0,0 +1,116 @@
+require './spec/spec_helper'
+
+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
+
+  describe ".new" do
+    it "should raise error if argument isn't supported" do
+      lambda do
+        Economic::Entity::Handle.new(true)
+      end.should raise_error(ArgumentError)
+    end
+
+    it "should assume :id if argument is numeric" do
+      handle = Economic::Entity::Handle.new(12)
+      handle.id.should == 12
+      handle.number.should be_nil
+    end
+
+    it "should use to_i on numeric argument" do
+      handle = Economic::Entity::Handle.new("42")
+      handle.id.should == 42
+    end
+
+    it "should raise error if argument is nil" do
+      lambda do
+        Economic::Entity::Handle.new(nil)
+      end.should raise_error(ArgumentError)
+    end
+
+    it "should raise error if argument contains invalid key" do
+      lambda do
+        Economic::Entity::Handle.new(:Numeric => 12)
+      end.should raise_error(ArgumentError)
+    end
+
+    it "should raise error if argument contains invalid values" do
+      lambda do
+        Economic::Entity::Handle.new(:number => {:number => 12})
+      end.should raise_error(ArgumentError)
+    end
+
+    it "should set id" do
+      handle = Economic::Entity::Handle.new(:id => 12)
+      handle.id.should == 12
+    end
+
+    it "should set number" do
+      handle = Economic::Entity::Handle.new(:number => 12)
+      handle.number.should == 12
+    end
+
+    it "should set both id and number" do
+      handle = Economic::Entity::Handle.new(:id => 37, :number => 42)
+      handle.id.should == 37
+      handle.number.should == 42
+    end
+
+    it 'should set id1 and id2' do
+      handle = Economic::Entity::Handle.new(:id1 => 37, :id2 => 42)
+      handle.id1.should == 37
+      handle.id2.should == 42
+    end
+
+    it "should to_i values" do
+      handle = Economic::Entity::Handle.new(:id => "37", :number => "42")
+      handle.id.should == 37
+      handle.number.should == 42
+    end
+
+    it "should not to_i nil values" do
+      handle = Economic::Entity::Handle.new(:id => "37")
+      handle.id.should == 37
+      handle.number.should be_nil
+    end
+
+    it "should accept a Hash with capitalized keys" do
+      handle = Economic::Entity::Handle.new({"Id" => 37, "Number" => 42})
+      handle.id.should == 37
+      handle.number.should == 42
+    end
+
+    it "should accept another Handle" do
+      original_handle = Economic::Entity::Handle.new(:id => 37)
+      handle = Economic::Entity::Handle.new(original_handle)
+      handle.id.should == 37
+      handle.number.should be_nil
+      handle.should == original_handle
+    end
+  end
+
+  describe ".to_hash" do
+    subject { Economic::Entity::Handle.new({:id => 42, :number => 37}) }
+
+    it "should return a handle for putting into the body of a SOAP request" do
+      subject.to_hash.should == {'Id' => 42, 'Number' => 37}
+    end
+  end
+end
+

data/spec/economic/entity_spec.rb

@@ -171,6 +171,32 @@ describe Economic::Entity do
     end
   end
 
+  describe "destroy" do
+    subject { (e = SpecEntity.new).tap { |e| e.id = 42; e.persisted = true; e.partial = false; e.session = session } }
+
+    it "sends data to the API" do
+      savon.expects(:spec_entity_delete).returns(:success)
+      subject.destroy
+    end
+
+    it "should request with the correct model and id" do
+      savon.expects(:spec_entity_delete).with('specEntityHandle' => {'Id' => 42}).returns(:success)
+      subject.destroy
+    end
+
+    it "should mark the entity as not persisted and partial" do
+      savon.expects(:spec_entity_delete).returns(:success)
+      subject.destroy
+      subject.should_not be_persisted
+      subject.should be_partial
+    end
+
+    it "should return the response" do
+      session.expects(:request).returns({ :response => true })
+      subject.destroy.should == { :response => true }
+    end
+  end
+
   describe "update_properties" do
     subject { SpecEntity.new }
 
@@ -188,25 +214,3 @@ describe Economic::Entity do
     end
   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/invoice_spec.rb

@@ -0,0 +1,68 @@
+require './spec/spec_helper'
+
+describe Economic::Invoice do
+  let(:session) { make_session }
+  subject { Economic::Invoice.new(:session => session, :number => 512) }
+
+  it "inherits from Economic::Entity" do
+    Economic::Invoice.ancestors.should include(Economic::Entity)
+  end
+
+  describe '#remainder' do
+    it 'should get the remainder' do
+      savon.expects('Invoice_GetRemainder').with("invoiceHandle" => { "Number" => 512 }).returns(:success)
+      subject.remainder.should == "512.32"
+    end
+  end
+
+  describe ".proxy" do
+    it "should return a InvoiceProxy" do
+      subject.proxy.should be_instance_of(Economic::InvoiceProxy)
+    end
+
+    it "should return a proxy owned by session" do
+      subject.proxy.session.should == session
+    end
+  end
+
+  describe ".key" do
+    it "should == :invoice" do
+      Economic::Invoice.key.should == :invoice
+    end
+  end
+
+  describe "#pdf" do
+    before :each do
+      savon.stubs('Invoice_GetPdf').returns(:success)
+    end
+
+    it "gets PDF data from API" do
+      savon.expects('Invoice_GetPdf').with('invoiceHandle' => {'Number' => 512}).returns(:success)
+      subject.pdf
+    end
+
+    it "decodes the base64Binary encoded data" do
+      subject.pdf.should == 'This is not really PDF data'
+    end
+  end
+
+  describe "#attention" do
+    let(:contact) { (c = Economic::DebtorContact.new).tap { c.session = session }}
+
+    it "should be set- and gettable" do
+      subject.attention = contact
+      subject.attention_handle.should == contact.handle
+      subject.attention.should == contact
+    end
+  end
+
+  describe "#debtor" do
+    let(:debtor) { (c = Economic::Debtor.new).tap { c.session = session }}
+
+    it "should be set- and gettable" do
+      subject.debtor = debtor
+      subject.debtor_handle.should == debtor.handle
+      subject.debtor.should == debtor
+    end
+  end
+end

data/spec/economic/proxies/cash_book_entry_proxy_spec.rb

@@ -0,0 +1,62 @@
+require './spec/spec_helper'
+
+describe Economic::CashBookEntryProxy do
+
+  let(:session) { make_session }
+  let(:cash_book) { Economic::CashBook.new(:session => session) }
+  subject { Economic::CashBookEntryProxy.new(cash_book) }
+
+  describe ".new" do
+    it "stores owner" do
+      subject.owner.should == cash_book
+    end
+
+    it "stores session" do
+      subject.session.should === session
+    end
+  end
+
+  describe ".build" do
+    it "instantiates a new CashBookEntry" do
+      subject.build.should be_instance_of(Economic::CashBookEntry)
+    end
+
+    it "assigns the session to the CashBookEntry" do
+      subject.build.session.should === session
+    end
+  end
+
+  describe "#save" do
+    it 'should save it' do
+      savon.stubs('CashBookEntry_CreateFromData').returns(:success)
+      subject.build.save
+    end
+  end
+
+  describe "#create_finance_voucher" do
+    it 'should create a finance voucher and return the created cash book entry' do
+      savon.stubs('CashBookEntry_CreateFinanceVoucher').returns(:success)
+      savon.stubs('CashBookEntry_GetData').with(:id1 => 15, :id2 => 16).returns(:success)
+      cash_book_entry = subject.create_finance_voucher(:account_handle => { :number => 2 }, :contra_account_handle => { :number => 3 })
+      cash_book_entry.should be_instance_of(Economic::CashBookEntry)
+    end
+  end
+
+  describe "#create_debtor_payment" do
+    it 'should create a debtor payment and then return the created cash book entry' do
+      savon.stubs('CashBookEntry_CreateDebtorPayment').returns(:success)
+      savon.stubs('CashBookEntry_GetData').with(:id1 => 13, :id2 => 14).returns(:success)
+      cash_book_entry = subject.create_debtor_payment(:debtor_handle => { :number => 2 }, :contra_account_handle => { :number => 3 })
+      cash_book_entry.should be_instance_of(Economic::CashBookEntry)
+    end
+  end
+
+  describe "#all" do
+    it 'should get the cash book entries' do
+      savon.stubs('CashBook_GetEntries').returns(:success)
+      savon.stubs('CashBookEntry_GetData').returns(:success)
+      subject.all.size.should == 2
+    end
+  end
+
+end

data/spec/economic/proxies/cash_book_proxy_spec.rb

@@ -0,0 +1,54 @@
+require './spec/spec_helper'
+
+describe Economic::CashBookProxy do
+
+  let(:session) { make_session }
+  subject { Economic::CashBookProxy.new(session) }
+
+  describe ".new" do
+
+    it "stores session" do
+      subject.session.should === session
+    end
+
+  end
+
+  describe ".build" do
+
+    it "instantiates a new CashBook" do
+      subject.build.should be_instance_of(Economic::CashBook)
+    end
+
+    it "assigns the session to the CashBook" do
+      subject.build.session.should === session
+    end
+
+  end
+
+  describe ".all" do
+
+    it "returns multiple cashbooks" do
+      savon.expects('CashBook_GetAll').returns(:multiple)
+      savon.expects('CashBook_GetName').returns(:success)
+      savon.expects('CashBook_GetName').returns(:success)
+      all = subject.all
+      all.size.should == 2
+      all[0].should be_instance_of(Economic::CashBook)
+      all[1].should be_instance_of(Economic::CashBook)
+    end
+
+  end
+
+  describe ".get_name" do
+
+    it 'returns a cash book with a name' do
+      savon.expects('CashBook_GetName').with("cashBookHandle" => { "Number" => "52" }).returns(:success)
+      result = subject.get_name("52")
+      result.should be_instance_of(Economic::CashBook)
+      result.number.should == "52"
+      result.name.should be_a(String)
+    end
+
+  end
+
+end

data/spec/economic/proxies/current_invoice_line_proxy_spec.rb

@@ -88,4 +88,4 @@ describe Economic::CurrentInvoiceLineProxy do
       subject.all? { |l| l == [line] }
     end
   end
-end
+end

data/spec/economic/proxies/current_invoice_proxy_spec.rb

@@ -1,6 +1,7 @@
 require './spec/spec_helper'
 
 describe Economic::CurrentInvoiceProxy do
+
   let(:session) { make_session }
   subject { Economic::CurrentInvoiceProxy.new(session) }
 
@@ -53,7 +54,7 @@ describe Economic::CurrentInvoiceProxy do
     end
 
     it "gets invoice data from API" do
-      savon.expects('CurrentInvoice_GetData').with('entityHandle' => {'Number' => 42}).returns(:success)
+      savon.expects('CurrentInvoice_GetData').with('entityHandle' => {'Id' => 42}).returns(:success)
       subject.find(42)
     end
 
@@ -61,4 +62,67 @@ describe Economic::CurrentInvoiceProxy do
       subject.find(42).should be_instance_of(Economic::CurrentInvoice)
     end
   end
-end
+
+  describe ".find_by_date_interval" do
+
+    it "should be able to return a single current invoice" do
+      from = Time.now - 60
+      unto = Time.now
+      savon.expects('CurrentInvoice_FindByDateInterval').with('first' => from.iso8601, 'last' => unto.iso8601).returns(:single)
+      savon.expects('CurrentInvoice_GetData').returns(:success)
+      results = subject.find_by_date_interval(from, unto)
+      results.size.should == 1
+      results.first.should be_instance_of(Economic::CurrentInvoice)
+    end
+
+    it "should be able to return multiple invoices" do
+      from = Time.now - 60
+      unto = Time.now
+      savon.expects('CurrentInvoice_FindByDateInterval').with('first' => from.iso8601, 'last' => unto.iso8601).returns(:many)
+      savon.expects('CurrentInvoice_GetData').returns(:success)
+      savon.expects('CurrentInvoice_GetData').returns(:success)
+      results = subject.find_by_date_interval(from, unto)
+      results.size.should == 2
+      results.first.should be_instance_of(Economic::CurrentInvoice)
+    end
+
+    it "should be able to return nothing" do
+      from = Time.now - 60
+      unto = Time.now
+      savon.expects('CurrentInvoice_FindByDateInterval').with('first' => from.iso8601, 'last' => unto.iso8601).returns(:none)
+      results = subject.find_by_date_interval(from, unto)
+      results.size.should == 0
+    end
+
+  end
+  
+  describe ".all" do
+
+    it "returns an empty array when there are no current invoices" do
+      savon.expects('CurrentInvoice_GetAll').returns(:none)
+      subject.all.size.should == 0
+    end
+
+    it "finds and adds a single current invoice" do
+      savon.expects('CurrentInvoice_GetAll').returns(:single)
+      savon.expects('CurrentInvoice_GetData').with('entityHandle' => {'Id' => 1}).returns(:success)
+
+      current_invoices = subject.all
+      current_invoices.should be_instance_of(Economic::CurrentInvoiceProxy)
+
+      current_invoices.size.should == 1
+      current_invoices.first.should be_instance_of(Economic::CurrentInvoice)
+    end
+
+    it "adds multiple current invoices" do
+      savon.expects('CurrentInvoice_GetAll').returns(:multiple)
+      savon.expects('CurrentInvoice_GetDataArray').returns(:multiple)
+
+      current_invoices = subject.all
+      current_invoices.size.should == 2
+      current_invoices.items.first.should be_instance_of(Economic::CurrentInvoice)
+      current_invoices.items.last.should be_instance_of(Economic::CurrentInvoice)
+    end
+
+  end
+end

data/spec/economic/proxies/debtor_proxy_spec.rb

@@ -53,6 +53,24 @@ describe Economic::DebtorProxy do
     end
   end
 
+  describe "find_by_number" do
+    it "can find a debtor" do
+      savon.expects('Debtor_FindByNumber').with('number' => '1').returns(:found)
+      result = subject.find_by_number('1')
+      result.should be_instance_of(Economic::Debtor)
+      result.number.should == 1
+      result.partial.should be_true
+      result.persisted.should be_true
+      result.handle.should == Economic::Entity::Handle.new({ :number => 1 })
+    end
+
+    it "returns nil when there is no debtor" do
+      savon.expects('Debtor_FindByNumber').with('number' => '1').returns(:not_found)
+      result = subject.find_by_number('1')
+      result.should be_nil
+    end
+  end
+
   describe "next_available_number" do
     it "gets the next available debtor number from API" do
       savon.expects('Debtor_GetNextAvailableNumber').returns(:success)
@@ -77,4 +95,24 @@ describe Economic::DebtorProxy do
       Economic::DebtorProxy.entity_class.should == Economic::Debtor
     end
   end
-end
+
+  # Complete specs in current_invoice, no point in duplicating them here, just ensuring that
+  # it handles debtors "Number" id.
+  describe ".all" do
+    it "returns a single debtor" do
+      savon.expects('Debtor_GetAll').returns(:single)
+      savon.expects('Debtor_GetData').with('entityHandle' => {'Number' => 1}).returns(:success)
+      all = subject.all
+      all.size.should == 1
+      all.first.should be_instance_of(Economic::Debtor)
+    end
+
+    it "returns multiple debtors" do
+      savon.expects('Debtor_GetAll').returns(:multiple)
+      savon.expects('Debtor_GetDataArray').returns(:multiple)
+      all = subject.all
+      all.size.should == 2
+      all.first.should be_instance_of(Economic::Debtor)
+    end
+  end
+end

data/spec/economic/proxies/invoice_proxy_spec.rb

@@ -0,0 +1,75 @@
+require './spec/spec_helper'
+
+describe Economic::InvoiceProxy do
+
+  let(:session) { make_session }
+  subject { Economic::InvoiceProxy.new(session) }
+
+  describe ".new" do
+    it "stores session" do
+      subject.session.should === session
+    end
+  end
+
+  describe ".build" do
+    it "instantiates a new Invoice" do
+      subject.build.should be_instance_of(Economic::Invoice)
+    end
+
+    it "assigns the session to the Invoice" do
+      subject.build.session.should === session
+    end
+
+    it "should not build a partial Invoice" do
+      subject.build.should_not be_partial
+    end
+  end
+
+  describe ".find" do
+    before :each do
+      savon.stubs('Invoice_GetData').returns(:success)
+    end
+
+    it "gets invoice data from API" do
+      savon.expects('Invoice_GetData').with('entityHandle' => {'Number' => 42}).returns(:success)
+      subject.find(42)
+    end
+
+    it "returns Invoice object" do
+      subject.find(42).should be_instance_of(Economic::Invoice)
+    end
+  end  
+
+  describe ".find_by_date_interval" do
+
+    it "should be able to return a single current invoice" do
+      from = Time.now - 60
+      unto = Time.now
+      savon.expects('Invoice_FindByDateInterval').with('first' => from.iso8601, 'last' => unto.iso8601).returns(:single)
+      savon.expects('Invoice_GetData').returns(:success)
+      results = subject.find_by_date_interval(from, unto)
+      results.size.should == 1
+      results.first.should be_instance_of(Economic::Invoice)
+    end
+
+    it "should be able to return multiple invoices" do
+      from = Time.now - 60
+      unto = Time.now
+      savon.expects('Invoice_FindByDateInterval').with('first' => from.iso8601, 'last' => unto.iso8601).returns(:many)
+      savon.expects('Invoice_GetData').returns(:success)
+      savon.expects('Invoice_GetData').returns(:success)
+      results = subject.find_by_date_interval(from, unto)
+      results.size.should == 2
+      results.first.should be_instance_of(Economic::Invoice)
+    end
+
+    it "should be able to return nothing" do
+      from = Time.now - 60
+      unto = Time.now
+      savon.expects('Invoice_FindByDateInterval').with('first' => from.iso8601, 'last' => unto.iso8601).returns(:none)
+      results = subject.find_by_date_interval(from, unto)
+      results.size.should == 0
+    end
+
+  end
+end

data/spec/economic/session_spec.rb

@@ -58,6 +58,16 @@ describe Economic::Session do
     end
   end
 
+  describe "invoices" do
+    it "returns an InvoiceProxy" do
+      subject.invoices.should be_instance_of(Economic::InvoiceProxy)
+    end
+
+    it "memoizes the proxy" do
+      subject.invoices.should === subject.invoices
+    end
+  end
+
   describe "debtors" do
     it "returns a DebtorProxy" do
       subject.debtors.should be_instance_of(Economic::DebtorProxy)
@@ -71,4 +81,4 @@ describe Economic::Session do
   describe "request" do
   end
 
-end
+end

data/spec/fixtures/cash_book_book/success.xml

@@ -0,0 +1,10 @@
+<?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>
+    <CashBook_BookResponse xmlns="http://e-conomic.com">
+      <CashBook_BookResult>
+        <Number>832</Number>
+      </CashBook_BookResult>
+    </CashBook_BookResponse>
+  </soap:Body>
+</soap:Envelope>

data/spec/fixtures/cash_book_entry_create_debtor_payment/success.xml

@@ -0,0 +1,11 @@
+<?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>
+    <CashBookEntry_CreateDebtorPaymentResponse xmlns="http://e-conomic.com">
+      <CashBookEntry_CreateDebtorPaymentResult>
+        <Id1>13</Id1>
+        <Id2>14</Id2>
+      </CashBookEntry_CreateDebtorPaymentResult>
+    </CashBookEntry_CreateDebtorPaymentResponse>
+  </soap:Body>
+</soap:Envelope>

data/spec/fixtures/cash_book_entry_create_finance_voucher/success.xml

@@ -0,0 +1,11 @@
+<?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>
+    <CashBookEntry_CreateFinanceVoucherResponse xmlns="http://e-conomic.com">
+      <CashBookEntry_CreateFinanceVoucherResult>
+        <Id1>15</Id1>
+        <Id2>16</Id2>
+      </CashBookEntry_CreateFinanceVoucherResult>
+    </CashBookEntry_CreateFinanceVoucherResponse>
+  </soap:Body>
+</soap:Envelope>

data/spec/fixtures/cash_book_entry_create_from_data/success.xml

@@ -0,0 +1,11 @@
+<?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>
+    <CashBookEntry_CreateFromDataResponse xmlns="http://e-conomic.com">
+      <CashBookEntry_CreateFromDataResult>
+        <Id1>int</Id1>
+        <Id2>int</Id2>
+      </CashBookEntry_CreateFromDataResult>
+    </CashBookEntry_CreateFromDataResponse>
+  </soap:Body>
+</soap:Envelope>