stockor-core 0.2

data/test/sku_test.rb

@@ -0,0 +1,45 @@
+require_relative 'test_helper'
+
+class SkuTest < Skr::TestCase
+
+    def test_locations
+        sku = skr_skus(:string)
+        assert_equal 2, sku.sku_locs.length
+        assert sku.sku_locs.find_or_create_for( skr_locations(:surplus) )
+        loc = skr_locations(:amazon)
+        refute sku.sku_locs.where( location: loc ).first
+        assert sku.sku_locs.find_or_create_for( loc )
+    end
+
+    def test_vendors
+        sku = skr_skus(:glove)
+        assert sku.sku_vendors.default
+        assert_equal skr_sku_vendors(:glove_bigco), sku.sku_vendors.default
+    end
+
+    def test_uoms
+        sku = skr_skus(:hat)
+        assert sku.uoms.default
+    end
+
+
+    def test_auto_location_creation
+        sku=Sku.new({ :code=>'Test', :description=>'A Long Description' })
+        sku.sku_vendors.build({
+                part_code: 'TESTHAT', vendor: skr_vendors(:bigco),
+                list_price: 0.42, cost: 0.34, uom_size: 1, uom_code: 'EA' })
+        sku.default_uom_code  = 'EA'
+        assert_empty sku.sku_locs
+        assert_saves sku
+        refute_empty sku.sku_locs
+    end
+
+    def test_scopes
+        assert_equal skr_skus(:string), Sku.with_vendor_part_code( 'STRINGBALL' ).first
+        assert Sku.in_location( skr_locations(:amazon) ).where( code: 'HAT' ).first
+        sku=Sku.with_qty_details.where( code: 'HAT' ).first
+        assert_equal 25, sku.qty_on_orders
+        assert_equal 35, sku.qty_on_hand
+        assert_equal 4,  sku.qty_incoming
+    end
+end

data/test/sku_tran_test.rb

@@ -0,0 +1,21 @@
+require_relative 'test_helper'
+
+class SkuTranTest < Skr::TestCase
+
+    def test_origin
+        ia = skr_inventory_adjustments(:first)
+        assert ia.mark_applied, "failed to mark as applied"
+        st = ia.lines.first.sku_tran
+        assert st, "SkuTran wasn't created"
+        assert_match( /^IA/, st.origin_description )
+    end
+
+    # def test_eq_qty
+    #     st = SkuTran.new( qty: 8 )
+    #     assert_equal 8, st.ea_qty
+
+    #     st = SkuTran.new( uom: Skr::Uom.new( size: 10 ), qty: 8 )
+    #     assert_equal 80, st.ea_qty
+    # end
+
+end

data/test/sku_vendor_test.rb

@@ -0,0 +1,13 @@
+require_relative 'test_helper'
+
+class SkuVendorTest < Skr::TestCase
+
+    def test_associations
+        sv = skr_sku_vendors(:hat_bigco)
+        assert_equal sv.vendor, skr_vendors(:bigco)
+        assert_equal sv.sku,    skr_skus(:hat)
+        skr_skus(:hat).sku_vendors.where( part_code: sv.part_code ).first.must_equal sv
+        skr_vendors(:bigco).sku_vendors.where( vendor_id: sv.vendor, part_code: sv.part_code ).first.must_equal sv
+    end
+
+end

data/test/so_line_test.rb

@@ -0,0 +1,89 @@
+require_relative 'test_helper'
+
+class SoLineTest < Skr::TestCase
+
+
+    def test_creation
+        sol = SoLine.new({
+            sales_order:  skr_sales_orders(:first),
+            sku_loc:      skr_sku_locs(:hatdefault),
+            description:'A Test', price: 12.42
+          })
+        sol.uom = skr_uoms('HATEA')
+        assert_saves sol
+    end
+
+    def test_scopes
+        sol = skr_so_lines(:first_string)
+        sol.sku_loc.allocate_available_qty!
+        assert_equal 3, SoLine.open.count
+        assert_equal 3, SoLine.allocated.count
+        assert_equal 2, SoLine.unallocated.count
+        assert_equal 1, SoLine.pickable.count
+    end
+
+    def test_allocation
+        so = SalesOrder.new({ customer: skr_customers(:argosity) })
+        sku_loc = skr_sku_locs(:hatdefault)
+        assert_equal 20, sku_loc.qty_available
+        so.lines.build({ qty: 2, :price=>2.22, sku_loc: sku_loc })
+        assert_difference 'sku_loc.reload.qty_allocated',2 do
+            assert_saves so
+        end
+    end
+
+    def test_overcreate_prevented
+        so = skr_sales_orders(:first)
+        skr_sku_locs(:stringdefault).allocate_available_qty!
+        pt = so.pick_tickets.build
+
+        refute_empty pt.lines
+        assert_saves pt
+
+        empty_pt = so.pick_tickets.build
+        assert_empty empty_pt.lines
+        refute_saves empty_pt
+
+        # This is a corner case
+        # if the pt is created without referencing the SO
+        # it can sneak through.  Not sure if we should prevent
+        # this or not, I mean.. maybe you want/need this?
+        manual_pt = PickTicket.new( sales_order: so )
+        manual_pt.lines.build({
+            so_line: pt.lines.first.so_line
+          })
+        assert_saves manual_pt
+    end
+
+    def test_backorders
+        so = skr_sales_orders(:first)
+        assert_equal 1, so.lines.count
+        assert_equal 1, so.lines.unallocated.count
+        line = so.lines.first
+        line.update_attributes :qty_allocated => line.qty
+        assert_equal 0, so.lines.unallocated.count
+
+        line = skr_sales_orders(:picking).lines.unallocated.first
+        assert line
+        line.update_attributes :qty_allocated => line.qty, :qty_picking=>line.qty
+        assert_equal 1, line = skr_sales_orders(:picking).lines.unallocated.count
+        assert_equal 0, skr_sales_orders(:complete).lines.unallocated.count
+    end
+
+    def test_picking_qty
+        sol = skr_so_lines(:first_string)
+        sol.sku_loc.allocate_available_qty!
+        pt = sol.sales_order.pick_tickets.build
+        assert_saves pt
+        assert_equal 2, sol.reload.qty_picking
+    end
+
+    def test_invoice_qty
+        so = skr_sales_orders(:first)
+        inv = Invoice.new( sales_order: so )
+        inv.lines.from_sales_order!
+        assert_saves inv
+        assert_equal inv.lines.first.qty, so.lines.first.qty_invoiced
+    end
+
+end

data/test/test_helper.rb

@@ -0,0 +1 @@
+require 'skr/core/testing/helper'

data/test/uom_test.rb

@@ -0,0 +1,14 @@
+require_relative 'test_helper'
+
+class UomTest < Skr::TestCase
+
+
+    def test_combining
+        uom = Uom.new
+        uom.size = 1
+        uom.code = 'BOX'
+        assert_equal 'BOX', uom.combined_uom
+        uom.size = 10
+        assert_equal 'BOX/10', uom.combined_uom
+    end
+end

data/test/vendor_test.rb

@@ -0,0 +1,35 @@
+require_relative 'test_helper'
+
+class VendorTest < Skr::TestCase
+
+    def setup
+        @vendor = Vendor.new({
+            code: 'TEST',
+            name: 'Mr Test Co',
+            billing_address: skr_addresses(:bigco),
+            shipping_address: skr_addresses(:bigco),
+            terms: skr_payment_terms(:net30)
+          })
+    end
+
+    def test_saving
+        assert @vendor.save
+    end
+
+    def test_it_sets_gl
+        assert @vendor.save
+        assert_equal '2200', @vendor.gl_payables_account.number
+    end
+
+    def test_creating
+        vendor = Vendor.find_by_code "BIGCO"
+        po = PurchaseOrder.new( vendor: vendor )
+        Sku.where( code: ['HAT','STRING'] ).each do | sku |
+            po.lines.build(
+              sku_vendor: sku.sku_vendors.for_vendor( vendor )
+            )
+        end
+        po.save
+
+    end
+end

data/test/vo_line_test.rb

@@ -0,0 +1,20 @@
+require_relative 'test_helper'
+
+
+class VoucherLineTest < Skr::TestCase
+
+
+    def test_gl_posting
+        acct = GlAccount.default_for( :inventory_receipts_clearing )
+        po = skr_purchase_orders(:first)
+
+        v = Voucher.new({ :purchase_order => po })
+        old_balance = acct.trial_balance
+        po.lines.each do | poline |
+            v.lines.build({ :po_line => poline })
+        end
+        assert_saves v
+        assert_equal old_balance - v.total, acct.trial_balance
+    end
+
+end

data/test/voucher_test.rb

@@ -0,0 +1,35 @@
+require_relative 'test_helper'
+
+
+class VoucherTest < Skr::TestCase
+
+
+
+    def test_creation
+        por = skr_po_receipts(:first)
+        assert por.vendor
+        v = Voucher.new({ po_receipt: por })
+        por.lines.each do | por_line |
+            v.lines.build({ po_line: por_line.po_line })
+        end
+        assert_saves v
+    end
+
+    def test_state_transistions
+        v=Voucher.new({ :po_receipt => skr_po_receipts(:first) })
+        v.lines.build({
+            :po_line => skr_po_lines(:second_on_first)
+        })
+        assert_saves v
+
+        acct   = v.vendor.gl_payables_account
+        before = acct.trial_balance
+        assert_equal 'pending', v.state
+        assert_difference 'acct.trial_balance', before - v.total do
+            v.mark_confirmed
+            assert_saves v
+        end
+
+    end
+
+end

data/yard_ext/all.rb

@@ -0,0 +1,9 @@
+require_relative 'validators'
+require_relative 'config_options'
+require_relative 'concern_meta_methods'
+require_relative 'exported_scope'
+require_relative 'visible_id_handler'
+require_relative 'code_identifier_handler'
+require_relative 'immutable_handler'
+require_relative 'locked_fields_handler'
+require_relative 'json_attr_accessor'

data/yard_ext/code_identifier_handler.rb

@@ -0,0 +1,33 @@
+class CodeIdentifierHandler < SkrMetaMethodHandler
+
+    namespace_only
+    handles method_call(:has_code_identifier)
+
+    def process
+        super
+        add_to_overview
+
+
+        params = statement.parameters
+        if params.size > 1
+            params.pop
+            params.detect{ | param |
+                param.jump(:hash).source =~ /(:from\s*=>|from:)\s*["':]([^\W]+)/
+            }
+            namespace.docstring += "\n\nIf left blank, the {#code} field will be set by sending the {##{$2}} field through {Skr::Core::Strings.code_identifier}"
+        end
+
+    end
+
+    def concern_path
+        "Skr::Concerns::CodeIdentifier"
+    end
+
+    def method_name
+        :has_code_identifier
+    end
+
+    def method_title
+        'Has Code Identifier'
+    end
+end

data/yard_ext/concern_meta_methods.rb

@@ -0,0 +1,60 @@
+class SkrMetaMethodHandler < YARD::Handlers::Ruby::MethodHandler
+
+    def process
+        if group_name
+            namespace.groups << group_name unless namespace.groups.include? group_name
+        end
+    end
+
+    def get_namespace( path )
+        ensure_loaded! P( path )
+        P( path )
+    end
+
+    def get_method( ns )
+    end
+
+    def add_to_overview
+        ns = get_namespace( concern_path + "::ClassMethods" )
+        method = ns.meths.detect{ |nsmethod|  nsmethod.name == method_name }
+
+        namespace.docstring += "\n\n" +
+                               "## #{method_title} {#{ns} >>}\n\n" +
+                               method.docstring.dup
+
+        method.docstring.tags.each{ |tag|  namespace.docstring.add_tag tag }
+    end
+
+    def add_instance_methods
+        ns = get_namespace( concern_path + "::InstanceMethods" )
+        ns.meths.each do |nsmethod|
+            object = YARD::CodeObjects::MethodObject.new(namespace, nsmethod.name )
+            object.scope = :instance
+            object.explicit = false
+
+            object.docstring = nsmethod.docstring.dup
+            register object
+        end
+    end
+
+    def add_class_methods
+        ns = get_namespace( concern_path + "::MixedInClassMethods" )
+
+        ns.meths.each do |nsmethod|
+            object = YARD::CodeObjects::MethodObject.new(namespace, nsmethod.name )
+            object.scope = :instance
+            object.explicit = false
+
+            object.docstring = nsmethod.docstring.dup
+            register object
+        end
+    end
+
+    def method_title
+        method_name.to_s.titleize
+    end
+
+    def group_name
+    end
+
+end

data/yard_ext/config_options.rb

@@ -0,0 +1,27 @@
+class ConfigOptionHandler < YARD::Handlers::Ruby::Base
+    handles method_call(:config_option)
+    namespace_only
+
+    def process
+
+        name = statement.parameters.first.jump(:tsymbol_content, :ident).source
+        object = YARD::CodeObjects::MethodObject.new(namespace, name)
+
+        param_size = statement.parameters.size
+        default = statement.parameters[ param_size - 2 ]
+
+        object.parameters = [['default',default.source]]
+
+        # modify the object
+        object.dynamic = true
+
+        register(object)
+        unless object.docstring.has_tag?(:return)
+            object.docstring.add_tag YARD::Tags::Tag.new( :return, "defaults to #{default.source}", [ default.type.to_s.sub(/_.*$/,'').capitalize ])
+        end
+    end
+    def get_tag(tag, text, return_classes = [])
+        YARD::Tags::Tag.new(tag, text, [return_classes].flatten)
+    end
+
+end

data/yard_ext/exported_scope.rb

@@ -0,0 +1,4 @@
+class ExportedScopeHandler < YARD::Handlers::Ruby::ActiveRecord::Scopes::ScopeHandler
+    handles method_call(:export_scope)
+    namespace_only
+end

data/yard_ext/immutable_handler.rb

@@ -0,0 +1,17 @@
+class ImmutableHandler < SkrMetaMethodHandler
+
+    namespace_only
+    handles method_call(:is_immutable)
+
+    def process
+        add_to_overview
+    end
+
+    def concern_path
+        "Skr::Concerns::ImmutableModel"
+    end
+
+    def method_name
+        :is_immutable
+    end
+end