invoicing 0.1.0

data/test/line_item_test.rb

@@ -0,0 +1,139 @@
+# encoding: utf-8
+
+require File.join(File.dirname(__FILE__), 'test_helper.rb')
+
+####### Helper stuff
+
+module LineItemMethods
+  RENAMED_METHODS = {
+    :id => :id2, :type => :type2, :ledger_item_id => :ledger_item_id2,
+    :net_amount => :net_amount2, :tax_amount => :tax_amount2,
+    :description => :description2, :uuid => :uuid2, :tax_point => :tax_point2,
+    :tax_rate_id => :tax_rate_id2, :price_id => :price_id2,
+    :quantity => :quantity2, :creator_id => :creator_id2, :ledger_item => :ledger_item2
+  }
+  
+  def description2
+    "moo"
+  end
+end
+
+
+####### Classes for use in the tests (also used by LedgerItemTest)
+
+class SuperLineItem < ActiveRecord::Base
+  set_primary_key 'id2'
+  set_inheritance_column 'type2'
+  set_table_name 'line_item_records'
+  include LineItemMethods
+  acts_as_line_item RENAMED_METHODS
+  belongs_to :ledger_item2, :class_name => 'MyLedgerItem', :foreign_key => 'ledger_item_id2'
+end
+
+class SubLineItem < SuperLineItem
+  def description2
+    "this is the SubLineItem"
+  end
+end
+
+class OtherLineItem < SuperLineItem
+end
+
+class UntaxedLineItem < SuperLineItem
+end
+
+class UUIDNotPresentLineItem < ActiveRecord::Base
+  set_primary_key 'id2'
+  set_inheritance_column 'type2'
+  set_table_name 'line_item_records'
+  include LineItemMethods
+  
+  def get_class_info
+    line_item_class_info
+  end
+end
+
+class OverwrittenMethodsNotPresentLineItem < ActiveRecord::Base
+  set_primary_key 'id2'
+  set_inheritance_column 'type2'
+  set_table_name 'line_item_records'
+  acts_as_line_item LineItemMethods::RENAMED_METHODS
+end
+
+
+####### The actual tests
+
+class LineItemTest < Test::Unit::TestCase
+  
+  def test_net_amount_is_currency_value
+    assert_equal '$432.10', UntaxedLineItem.find(4).net_amount2_formatted
+  end
+  
+  def test_tax_amount_is_currency_value
+    assert_equal '£15.00', SuperLineItem.find(1).tax_amount2_formatted
+  end
+  
+  def test_gross_amount
+    assert_equal BigDecimal('115'), SuperLineItem.find(1).gross_amount
+  end
+
+  def test_gross_amount_formatted
+    assert_equal '£115.00', SuperLineItem.find(1).gross_amount_formatted
+  end
+  
+  def test_assign_uuid_to_new_record
+    record = SuperLineItem.new
+    begin
+      UUID
+      uuid_gem_available = true
+    rescue NameError
+      uuid_gem_available = false
+    end
+    if uuid_gem_available
+      assert_match /^[0-9a-f]{8}\-[0-9a-f]{4}\-[0-9a-f]{4}\-[0-9a-f]{4}\-[0-9a-f]{12}$/, record.uuid2
+    else
+      assert record.uuid2.blank?
+      puts "Warning: uuid gem not installed -- not testing UUID generation"
+    end
+  end
+  
+  def test_uuid_gem_not_present
+    begin
+      real_uuid = Object.send(:remove_const, :UUID)
+      UUIDNotPresentLineItem.acts_as_line_item(LineItemMethods::RENAMED_METHODS)
+      assert_nil UUIDNotPresentLineItem.new.get_class_info.uuid_generator
+    ensure
+      Object.send(:const_set, :UUID, real_uuid)
+    end
+  end
+
+  def test_must_provide_ledger_item_association
+    assert_raise RuntimeError do
+      OverwrittenMethodsNotPresentLineItem.new.ledger_item
+    end
+  end
+
+  def test_ledger_item_error
+    assert_raise RuntimeError do
+      SuperLineItem.find(1).ledger_item # not ledger_item2
+    end
+  end
+  
+  def test_currency
+    assert_equal 'GBP', SubLineItem.find(2).currency
+  end
+  
+  def test_in_effect_scope
+    assert_equal [1,2,3,4,5,6,7,8], SuperLineItem.all.map{|i| i.id}.sort
+    assert_equal [1,2,3,4,5,6], SuperLineItem.in_effect.map{|i| i.id}.sort
+  end
+  
+  def test_sorted_scope
+    assert_equal [4,2,1,5,3,6,7,8], SuperLineItem.sorted(:tax_point).map{|i| i.id}
+  end
+  
+  def test_sorted_scope_with_non_existent_column
+    assert_equal [1,2,3,4,5,6,7,8], SuperLineItem.sorted(:this_column_does_not_exist).map{|i| i.id}
+  end
+  
+end

data/test/models/README

@@ -0,0 +1,4 @@
+This folder contains model object definitions used by the tests in the 'test' folder;
+it is included in ActiveSupport::Dependencies.load_paths but not 'require'd directly,
+so that we can test the effect which the ActiveSupport dependency resolution has on
+our code.

data/test/models/test_subclass_in_another_file.rb

@@ -0,0 +1,3 @@
+# Used by find_subclasses_test.rb
+class TestSubclassInAnotherFile < TestBaseclass
+end

data/test/models/test_subclass_not_in_database.rb

@@ -0,0 +1,6 @@
+# Please do not require this file or the class name TestSubclassNotInDatabase
+# anywhere. The whole point of it is that it is a subclass of TestBaseclass
+# which exists, but is never loaded, because it isn't mentioned anywhere.
+# FindSubclassesTest#test_known_subclasses tests this.
+class TestSubclassNotInDatabase < TestBaseclass
+end

data/test/price_test.rb

@@ -0,0 +1,9 @@
+require File.join(File.dirname(__FILE__), 'test_helper.rb')
+
+class PriceTest < Test::Unit::TestCase
+  
+  def test_should_be_true
+    assert_equal(1,1)
+  end
+  
+end

data/test/ref-output/creditnote3.html

@@ -0,0 +1,82 @@
+<h1 class="invoice">Credit Note</h1>
+<table class="invoice addresses">
+    <tr>
+        <th class="recipient">Recipient</th>
+        <th class="sender">Sender</th>
+    </tr>
+    <tr>
+        <td class="recipient vcard">
+            <div class="fn org">Lovely Customer Inc.</div>
+            <div class="contact">Fred</div>
+            <div class="adr">
+                <span class="street-address">The pasture</span><br />
+                <span class="locality">Mootown</span><br />
+                <span class="region">Cow Kingdom</span><br />
+                <span class="postal-code">MOOO</span><br />
+                <span class="country-name">Scotland</span>
+            </div>
+        </td>
+        <td class="sender vcard">
+            <div class="fn org">Unlimited Limited</div>
+            <div class="contact">Mr B. Badger</div>
+            <div class="adr">
+                <span class="street-address">The Sett<br />5 Badger Lane</span><br />
+                <span class="locality">Badgertown</span><br />
+                <span class="postal-code">Badger999</span><br />
+                <span class="country-name">England</span>
+            </div>
+        </td>
+    </tr>
+    <tr>
+        <td class="recipient">
+            VAT number:<br /><span class="tax-number">987654321</span>
+        </td>
+        <td class="sender">
+            VAT number:<br /><span class="tax-number">123456789</span>
+        </td>
+    </tr>
+</table>
+<table class="invoice metadata">
+    <tr class="identifier">
+        <th>Invoice no.:</th>
+        <td>putain!</td>
+    </tr>
+    <tr class="issue-date">
+        <th>Issue date:</th>
+        <td>2008-07-13</td>
+    </tr>
+    <tr class="period-start">
+        <th>Period from:</th>
+        <td>2008-06-01</td>
+    </tr>
+    <tr class="period-end">
+        <th>Period until:</th>
+        <td>2008-07-01</td>
+    </tr>
+</table>
+<p class="invoice description">MyCreditNote 3</p>
+<table class="invoice line-items">
+    <tr>
+        <th class="tax-point">Tax point</th>
+        <th class="quantity">Quantity</th>
+        <th class="description">Description</th>
+        <th class="net-amount">Net price</th>
+        <th class="tax-amount">VAT</th>
+    </tr>
+    <tr>
+        <td class="tax-point">2008-07-13</td>
+        <td class="quantity">0.5</td>
+        <td class="description">moo</td>
+        <td class="net-amount">£50.00</td>
+        <td class="tax-amount">£7.50</td>
+    </tr>
+    <tr class="subtotal">
+        <th colspan="3">Subtotal</th>
+        <td class="net-amount">Net: £50.00</td>
+        <td class="tax-amount">VAT: £7.50</td>
+    </tr>
+    <tr class="total">
+        <th colspan="4">Total</th>
+        <td class="total-amount">£57.50</td>
+    </tr>
+</table>

data/test/ref-output/creditnote3.xml

@@ -0,0 +1,89 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<ubl:CreditNote xmlns:cac="urn:oasis:names:specification:ubl:schema:xsd:CommonAggregateComponents-2" xmlns:ubl="urn:oasis:names:specification:ubl:schema:xsd:CreditNote-2" xmlns:cbc="urn:oasis:names:specification:ubl:schema:xsd:CommonBasicComponents-2">
+    <cbc:ID>putain!</cbc:ID>
+    <cbc:UUID>671a05d0-d1ba-012b-48a5-0017f22d32c0</cbc:UUID>
+    <cbc:IssueDate>2008-07-13</cbc:IssueDate>
+    <cbc:IssueTime>00:00:00+00:00</cbc:IssueTime>
+    <cbc:TaxPointDate>2008-07-13</cbc:TaxPointDate>
+    <cbc:Note>MyCreditNote 3</cbc:Note>
+    <cac:InvoicePeriod>
+        <cbc:StartDate>2008-06-01</cbc:StartDate>
+        <cbc:StartTime>00:00:00+00:00</cbc:StartTime>
+        <cbc:EndDate>2008-07-01</cbc:EndDate>
+        <cbc:EndTime>00:00:00+00:00</cbc:EndTime>
+    </cac:InvoicePeriod>
+    <cac:AccountingSupplierParty>
+        <cac:Party>
+            <cac:PartyName>
+                <cbc:Name>Unlimited Limited</cbc:Name>
+            </cac:PartyName>
+            <cac:PostalAddress>
+                <cbc:StreetName>The Sett</cbc:StreetName>
+                <cbc:AdditionalStreetName>5 Badger Lane</cbc:AdditionalStreetName>
+                <cbc:CityName>Badgertown</cbc:CityName>
+                <cbc:PostalZone>Badger999</cbc:PostalZone>
+                <cbc:CountrySubentity></cbc:CountrySubentity>
+                <cac:Country>
+                    <cbc:IdentificationCode>GB</cbc:IdentificationCode>
+                    <cbc:Name>England</cbc:Name>
+                </cac:Country>
+            </cac:PostalAddress>
+            <cac:PartyTaxScheme>
+                <cbc:CompanyID>123456789</cbc:CompanyID>
+                <cac:TaxScheme>
+                    <cbc:ID>VAT</cbc:ID>
+                </cac:TaxScheme>
+            </cac:PartyTaxScheme>
+            <cac:Contact>
+                <cbc:Name>Mr B. Badger</cbc:Name>
+            </cac:Contact>
+        </cac:Party>
+    </cac:AccountingSupplierParty>
+    <cac:AccountingCustomerParty>
+        <cbc:SupplierAssignedAccountID>2</cbc:SupplierAssignedAccountID>
+        <cac:Party>
+            <cac:PartyName>
+                <cbc:Name>Lovely Customer Inc.</cbc:Name>
+            </cac:PartyName>
+            <cac:PostalAddress>
+                <cbc:StreetName>The pasture</cbc:StreetName>
+                <cbc:CityName>Mootown</cbc:CityName>
+                <cbc:PostalZone>MOOO</cbc:PostalZone>
+                <cbc:CountrySubentity>Cow Kingdom</cbc:CountrySubentity>
+                <cac:Country>
+                    <cbc:IdentificationCode>GB</cbc:IdentificationCode>
+                    <cbc:Name>Scotland</cbc:Name>
+                </cac:Country>
+            </cac:PostalAddress>
+            <cac:PartyTaxScheme>
+                <cbc:CompanyID>987654321</cbc:CompanyID>
+                <cac:TaxScheme>
+                    <cbc:ID>VAT</cbc:ID>
+                </cac:TaxScheme>
+            </cac:PartyTaxScheme>
+            <cac:Contact>
+                <cbc:Name>Fred</cbc:Name>
+            </cac:Contact>
+        </cac:Party>
+    </cac:AccountingCustomerParty>
+    <cac:TaxTotal>
+        <cbc:TaxAmount currencyID="GBP">7.5</cbc:TaxAmount>
+    </cac:TaxTotal>
+    <cac:LegalMonetaryTotal>
+        <cbc:TaxExclusiveAmount currencyID="GBP">50.0</cbc:TaxExclusiveAmount>
+        <cbc:PayableAmount currencyID="GBP">57.5</cbc:PayableAmount>
+    </cac:LegalMonetaryTotal>
+    <cac:CreditNoteLine>
+        <cbc:ID>5</cbc:ID>
+        <cbc:UUID>eab28cf0-d1b4-012b-48a5-0017f22d32c0</cbc:UUID>
+        <cbc:CreditedQuantity>0.5</cbc:CreditedQuantity>
+        <cbc:LineExtensionAmount currencyID="GBP">50.0</cbc:LineExtensionAmount>
+        <cbc:TaxPointDate>2008-07-13</cbc:TaxPointDate>
+        <cac:TaxTotal>
+            <cbc:TaxAmount currencyID="GBP">7.5</cbc:TaxAmount>
+        </cac:TaxTotal>
+        <cac:Item>
+            <cbc:Description>moo</cbc:Description>
+        </cac:Item>
+    </cac:CreditNoteLine>
+</ubl:CreditNote>

data/test/ref-output/invoice1.html

@@ -0,0 +1,93 @@
+<h1 class="invoice">Invoice</h1>
+<table class="invoice addresses">
+    <tr>
+        <th class="recipient">Recipient</th>
+        <th class="sender">Sender</th>
+    </tr>
+    <tr>
+        <td class="recipient vcard">
+            <div class="fn org">Lovely Customer Inc.</div>
+            <div class="contact">Fred</div>
+            <div class="adr">
+                <span class="street-address">The pasture</span><br />
+                <span class="locality">Mootown</span><br />
+                <span class="region">Cow Kingdom</span><br />
+                <span class="postal-code">MOOO</span><br />
+                <span class="country-name">Scotland</span>
+            </div>
+        </td>
+        <td class="sender vcard">
+            <div class="fn org">Unlimited Limited</div>
+            <div class="contact">Mr B. Badger</div>
+            <div class="adr">
+                <span class="street-address">The Sett<br />5 Badger Lane</span><br />
+                <span class="locality">Badgertown</span><br />
+                <span class="postal-code">Badger999</span><br />
+                <span class="country-name">England</span>
+            </div>
+        </td>
+    </tr>
+    <tr>
+        <td class="recipient">
+            VAT number:<br /><span class="tax-number">987654321</span>
+        </td>
+        <td class="sender">
+            VAT number:<br /><span class="tax-number">123456789</span>
+        </td>
+    </tr>
+</table>
+<table class="invoice metadata">
+    <tr class="identifier">
+        <th>Invoice no.:</th>
+        <td>1</td>
+    </tr>
+    <tr class="issue-date">
+        <th>Issue date:</th>
+        <td>2008-06-30</td>
+    </tr>
+    <tr class="period-start">
+        <th>Period from:</th>
+        <td>2008-06-01</td>
+    </tr>
+    <tr class="period-end">
+        <th>Period until:</th>
+        <td>2008-07-01</td>
+    </tr>
+    <tr class="due-date">
+        <th>Payment due:</th>
+        <td>2008-07-30</td>
+    </tr>
+</table>
+<p class="invoice description">MyInvoice 1</p>
+<table class="invoice line-items">
+    <tr>
+        <th class="tax-point">Tax point</th>
+        <th class="quantity">Quantity</th>
+        <th class="description">Description</th>
+        <th class="net-amount">Net price</th>
+        <th class="tax-amount">VAT</th>
+    </tr>
+    <tr>
+        <td class="tax-point">2008-06-25</td>
+        <td class="quantity">4.0</td>
+        <td class="description">this is the SubLineItem</td>
+        <td class="net-amount">£200.00</td>
+        <td class="tax-amount">£0.00</td>
+    </tr>
+    <tr>
+        <td class="tax-point">2008-06-30</td>
+        <td class="quantity">1.0</td>
+        <td class="description">moo</td>
+        <td class="net-amount">£100.00</td>
+        <td class="tax-amount">£15.00</td>
+    </tr>
+    <tr class="subtotal">
+        <th colspan="3">Subtotal</th>
+        <td class="net-amount">Net: £300.00</td>
+        <td class="tax-amount">VAT: £15.00</td>
+    </tr>
+    <tr class="total">
+        <th colspan="4">Total</th>
+        <td class="total-amount">£315.00</td>
+    </tr>
+</table>

data/test/ref-output/invoice1.xml

@@ -0,0 +1,111 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<ubl:Invoice xmlns:cac="urn:oasis:names:specification:ubl:schema:xsd:CommonAggregateComponents-2" xmlns:ubl="urn:oasis:names:specification:ubl:schema:xsd:Invoice-2" xmlns:cbc="urn:oasis:names:specification:ubl:schema:xsd:CommonBasicComponents-2">
+    <cbc:ID>1</cbc:ID>
+    <cbc:UUID>30f4f680-d1b9-012b-48a5-0017f22d32c0</cbc:UUID>
+    <cbc:IssueDate>2008-06-30</cbc:IssueDate>
+    <cbc:IssueTime>00:00:00+00:00</cbc:IssueTime>
+    <cbc:InvoiceTypeCode>MyInvoice</cbc:InvoiceTypeCode>
+    <cbc:Note>MyInvoice 1</cbc:Note>
+    <cbc:TaxPointDate>2008-06-30</cbc:TaxPointDate>
+    <cac:InvoicePeriod>
+        <cbc:StartDate>2008-06-01</cbc:StartDate>
+        <cbc:StartTime>00:00:00+00:00</cbc:StartTime>
+        <cbc:EndDate>2008-07-01</cbc:EndDate>
+        <cbc:EndTime>00:00:00+00:00</cbc:EndTime>
+    </cac:InvoicePeriod>
+    <cac:AccountingSupplierParty>
+        <cac:Party>
+            <cac:PartyName>
+                <cbc:Name>Unlimited Limited</cbc:Name>
+            </cac:PartyName>
+            <cac:PostalAddress>
+                <cbc:StreetName>The Sett</cbc:StreetName>
+                <cbc:AdditionalStreetName>5 Badger Lane</cbc:AdditionalStreetName>
+                <cbc:CityName>Badgertown</cbc:CityName>
+                <cbc:PostalZone>Badger999</cbc:PostalZone>
+                <cbc:CountrySubentity></cbc:CountrySubentity>
+                <cac:Country>
+                    <cbc:IdentificationCode>GB</cbc:IdentificationCode>
+                    <cbc:Name>England</cbc:Name>
+                </cac:Country>
+            </cac:PostalAddress>
+            <cac:PartyTaxScheme>
+                <cbc:CompanyID>123456789</cbc:CompanyID>
+                <cac:TaxScheme>
+                    <cbc:ID>VAT</cbc:ID>
+                </cac:TaxScheme>
+            </cac:PartyTaxScheme>
+            <cac:Contact>
+                <cbc:Name>Mr B. Badger</cbc:Name>
+            </cac:Contact>
+        </cac:Party>
+    </cac:AccountingSupplierParty>
+    <cac:AccountingCustomerParty>
+        <cbc:SupplierAssignedAccountID>2</cbc:SupplierAssignedAccountID>
+        <cac:Party>
+            <cac:PartyName>
+                <cbc:Name>Lovely Customer Inc.</cbc:Name>
+            </cac:PartyName>
+            <cac:PostalAddress>
+                <cbc:StreetName>The pasture</cbc:StreetName>
+                <cbc:CityName>Mootown</cbc:CityName>
+                <cbc:PostalZone>MOOO</cbc:PostalZone>
+                <cbc:CountrySubentity>Cow Kingdom</cbc:CountrySubentity>
+                <cac:Country>
+                    <cbc:IdentificationCode>GB</cbc:IdentificationCode>
+                    <cbc:Name>Scotland</cbc:Name>
+                </cac:Country>
+            </cac:PostalAddress>
+            <cac:PartyTaxScheme>
+                <cbc:CompanyID>987654321</cbc:CompanyID>
+                <cac:TaxScheme>
+                    <cbc:ID>VAT</cbc:ID>
+                </cac:TaxScheme>
+            </cac:PartyTaxScheme>
+            <cac:Contact>
+                <cbc:Name>Fred</cbc:Name>
+            </cac:Contact>
+        </cac:Party>
+    </cac:AccountingCustomerParty>
+    <cac:PaymentTerms>
+        <cac:SettlementPeriod>
+            <cbc:StartDate>2008-06-30</cbc:StartDate>
+            <cbc:StartTime>00:00:00+00:00</cbc:StartTime>
+            <cbc:EndDate>2008-07-30</cbc:EndDate>
+            <cbc:EndTime>00:00:00+00:00</cbc:EndTime>
+        </cac:SettlementPeriod>
+    </cac:PaymentTerms>
+    <cac:TaxTotal>
+        <cbc:TaxAmount currencyID="GBP">15.0</cbc:TaxAmount>
+    </cac:TaxTotal>
+    <cac:LegalMonetaryTotal>
+        <cbc:TaxExclusiveAmount currencyID="GBP">300.0</cbc:TaxExclusiveAmount>
+        <cbc:PayableAmount currencyID="GBP">315.0</cbc:PayableAmount>
+    </cac:LegalMonetaryTotal>
+    <cac:InvoiceLine>
+        <cbc:ID>2</cbc:ID>
+        <cbc:UUID>0cc65e20-cfac-012b-481d-0017f22d32c0</cbc:UUID>
+        <cbc:InvoicedQuantity>4.0</cbc:InvoicedQuantity>
+        <cbc:LineExtensionAmount currencyID="GBP">200.0</cbc:LineExtensionAmount>
+        <cbc:TaxPointDate>2008-06-25</cbc:TaxPointDate>
+        <cac:TaxTotal>
+            <cbc:TaxAmount currencyID="GBP">0.0</cbc:TaxAmount>
+        </cac:TaxTotal>
+        <cac:Item>
+            <cbc:Description>this is the SubLineItem</cbc:Description>
+        </cac:Item>
+    </cac:InvoiceLine>
+    <cac:InvoiceLine>
+        <cbc:ID>1</cbc:ID>
+        <cbc:UUID>0cc659f0-cfac-012b-481d-0017f22d32c0</cbc:UUID>
+        <cbc:InvoicedQuantity>1.0</cbc:InvoicedQuantity>
+        <cbc:LineExtensionAmount currencyID="GBP">100.0</cbc:LineExtensionAmount>
+        <cbc:TaxPointDate>2008-06-30</cbc:TaxPointDate>
+        <cac:TaxTotal>
+            <cbc:TaxAmount currencyID="GBP">15.0</cbc:TaxAmount>
+        </cac:TaxTotal>
+        <cac:Item>
+            <cbc:Description>moo</cbc:Description>
+        </cac:Item>
+    </cac:InvoiceLine>
+</ubl:Invoice>