prs/prs.classes/Entities/Job/JobBillOfMaterialsItem.cs

using System;
using System.Collections.Generic;
using System.Linq;
using System.Linq.Expressions;
using InABox.Core;
using PRSClasses;

namespace Comal.Classes
{
    [Caption("Materials")]
    public class JobBillOfMaterialsItem : StockEntity, IRemotable, IPersistent, IOneToMany<Job>, 
        IOneToMany<JobBillOfMaterials>, ISequenceable, ILicense<ProjectManagementLicense>, IJobMaterial,
        IProblems<ManagedProblem>
    {
        [EntityRelationship(DeleteAction.Cascade)]
        [Editable(Editable.Hidden)]
        public JobLink Job { get; set; }
        
        [EntityRelationship(DeleteAction.Cascade)]
        [Editable(Editable.Hidden)]
        public JobBillOfMaterialsLink BillOfMaterials { get; set; }
        
        [EditorSequence(1)]
        [EntityRelationship(DeleteAction.SetNull)]
        [RequiredColumn]
        public override ProductLink Product { get; set; }

        [EditorSequence(2)]
        [EntityRelationship(DeleteAction.SetNull)]
        public ProductStyleLink Style { get; set; }

        [EditorSequence(3)]
        [RequiredColumn]
        [DimensionsEditor(typeof(StockDimensions))]
        public override StockDimensions Dimensions { get; set; }
        
        [EditorSequence(4)]
        [RequiredColumn]
        public JobScopeLink Scope { get; set; }
        
        [EditorSequence(5)]
        [DecimalEditor(Summary = Summary.Sum)]
        public decimal Quantity { get; set; }
        
        [EditorSequence(6)]
        public decimal UnitCost { get; set; }

        [EditorSequence(7)]
        [CurrencyEditor(Summary = Summary.Sum)]
        public decimal TotalCost { get; set; }
        
        [EditorSequence(8)]
        [TextBoxEditor]
        public string Section { get; set; }

        [EditorSequence(9)]
        public SupplierLink Supplier { get; set; }
        
        private class JobITPLookup : LookupDefinitionGenerator<JobITP, JobBillOfMaterialsItem>
        {
            public override Filter<JobITP> DefineFilter(JobBillOfMaterialsItem[] items)
            {
                if (items.Length == 1)
                    return Filter<JobITP>.Where(x => x.Job.ID).IsEqualTo(items.First().Job.ID);
                return LookupFactory.DefineFilter<JobITP>();
            }

            public override Columns<JobBillOfMaterialsItem> DefineFilterColumns()
                => Columns.None<JobBillOfMaterialsItem>().Add(x => x.Job.ID);
        }
        [EditorSequence(10)]
        [EntityRelationship(DeleteAction.SetNull)]
        [LookupDefinition(typeof(JobITPLookup))]
        public JobITPLink ITP { get; set; }
        
        [NullEditor]
        public long Sequence { get; set; }

        public PurchaseOrderItemLink PurchaseOrderItem { get; set; }

        public ManufacturingPacketLink Packet { get; set; }
        
        [EditorSequence("Issues", 1)]
        public ManagedProblem Problem { get; set; }

        static JobBillOfMaterialsItem()
        {
            LinkedProperties.Register<JobBillOfMaterialsItem, ProductStyleLink, Guid>(x => x.Product.DefaultInstance.Style, x => x.ID, x => x.Style.ID);
            LinkedProperties.Register<JobBillOfMaterialsItem, ProductStyleLink, String>(x => x.Product.DefaultInstance.Style, x => x.Code, x => x.Style.Code);
            LinkedProperties.Register<JobBillOfMaterialsItem, ProductStyleLink, String>(x => x.Product.DefaultInstance.Style, x => x.Description, x => x.Style.Description);
            
            LinkedProperties.Register<JobBillOfMaterialsItem, ProductInstanceLink, decimal>(x => x.Product.DefaultInstance, x => x.NettCost, x => x.UnitCost);
            LinkedProperties.Register<JobBillOfMaterialsItem, SupplierLink, Guid>(x => x.Product.Supplier.Supplier, x => x.ID, x => x.Supplier.ID);

            LinkedProperties.Register<JobBillOfMaterialsItem, JobLink, Guid>(x => x.Job, x => x.DefaultScope.ID, x => x.Scope.ID);
            
            StockEntity.LinkStockDimensions<JobBillOfMaterialsItem>();
        }
        
        private bool bChanging;
        
        protected override void DoPropertyChanged(string name, object? before, object? after)
        {
            if (bChanging)
                return;

            try
            {
                bChanging = true;

                if (name.Equals(nameof(Quantity)) && after is decimal qty)
                    TotalCost = UnitCost * qty;
                
                else if (name.Equals(nameof(UnitCost)) && after is decimal cost)
                    TotalCost = cost * Quantity;

                else if (name.Equals(nameof(TotalCost)) && after is decimal total)
                {
                    if (Quantity == 0)
                        Quantity = 1;
                    UnitCost = total / Quantity;
                }
            }
            finally
            {
                bChanging = false;
            }
            base.DoPropertyChanged(name, before, after);
        }
        
        public static void UpdateCosts(IEnumerable<JobBillOfMaterialsItem> items, Dictionary<String,object?> changes)
        {

            void UpdateValue<TType>(JobBillOfMaterialsItem item,Expression<Func<JobBillOfMaterialsItem, TType>> property, TType value)
            {
                CoreUtils.MonitorChanges(
                    item, 
                    () => CoreUtils.SetPropertyValue(item, CoreUtils.GetFullPropertyName(property, "."), value),
                    changes
                );
            }

            var _items = items as JobBillOfMaterialsItem[] ?? items.ToArray();
            var productids = _items.Where(x => x.Product.ID != Guid.Empty).Select(x => x.Product.ID).ToArray();
            var jobids = _items.Select(x => x.Job.ID).ToList().Append(Guid.Empty).Distinct().ToArray();
            
            if(productids.Length == 0)
                return;
            
            MultiQuery query = new MultiQuery();
            query.Add(
                Filter<SupplierProduct>.Where(x =>x.Product.ID).InList(productids),
                Columns.None<SupplierProduct>().Add(x=>x.Product.ID)
                    .Add(x=>x.Supplier.ID)
                    .Add(x=>x.Style.ID)
                    .AddDimensionsColumns(x => x.Dimensions)
                    .Add(x=>x.Job.ID)
                    .Add(x=>x.SupplierCode)
                    .Add(x=>x.SupplierDescription)
                    .Add(x=>x.TradePrice)
                    .Add(x=>x.CostPrice)
                    .Add(x=>x.DiscountGroup.ID)
            );
            
            query.Add(
                Filter<SupplierDiscount>.Where(x =>x.Job.ID).InList(jobids)
                    .And(x => x.Group.ID).InQuery(
                        Filter<SupplierProduct>.Where(x => x.Product.ID).InList(productids), 
                        x => x.DiscountGroup.ID
                    ),
                Columns.None<SupplierDiscount>()
                    .Add(x=>x.Group.ID)
                    .Add(x=>x.Job.ID)
                    .Add(x=>x.Group.Type)
                    .Add(x=>x.Value)
            );
            
            query.Add(
                Filter<ProductInstance>.Where(x =>x.Product.ID).InList(productids),
                Columns.None<ProductInstance>().Add(x=>x.Product.ID)
                    .Add(x => x.Style.ID)
                    .AddDimensionsColumns(x => x.Dimensions)
                    .Add(x => x.NettCost)
            );
            
            
            
            query.Query();

            var supplierProducts = query.Get<SupplierProduct>().ToArray<SupplierProduct>();
            var supplierDiscounts = query.Get<SupplierDiscount>().ToArray<SupplierDiscount>();
            var productInstances = query.Get<ProductInstance>().ToArray<ProductInstance>();
                
            foreach (var item in _items)
            {
                //Check Supplier / Job Specific Pricing
                var supplierProduct = supplierProducts.FirstOrDefault(x =>
                    x.Product.ID == item.Product.ID
                    && x.Supplier.ID == item.Supplier.ID
                    && x.Style.ID == item.Style.ID
                    && x.Dimensions.Equals(item.Dimensions)
                    && x.Job.ID == item.Job.ID);
                if (supplierProduct != null)
                {
                    UpdateValue<decimal>(item, x => x.UnitCost, supplierProduct.CostPrice);
                    continue;
                }
                
                // Check Supplier / General Pricing
                supplierProduct = supplierProducts.FirstOrDefault(x =>
                    x.Product.ID == item.Product.ID
                    && x.Supplier.ID == item.Supplier.ID
                    && x.Style.ID == item.Style.ID
                    && x.Dimensions.Equals(item.Dimensions)
                    && x.Job.ID == Guid.Empty);
                if (supplierProduct != null)
                {
                    var discount = supplierDiscounts.FirstOrDefault(x=>x.Job.ID == item.Job.ID && x.Group.ID == supplierProduct.DiscountGroup.ID);
                    if (discount == null)
                        discount = supplierDiscounts.FirstOrDefault(x=>x.Job.ID == Guid.Empty && x.Group.ID == supplierProduct.DiscountGroup.ID);
                    if (discount != null)
                    {
                        if (discount.Group.Type == SupplierDiscountGroupType.Discount)
                        {
                            var disc = (100 - discount?.Value ?? 0) / 100;
                            UpdateValue<decimal>(item, x => x.UnitCost, supplierProduct.TradePrice * disc);
                        }
                        else
                            UpdateValue<decimal>(item, x => x.UnitCost, discount.Value);
                    }
                    else
                        UpdateValue<decimal>(item, x => x.UnitCost, supplierProduct.CostPrice);
                    continue;
                }
                
                // Check Specific Product Instance
                var productInstance = productInstances.FirstOrDefault(x =>
                    x.Product.ID == item.Product.ID
                    && x.Style.ID == item.Style.ID
                    && x.Dimensions.Equals(item.Dimensions));
                if (productInstance != null)
                    UpdateValue<decimal>(item, x => x.UnitCost, productInstance.NettCost);
                else
                    UpdateValue<decimal>(item, x => x.UnitCost, 0);

            }
        }


    }
    
}