| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001 |
- using Comal.Classes;
- using InABox.Clients;
- using InABox.Core;
- using InABox.DynamicGrid;
- using InABox.Wpf;
- using InABox.WPF;
- using PRSDesktop.Panels.StockForecast.OrderScreen;
- using System;
- using System.Collections.Generic;
- using System.Linq;
- using System.Linq.Expressions;
- using System.Threading;
- using System.Windows;
- using System.Windows.Controls;
- using System.Windows.Media;
- using System.Windows.Media.Imaging;
- namespace PRSDesktop;
- public class StockForecastGrid : DynamicDataGrid<ProductInstance>, IDataModelSource
- {
- private enum ColumnTag
- {
- MinimumStockRequired,
- GeneralStockHoldings,
- GeneralPurchaseOrders,
- JobStockRequired,
- JobStockHoldings,
- JobPurchaseOrders,
- BalanceRequired
- }
-
- private CoreTable? _stockHoldings = null;
- private CoreTable? _poItems = null;
- private CoreTable? _jobBOMs = null;
- private CoreTable? _stockMovements = null;
- private CoreTable? _supplierProducts = null;
-
- private static readonly BitmapImage _warning = InABox.Wpf.Resources.warning.AsBitmapImage();
- private static readonly BitmapImage _tick = InABox.Wpf.Resources.tick.AsBitmapImage();
- private static readonly BitmapImage _cart = PRSDesktop.Resources.purchase.AsBitmapImage();
- public Guid[] GroupIDs { get; set; } = [];
- public Guid[] JobIDs { get; set; } = [];
- public HashSet<Guid> SupplierIDs { get; set; } = [];
- private readonly Button OrderButton;
- private HashSet<Guid> SelectedForOrder = [];
-
- public StockForecastGrid() : base()
- {
-
- ColumnsTag = "StockForecastGrid";
-
- HiddenColumns.Add(x=>x.ID);
- HiddenColumns.Add(x => x.Product.ID);
- HiddenColumns.Add(x => x.Product.Issues);
- HiddenColumns.Add(x => x.Style.ID);
- HiddenColumns.Add(x => x.Dimensions.UnitSize);
- HiddenColumns.Add(x => x.Product.Image.ID);
- HiddenColumns.Add(x => x.Product.Image.FileName);
- HiddenColumns.Add(x=>x.Product.Supplier.ID);
- HiddenColumns.Add(x=>x.Product.Supplier.SupplierLink.ID);
- HiddenColumns.Add(x=>x.MinimumStockLevel);
-
- ActionColumns.Add(new DynamicImageColumn(Issues_Image, null)
- {
- ToolTip = Issues_Tooltip,
- Position = DynamicActionColumnPosition.Start
- });
- ActionColumns.Add(new DynamicImagePreviewColumn<ProductInstance>(x => x.Product.Image)
- {
- Position = DynamicActionColumnPosition.Start
- });
-
- CreateColumn(GetMinimumStockLevel, ColumnTag.MinimumStockRequired,"Min Stk.","F2");
- CreateColumn(GetGeneralStockLevel, ColumnTag.GeneralStockHoldings,"Gen Hld.","F2");
- CreateColumn(GetGeneralPurchaseOrder, ColumnTag.GeneralPurchaseOrders, "Gen PO.","F2");
- CreateColumn(GetBOMBalance, ColumnTag.JobStockRequired, "Job BOM.","F2");
- CreateColumn(GetReservedStock, ColumnTag.JobStockHoldings, "Job Hld.","F2");
- CreateColumn(GetReservedPurchaseOrder, ColumnTag.JobPurchaseOrders, "Job PO.","F2");
- CreateColumn(GetBalanceRequired, ColumnTag.BalanceRequired,"Required","");
- ActionColumns.Add(new DynamicImageColumn(SelectForOrder_Image, SelectForOrder_Click)
- {
- Position = DynamicActionColumnPosition.End
- });
-
- OrderButton = AddButton("Order Stock", _cart, OrderStock_Click);
- OrderButton.IsEnabled = false;
- }
-
- private BitmapImage? Issues_Image(CoreRow? row)
- {
- return (row is null)
- ? _warning
- : row.Get<ProductInstance, string>(x => x.Product.Issues).IsNullOrWhiteSpace()
- ? null
- : _warning;
- }
- private FrameworkElement? Issues_Tooltip(DynamicActionColumn column, CoreRow? row)
- {
- return (row is null)
- ? null
- : column.TextToolTip(row.Get<ProductInstance, string>(x => x.Product.Issues));
- }
- #region UIComponent
- private UIComponent? _uicomponent = null;
- private class UIComponent : DynamicGridGridUIComponent<ProductInstance>
- {
- private StockForecastGrid Grid;
- public UIComponent(StockForecastGrid grid)
- {
- Grid = grid;
- Parent = grid;
- }
- private int? _instanceProductIDCol;
- private int? _instanceStyleIDCol;
- private int[]? _instanceDimCols;
- private int? _instanceSupplierCol;
-
- private int? _supplierProductIDCol;
- private int? _supplierStyleIDCol;
- private int[]? _supplierDimCols;
- private int? _supplierSupplierCol;
-
- public bool CheckSuppliers(CoreRow row)
- {
- if (Grid._supplierProducts == null)
- return false;
-
- _supplierProductIDCol ??=
- Grid._supplierProducts.GetColumnIndex<SupplierProduct>(x => x.Product.ID);
- _supplierStyleIDCol ??=
- Grid._supplierProducts.GetColumnIndex<SupplierProduct>(x => x.Style.ID);
- _supplierDimCols ??= Dimensions.GetFilterColumnIndices<SupplierProduct>(Grid._supplierProducts, x => x.Dimensions);
- _supplierSupplierCol ??=
- Grid._supplierProducts.GetColumnIndex<SupplierProduct>(x => x.SupplierLink.ID);
- _instanceProductIDCol ??= row.Table.GetColumnIndex<ProductInstance>(x => x.Product.ID);
- _instanceStyleIDCol ??= row.Table.GetColumnIndex<ProductInstance>(x => x.Style.ID);
- _instanceDimCols ??= Dimensions.GetFilterColumnIndices<ProductInstance>(row.Table, x => x.Dimensions);
-
- return Grid._supplierProducts.Rows.Any(r =>
- Equals(r.Values[_supplierProductIDCol.Value], row.Values[_instanceProductIDCol.Value])
- && Equals(r.Values[_supplierStyleIDCol.Value], row.Values[_instanceStyleIDCol.Value])
- && r.ToDimensions<StockDimensions>(_supplierDimCols).Equals(row.ToDimensions<StockDimensions>(_instanceDimCols))
- && Grid.SupplierIDs.Contains((Guid?)r.Values[_supplierSupplierCol.Value] ?? Guid.Empty));
- }
-
- protected override Brush? GetCellBackground(CoreRow row, DynamicColumnBase column)
- {
- _instanceProductIDCol ??= row.Table.GetColumnIndex<ProductInstance>(x => x.Product.ID);
- _instanceStyleIDCol ??= row.Table.GetColumnIndex<ProductInstance>(x => x.Style.ID);
- _instanceDimCols ??= Dimensions.GetFilterColumnIndices<ProductInstance>(row.Table, x => x.Dimensions);
- if (column is DynamicTextColumn col && Grid._summaryinfo.TryGetValue(row.Get<ProductInstance,Guid>(x=>x.ID), out StockForecastInfo? info))
- {
- var stock = Math.Max(0.0F, info.MinStock - (info.GenStock + info.GenPO)).IsEffectivelyEqual(0.0F)
- ? new SolidColorBrush(Colors.LightBlue) { Opacity = 0.5 }
- : new SolidColorBrush(Colors.LightSalmon) { Opacity = 0.5 };
-
- var job = Math.Max(0.0F, info.JobBOM - (info.JobStock + info.JobPO)).IsEffectivelyEqual(0.0F)
- ? new SolidColorBrush(Colors.LightGreen) { Opacity = 0.5 }
- : new SolidColorBrush(Colors.LightSalmon) { Opacity = 0.5 };
-
- var overall = !(Grid.Optimise ? info.Optimised : info.Required).IsEffectivelyEqual(0.0F)
- ? new SolidColorBrush(Colors.LightSalmon) { Opacity = 0.5 }
- : null;
-
- return col.Tag switch
- {
- ColumnTag.MinimumStockRequired => stock,
- ColumnTag.GeneralStockHoldings => stock,
- ColumnTag.GeneralPurchaseOrders => stock,
- ColumnTag.JobStockRequired => job,
- ColumnTag.JobStockHoldings => job,
- ColumnTag.JobPurchaseOrders => job,
- ColumnTag.BalanceRequired => overall,
- _ => null
- };
- }
- else
- {
- if (Grid.AllStock && !CheckSuppliers(row))
- return new SolidColorBrush(Colors.Silver) { Opacity = 0.5F };
- }
-
- return null;
- }
- }
- protected override IDynamicGridUIComponent<ProductInstance> CreateUIComponent()
- {
- return _uicomponent ??= new UIComponent(this);
- }
- #endregion
- protected override void DoReconfigure(DynamicGridOptions options)
- {
- base.DoReconfigure(options);
- options.Clear();
- options.RecordCount = true;
- options.SelectColumns = true;
- options.FilterRows = true;
- options.ExportData = true;
- options.MultiSelect = true;
- options.HideDatabaseFilters = true;
- }
- protected override void ConfigureColumnGroups()
- {
- base.ConfigureColumnGroups();
- AddColumnGrouping()
- .AddGroup("General Stock", GetColumn(ColumnTag.MinimumStockRequired), GetColumn(ColumnTag.GeneralPurchaseOrders))
- .AddGroup("Job Stock", GetColumn(ColumnTag.JobStockRequired), GetColumn(ColumnTag.JobPurchaseOrders));
- }
- public override DynamicGridColumns GenerateColumns()
- {
- var columns = new DynamicGridColumns();
- columns.Add<ProductInstance, string>(x => x.Product.Code, 120, "Product Code", "", Alignment.MiddleCenter);
- columns.Add<ProductInstance, string>(x => x.Product.Name, 0, "Product Name", "", Alignment.MiddleLeft);
- columns.Add<ProductInstance, string>(x => x.Style.Code, 120, "Style Code", "", Alignment.MiddleCenter);
- columns.Add<ProductInstance, string>(x => x.Dimensions.UnitSize, 120, "Unit Size", "", Alignment.MiddleCenter);
- return columns;
- }
- #region Column Data and Details
- private void CreateColumn(DynamicTextColumn.GetTextDelegate calculate, ColumnTag tag, string header, string format)
- {
- var column = new DynamicTextColumn(calculate)
- {
- Width = 60,
- Format=format,
- Position = DynamicActionColumnPosition.End,
- Tag = tag,
- HeaderText = header,
- FilterRecord = (row, filters) =>
- {
- if (filters.Length == 1 && filters[0].Length == 0) return true;
- var value = GetColumnCalculatedData(tag, row.Get<ProductInstance, Guid>(x => x.ID));
- if(!value.HasValue)
- {
- return false;
- }
- else
- {
- return filters.Contains(value.Value.ToString("F2"));
- }
- }
- };
- ActionColumns.Add(column);
- }
- private DynamicTextColumn GetColumn(ColumnTag tag) => (ActionColumns.First(x => Equals(x.Tag, tag)) as DynamicTextColumn)!;
- private object GetMinimumStockLevel(CoreRow? row) => row?.Get<ProductInstance, double>(x => x.MinimumStockLevel) ?? 0.0F;
-
- private object GetGeneralStockLevel(CoreRow? row)
- {
- if (row != null && _summaryinfo.TryGetValue(row.Get<ProductInstance, Guid>(x => x.ID), out StockForecastInfo? info))
- return info.GenStock;
- return 0.0F;
- }
- private object GetGeneralPurchaseOrder(CoreRow? row)
- {
- if (row != null && _summaryinfo.TryGetValue(row.Get<ProductInstance, Guid>(x => x.ID), out StockForecastInfo? info))
- return info.GenPO;
- return 0.0F;
- }
-
- private object GetBOMBalance(CoreRow? row)
- {
- if (row != null && _summaryinfo.TryGetValue(row.Get<ProductInstance, Guid>(x => x.ID), out StockForecastInfo? info))
- return info.JobBOM;
- return 0.0F;
- }
- private object GetReservedStock(CoreRow? row)
- {
- if (row != null && _summaryinfo.TryGetValue(row.Get<ProductInstance, Guid>(x => x.ID), out StockForecastInfo? info))
- return info.JobStock;
- return 0.0F;
- }
- private object GetReservedPurchaseOrder(CoreRow? row)
- {
- if (row != null && _summaryinfo.TryGetValue(row.Get<ProductInstance, Guid>(x => x.ID), out StockForecastInfo? info))
- return info.JobPO;
- return 0.0F;
- }
- private object GetBalanceRequired(CoreRow? row)
- {
- if (row != null &&
- _summaryinfo.TryGetValue(row.Get<ProductInstance, Guid>(x => x.ID), out StockForecastInfo? info))
- return Optimise
- ? info.Optimised.IsEffectivelyEqual(0.0F) ? "" : $"{info.Optimised:F2}"
- : info.Required.IsEffectivelyEqual(0.0F)
- ? ""
- : $"{info.Required:F2}";
- return "";
- }
- private void ShowDetailGrid<TEntity>(
- String tag,
- Expression<Func<TEntity,object?>> productcol,
- Guid productid,
- Expression<Func<TEntity,object?>> stylecol,
- Guid? styleid,
- Expression<Func<TEntity, IDimensions>> dimcol,
- IDimensions? dimensions,
- Expression<Func<TEntity,object?>>? jobcol,
- Filter<TEntity>? extrafilter,
- Func<CoreRow,bool>? rowfilter
- )
- {
- var grid = (Activator.CreateInstance(typeof(DynamicDataGrid<>).MakeGenericType(typeof(TEntity))) as IDynamicDataGrid);
- if (grid == null)
- {
- MessageWindow.ShowError($"Cannot create Grid for [{typeof(TEntity).Name}]", "", shouldLog: false);
- return;
- }
- grid.ColumnsTag = $"{ColumnsTag}.{tag}";
- grid.Reconfigure(options =>
- {
- options.Clear();
- options.FilterRows = true;
- options.SelectColumns = true;
- });
- grid.OnDefineFilter += t =>
- {
- var filter = new Filter<TEntity>(productcol).IsEqualTo(productid);
- if(dimensions is not null)
- {
- filter = filter.And(CoreUtils.GetFullPropertyName(dimcol, ".")).DimensionEquals(dimensions);
- }
-
- if (styleid.HasValue)
- filter = filter.And(stylecol).IsEqualTo(styleid);
- if (jobcol != null)
- filter = filter.And(new Filter<TEntity>(jobcol).InList(JobIDs));
-
- if (extrafilter != null)
- filter = filter.And(extrafilter);
-
- return filter;
- };
- grid.OnFilterRecord += row => rowfilter?.Invoke(row) ?? true;
- var window = DynamicGridUtils.CreateGridWindow($"Viewing {CoreUtils.Neatify(tag)} Calculation", grid);
- window.ShowDialog();
- }
- protected override void DoDoubleClick(object sender, DynamicGridCellClickEventArgs args)
- {
- //base.DoDoubleClick(sender, args);
- var productid = args?.Row?.Get<ProductInstance, Guid>(c => c.Product.ID) ?? Guid.Empty;
- var styleid = HasStyle() ? args?.Row?.Get<ProductInstance, Guid>(c => c.Style.ID) : null;
- var dimensions = args?.Row?.ToDimensions<ProductInstance, StockDimensions>(x => x.Dimensions);
- if (Equals(args?.Column?.Tag, ColumnTag.GeneralStockHoldings))
- {
- ShowDetailGrid<StockHolding>(
- ColumnTag.GeneralStockHoldings.ToString(),
- x => x.Product.ID,
- productid,
- x => x.Style.ID,
- styleid,
- x=>x.Dimensions,
- dimensions,
- null,
- new Filter<StockHolding>(x=>x.Job.ID).IsEqualTo(Guid.Empty),
- null
- );
- }
-
- else if (Equals(args?.Column?.Tag, ColumnTag.GeneralPurchaseOrders))
- {
- ShowDetailGrid<PurchaseOrderItem>(
- ColumnTag.GeneralPurchaseOrders.ToString(),
- x => x.Product.ID,
- productid,
- x => x.Style.ID,
- styleid,
- x=>x.Dimensions,
- dimensions,
- null,
- new Filter<PurchaseOrderItem>(x=>x.Job.ID).IsEqualTo(Guid.Empty)
- .And(x=>x.ReceivedDate).IsEqualTo(DateTime.MinValue),
- null
- );
- }
-
- else if (Equals(args?.Column?.Tag, ColumnTag.JobStockRequired))
- {
- ShowDetailGrid<JobBillOfMaterialsItem>(
- ColumnTag.JobStockRequired.ToString(),
- x => x.Product.ID,
- productid,
- x => x.Style.ID,
- styleid,
- x=>x.Dimensions,
- dimensions,
- x => x.Job.ID,
- new Filter<JobBillOfMaterialsItem>(x=>x.BillOfMaterials.Approved).IsNotEqualTo(DateTime.MinValue),
- null
- );
- }
-
- else if (Equals(args?.Column?.Tag, ColumnTag.JobStockHoldings))
- {
- ShowDetailGrid<StockHolding>(
- ColumnTag.JobStockHoldings.ToString(),
- x => x.Product.ID,
- productid,
- x => x.Style.ID,
- styleid,
- x=>x.Dimensions,
- dimensions,
- x => x.Job.ID,
- null,
- null
- );
- }
-
- else if (Equals(args?.Column?.Tag, ColumnTag.JobPurchaseOrders))
- {
- ShowDetailGrid<PurchaseOrderItem>(
- ColumnTag.GeneralPurchaseOrders.ToString(),
- x => x.Product.ID,
- productid,
- x => x.Style.ID,
- styleid,
- x=>x.Dimensions,
- dimensions,
- x=>x.Job.ID,
- new Filter<PurchaseOrderItem>(x=>x.ReceivedDate).IsEqualTo(DateTime.MinValue),
- null
- );
- }
-
- }
- #endregion
- #region Refresh
- private bool HasStyle()
- {
- return DataColumns().ColumnNames().Any(x => x.StartsWith("Style.") && !x.Equals("Style.ID"));
- }
- private CoreRow[] GetRows<TSource>(CoreTable table, Guid productid, Guid? styleid, IDimensions dimensions, Guid[] jobids) where TSource : IJobMaterial
- {
- int productcol = table.GetColumnIndex<TSource>(x => x.Product.ID);
- int stylecol = styleid.HasValue ? table.GetColumnIndex<TSource>(x => x.Style.ID) : -1;
- var dimCols = Dimensions.GetFilterColumnIndices<TSource>(table, x => x.Dimensions);
- int jobcol = table.GetColumnIndex<TSource>(x => x.Job.ID);
-
- var subset = table.Rows
- .Where(r =>
- Guid.Equals(r.Values[productcol], productid)
- && (!styleid.HasValue || Guid.Equals(r.Values[stylecol], styleid))
- && r.ToDimensions<StockDimensions>(dimCols).Equals(dimensions)
- && jobids.Any(x=>Equals(x,r.Values[jobcol]))
- );
-
- return subset.ToArray();
- }
- private double Aggregate<TSource>(CoreTable table, IEnumerable<CoreRow> rows, bool hasstyle, bool hasjob, Expression<Func<TSource, object>> source, CoreRow? target = null, Expression<Func<ProductInstance, object>>? aggregate = null)
- {
- int srcol = table.GetColumnIndex(source);
-
- if (srcol == -1)
- return 0.00;
- var total = rows.Aggregate(0d, (value, row) => value + (double)(row.Values[srcol] ?? 0.0d));
-
- // int productcol = columns.IndexOf(x => x.Product.ID);
- // int stylecol = hasstyle ? columns.IndexOf(x => x.Style.ID) : -1;
- // int jobcol = hasjob ? columns.IndexOf(x => x.Job.ID) : -1;
- // int unitcol = columns.IndexOf(x => x.Dimensions.UnitSize);
- //
- // var tuples = rows.Select(r => new Tuple<Guid, Guid?, Guid?, String, double>(
- // (Guid)(r.Values[productcol] ?? Guid.Empty),
- // (hasstyle ? (Guid)(r.Values[stylecol] ?? Guid.Empty) : null),
- // (hasjob ? (Guid)(r.Values[jobcol] ?? Guid.Empty) : null),
- // (String)(r.Values[unitcol] ?? ""),
- // (double)(r.Values[aggcol] ?? 0.0d))
- // ).ToArray();
- //
- // var total = tuples.Aggregate(0d, (value, tuple) => value + tuple.Item5);
- if(aggregate is not null)
- {
- target?.Set(aggregate, total);
- }
- return total;
- }
- private class StockForecastJobInfo
- {
- public double BOM { get; set; }
- public double Stock { get; set; }
- public double PO { get; set; }
- public double Required => Math.Max(BOM - (Stock + PO), 0.0F);
- }
-
- private class StockForecastInfo
- {
- public double MinStock { get; set; }
- public double GenStock { get; set; }
- public double GenPO { get; set; }
- public double JobBOM { get; set; }
- public double JobStock { get; set; }
- public double JobPO { get; set; }
- public Dictionary<Guid, StockForecastJobInfo> JobInfo { get; private init; } = [];
- public void AddJobBOM(Guid jobID, double quantity)
- {
- var item = JobInfo.GetValueOrAdd(jobID);
- item.BOM += quantity;
- }
- public void AddJobPO(Guid jobID, double quantity)
- {
- var item = JobInfo.GetValueOrAdd(jobID);
- item.PO += quantity;
- }
- public void AddJobStock(Guid jobID, double quantity)
- {
- var item = JobInfo.GetValueOrAdd(jobID);
- item.Stock += quantity;
- }
- public double StockRequired => Math.Max(MinStock - (GenStock + GenPO), 0.0F);
-
- public double Required => Math.Max((MinStock + JobBOM) - (GenStock + GenPO + JobStock + JobPO), 0.0F);
-
- public double Optimised => Math.Max(Math.Max(MinStock, JobBOM) - (GenStock + GenPO + JobStock + JobPO), 0.0F);
- }
- private Dictionary<Guid, StockForecastInfo> _summaryinfo = new Dictionary<Guid, StockForecastInfo>();
- private double? GetColumnCalculatedData(ColumnTag tag, Guid productInstanceID)
- {
- if (!_summaryinfo.TryGetValue(productInstanceID, out var info)) return null;
- return tag switch
- {
- ColumnTag.MinimumStockRequired => info.MinStock,
- ColumnTag.GeneralStockHoldings => info.GenStock,
- ColumnTag.GeneralPurchaseOrders => info.GenPO,
- ColumnTag.JobStockRequired => info.JobBOM,
- ColumnTag.JobStockHoldings => info.JobStock,
- ColumnTag.JobPurchaseOrders => info.JobPO,
- ColumnTag.BalanceRequired => (Optimise ? info.Optimised : info.Required),
- _ => null
- };
- }
- private string[] GetColumnFilterItems(ColumnTag tag)
- {
- var selectedIDs = Data.Rows.Select(x => x.Get<ProductInstance, Guid>(x => x.ID));
- var items = new HashSet<string>();
- foreach(var id in selectedIDs)
- {
- var value = GetColumnCalculatedData(tag, id);
- if (value.HasValue)
- {
- items.Add(value.Value.ToString("F2"));
- }
- }
- var arr = items.ToArray();
- Array.Sort(arr);
- return arr;
- }
- protected override IEnumerable<string>? GetColumnFilterItems(DynamicColumnBase column)
- {
- if (column.Tag is ColumnTag tag)
- {
- return GetColumnFilterItems(tag);
- }
- return base.GetColumnFilterItems(column);
- }
- protected override void Reload(
- Filters<ProductInstance> criteria, Columns<ProductInstance> columns, ref SortOrder<ProductInstance>? sort,
- CancellationToken token, Action<CoreTable?, Exception?> action)
- {
-
- var query = new MultiQuery();
-
- query.Add<ProductInstance>(
- GroupIDs.Length == 0
- ? new Filter<ProductInstance>().None()
- : new Filter<ProductInstance>(pi=>pi.Product.Group.ID).InList(GroupIDs),
- columns,
- new SortOrder<ProductInstance>(x=>x.Product.Code)
- );
-
- query.Add<StockHolding>(
- GroupIDs.Length == 0
- ? new Filter<StockHolding>().None()
- : new Filter<StockHolding>(x=>x.Product.Group.ID).InList(GroupIDs)
- .And(new Filter<StockHolding>(x=>x.Job.ID).InList(JobIDs).Or(x=>x.Job.ID).IsEqualTo(Guid.Empty)),
- Columns.None<StockHolding>().Add(x=>x.Product.ID)
- .Add(x=>x.Job.ID)
- .Add(x=>x.Style.ID)
- .AddDimensionsColumns(x => x.Dimensions, Dimensions.ColumnsType.Local)
- .Add(x=>x.Units),
- null
- );
-
- query.Add<PurchaseOrderItem>(
- GroupIDs.Length == 0
- ? new Filter<PurchaseOrderItem>().None()
- : new Filter<PurchaseOrderItem>(x=>x.Product.Group.ID).InList(GroupIDs)
- .And(x=>x.ReceivedDate).IsEqualTo(DateTime.MinValue)
- .And(new Filter<PurchaseOrderItem>(x=>x.Job.ID).InList(JobIDs).Or(x=>x.Job.ID).IsEqualTo(Guid.Empty)),
- Columns.None<PurchaseOrderItem>().Add(x=>x.Product.ID)
- .Add(x=>x.Job.ID)
- .Add(x=>x.Style.ID)
- .AddDimensionsColumns(x => x.Dimensions, Dimensions.ColumnsType.Local)
- .Add(x=>x.Qty),
- null
- );
-
- query.Add<JobBillOfMaterialsItem>(
- GroupIDs.Length == 0
- ? new Filter<JobBillOfMaterialsItem>().None()
- : new Filter<JobBillOfMaterialsItem>(x=>x.Product.Group.ID).InList(GroupIDs)
- .And(new Filter<JobBillOfMaterialsItem>(x=>x.Job.ID).InList(JobIDs).Or(x=>x.Job.ID).IsEqualTo(Guid.Empty)),
- Columns.None<JobBillOfMaterialsItem>().Add(x=>x.Product.ID)
- .Add(x=>x.Job.ID)
- .Add(x=>x.Style.ID)
- .AddDimensionsColumns(x => x.Dimensions, Dimensions.ColumnsType.Local)
- .Add(x=>x.Quantity),
- null
- );
-
- query.Add<StockMovement>(
- GroupIDs.Length == 0
- ? new Filter<StockMovement>().None()
- : new Filter<StockMovement>(x=>x.Product.Group.ID).InList(GroupIDs)
- .And(x=>x.Type).IsEqualTo(StockMovementType.Issue)
- .And(new Filter<StockMovement>(x=>x.Job.ID).InList(JobIDs).Or(x=>x.Job.ID).IsEqualTo(Guid.Empty)),
- Columns.None<StockMovement>().Add(x=>x.Product.ID)
- .Add(x=>x.Job.ID)
- .Add(x=>x.Style.ID)
- .AddDimensionsColumns(x => x.Dimensions, Dimensions.ColumnsType.Local)
- .Add(x=>x.Units),
- null
- );
-
- query.Add<SupplierProduct>(
- GroupIDs.Length == 0
- ? new Filter<SupplierProduct>().None()
- : new Filter<SupplierProduct>(x => x.Product.Group.ID).InList(GroupIDs)
- .And(new Filter<SupplierProduct>(x => x.Job.ID).InList(JobIDs).Or(x => x.Job.ID).IsEqualTo(Guid.Empty)),
- Columns.None<SupplierProduct>().Add(x=>x.Product.ID)
- .Add(x=>x.Job.ID)
- .Add(x=>x.Style.ID)
- .AddDimensionsColumns(x => x.Dimensions, Dimensions.ColumnsType.Local)
- .Add(x=>x.SupplierLink.ID)
- .Add(x=>x.CostPrice)
- .Add(x=>x.Discount)
- .Add(x=>x.TaxCode.ID),
- null
- );
-
- query.Query(q =>
- {
- _stockHoldings = query.Get<StockHolding>();
- _poItems = query.Get<PurchaseOrderItem>();
- _jobBOMs = query.Get<JobBillOfMaterialsItem>();
- _stockMovements = query.Get<StockMovement>();
- _supplierProducts = query.Get<SupplierProduct>();
- var products = query.Get<ProductInstance>();
- _summaryinfo.Clear();
-
- var _idCol = products.GetColumnIndex<ProductInstance>(x => x.ID);
- var _productIDCol = products.GetColumnIndex<ProductInstance>(x => x.Product.ID);
- var _styleIDCol = products.GetColumnIndex<ProductInstance>(x => x.Style.ID);
- var _dimCols = Dimensions.GetFilterColumnIndices<ProductInstance>(products, x => x.Dimensions);
- foreach (var row in products.Rows)
- {
- var _id = row.Values[_idCol] as Guid? ?? Guid.Empty;
- var _productid = row.Values[_productIDCol] as Guid? ?? Guid.Empty;
- var _styleid = row.Values[_styleIDCol] as Guid? ?? Guid.Empty;
- var _dimensions = row.ToDimensions<StockDimensions>(_dimCols);
- var info = new StockForecastInfo();
- info.MinStock = row.Get<ProductInstance, double>(x => x.MinimumStockLevel);
-
- var genstockrows = GetRows<StockHolding>(_stockHoldings, _productid, _styleid, _dimensions, [Guid.Empty]);
- info.GenStock = Aggregate<StockHolding>(_stockHoldings, genstockrows, true, true, x=>x.Units);
-
- var genporows = GetRows<PurchaseOrderItem>(_poItems, _productid, _styleid, _dimensions, [Guid.Empty]);
- info.GenPO = Aggregate<PurchaseOrderItem>(_poItems, genporows, true, true, x=>x.Qty);
- // Job BOMs
- {
- var bomrows = GetRows<JobBillOfMaterialsItem>(_jobBOMs, _productid, _styleid, _dimensions, JobIDs);
- var bom = Aggregate<JobBillOfMaterialsItem>(_jobBOMs, bomrows, true, true, x => x.Quantity);
-
- var mvmtrows = GetRows<StockMovement>(_stockMovements, _productid, _styleid, _dimensions, JobIDs);
- var mvmts = Aggregate<StockMovement>(_stockMovements, mvmtrows, true, true, x => x.Units);
-
- info.JobBOM = bom - mvmts;
- var bomJobCol = _jobBOMs.GetColumnIndex<JobBillOfMaterialsItem>(x => x.Job.ID);
- var bomQtyCol = _jobBOMs.GetColumnIndex<JobBillOfMaterialsItem>(x => x.Quantity);
- foreach(var jobBOMRow in bomrows)
- {
- info.AddJobBOM(jobBOMRow.Get<Guid>(bomJobCol), jobBOMRow.Get<double>(bomQtyCol));
- }
- var mvtJobCol = _stockMovements.GetColumnIndex<StockMovement>(x => x.Job.ID);
- var mvtQtyCol = _stockMovements.GetColumnIndex<StockMovement>(x => x.Units);
- foreach(var mvtRow in mvmtrows)
- {
- info.AddJobBOM(mvtRow.Get<Guid>(mvtJobCol), -mvtRow.Get<double>(mvtQtyCol));
- }
- }
- // Job Stock
- {
- var jobstockrows = GetRows<StockHolding>(_stockHoldings, _productid, _styleid, _dimensions, JobIDs);
- info.JobStock = Aggregate<StockHolding>(_stockHoldings, jobstockrows, true, true, x=>x.Units);
- var jobCol = _stockHoldings.GetColumnIndex<StockHolding>(x => x.Job.ID);
- var qtyCol = _stockHoldings.GetColumnIndex<StockHolding>(x => x.Units);
- foreach(var jobStockRow in jobstockrows)
- {
- info.AddJobStock(jobStockRow.Get<Guid>(jobCol), jobStockRow.Get<double>(qtyCol));
- }
- }
- // Job PO
- {
- var jobporows = GetRows<PurchaseOrderItem>(_poItems, _productid, _styleid, _dimensions, JobIDs);
- info.JobPO = Aggregate<PurchaseOrderItem>(_poItems, jobporows, true, true, x => x.Qty);
- var jobCol = _poItems.GetColumnIndex<PurchaseOrderItem>(x => x.Job.ID);
- var qtyCol = _poItems.GetColumnIndex<PurchaseOrderItem>(x => x.Qty);
- foreach(var jobPORow in jobporows)
- {
- info.AddJobPO(jobPORow.Get<Guid>(jobCol), jobPORow.Get<double>(qtyCol));
- }
- }
- _summaryinfo[_id] = info;
- }
- // Process the tables here
- action.Invoke(products, null);
- });
-
- }
- protected override bool FilterRecord(CoreRow row)
- {
- bool result = base.FilterRecord(row);
- if (_summaryinfo.TryGetValue(row.Get<ProductInstance, Guid>(x => x.ID), out StockForecastInfo? info))
- {
- if (RequiredOnly)
- {
- result = result && Optimise
- ? !info.Optimised.IsEffectivelyEqual(0)
- : !info.Required.IsEffectivelyEqual(0);
- }
- if (!AllStock)
- result = result && _uicomponent?.CheckSuppliers(row) == true;
- }
- return result;
- }
- #endregion
- #region Ordering
- private IEnumerable<CoreRow> FilterRows(IEnumerable<CoreRow> rows)
- {
- var predicates = GetFilterPredicates();
- return rows.Where(r =>
- {
- return predicates.All(x => x.Item2(r));
- });
- }
- private bool SelectForOrder_Click(CoreRow? row)
- {
- if (row is null)
- {
- var menu = new ContextMenu();
- menu.AddItem("Select all", null, () =>
- {
- foreach (var row in FilterRows(Data.Rows))
- {
- SelectedForOrder.Add(row.Get<ProductInstance, Guid>(x => x.ID));
- InvalidateRow(row);
- }
- OrderButton.IsEnabled = SelectedForOrder.Count > 0;
- });
- menu.AddItem("Deselect all", null, () =>
- {
- SelectedForOrder.Clear();
- InvalidateGrid();
- OrderButton.IsEnabled = false;
- });
- menu.IsOpen = true;
- return false;
- }
- else
- {
- var id = row.Get<ProductInstance, Guid>(x => x.ID);
- if (!SelectedForOrder.Remove(id))
- {
- SelectedForOrder.Add(id);
- }
- OrderButton.IsEnabled = SelectedForOrder.Count > 0;
- InvalidateRow(row);
- return false;
- }
- }
- private BitmapImage? SelectForOrder_Image(CoreRow? row)
- {
- if(row is null)
- {
- return _cart;
- }
- else if(SelectedForOrder.Contains(row.Get<ProductInstance, Guid>(x => x.ID)))
- {
- return _cart;
- }
- else
- {
- return null;
- }
- }
-
- private bool OrderStock_Click(Button button, CoreRow[] rows)
- {
- rows = FilterRows(Data.Rows.Where(x => SelectedForOrder.Contains(x.Get<ProductInstance, Guid>(x => x.ID)))).ToArray();
- if(rows.Length == 0)
- {
- return false;
- }
- var items = new List<StockForecastOrderingItem>();
- foreach(var instance in rows.ToObjects<ProductInstance>())
- {
- var info = _summaryinfo.GetValueOrDefault(instance.ID);
- var item = new StockForecastOrderingItem();
- item.Product.CopyFrom(instance.Product);
- item.Style.CopyFrom(instance.Style);
- item.Dimensions.CopyFrom(instance.Dimensions);
- item.RequiredQuantity = (Optimise ? info?.Optimised : info?.Required) ?? default;
- if(info is not null)
- {
- item.SetJobRequiredQuantity(Guid.Empty, info.StockRequired);
- foreach(var (id, jobInfo) in info.JobInfo)
- {
- item.SetJobRequiredQuantity(id, jobInfo.Required);
- }
- }
- else
- {
- item.SetJobRequiredQuantity(Guid.Empty, 0.0);
- }
- items.Add(item);
- }
- var window = new StockForecastOrderScreen(items);
- if(window.ShowDialog() != true)
- {
- return false;
- }
-
- var orders = new List<Tuple<PurchaseOrder, List<PurchaseOrderItem>>>();
- Progress.ShowModal("Creating Orders", progress =>
- {
- int iOrder = 1;
- foreach(var perSupplier in window.Results.GroupBy(x => x.Supplier.ID))
- {
- progress.Report($"Creating Orders ({iOrder++}/{window.Results.ToArray().Length})");
- var order = new PurchaseOrder();
- order.Description = "Purchase Order created from Stock Forecast Screen";
- order.RaisedBy.ID = App.EmployeeID;
- LookupFactory.DoLookup<PurchaseOrder, Supplier, SupplierLink>(order, x => x.SupplierLink, perSupplier.Key);
- var orderItems = new List<PurchaseOrderItem>();
- var results = perSupplier.ToArray();
- foreach(var item in results)
- {
- var orderItem = new PurchaseOrderItem();
- orderItem.Product.ID = item.Item.Product.ID;
- orderItem.Style.ID = item.Item.Style.ID;
- orderItem.Job.ID = item.Job?.ID ?? Guid.Empty;
-
- orderItems.Add(orderItem);
- }
- LookupFactory.DoLookups<PurchaseOrderItem, Product, ProductLink>(
- orderItems.Select(x => new Tuple<PurchaseOrderItem, Guid>(x, x.Product.ID)),
- x => x.Product);
- LookupFactory.DoLookups<PurchaseOrderItem, ProductStyle, ProductStyleLink>(
- orderItems.Select(x => new Tuple<PurchaseOrderItem, Guid>(x, x.Style.ID)),
- x => x.Style);
- LookupFactory.DoLookups<PurchaseOrderItem, Job, JobLink>(
- orderItems.Select(x => new Tuple<PurchaseOrderItem, Guid>(x, x.Job.ID)),
- x => x.Job);
- LookupFactory.DoLookups<PurchaseOrderItem, TaxCode, TaxCodeLink>(
- orderItems.WithIndex().Select(x => new Tuple<PurchaseOrderItem, Guid>(x.Value, results[x.Key].SupplierProduct.TaxCode.ID)),
- x => x.TaxCode);
- foreach(var (i, item) in results.WithIndex())
- {
- var orderItem = orderItems[i];
- orderItem.Dimensions.CopyFrom(item.Item.Dimensions);
- orderItem.Qty = item.Quantity;
- orderItem.ForeignCurrencyCost = item.SupplierProduct.ForeignCurrencyPrice;
- orderItem.Cost = item.SupplierProduct.CostPrice;
- }
- orders.Add(new(order, orderItems));
- }
-
- progress.Report($"Saving {orders.Count} Orders");
- Client.Save(orders.Select(x => x.Item1), "Created from Stock Forecast screen");
- foreach(var (order, orderItems) in orders)
- {
- foreach(var item in orderItems)
- {
- item.PurchaseOrderLink.ID = order.ID;
- }
- }
- Client.Save(orders.SelectMany(x => x.Item2), "Created from Stock Forecast screen");
- });
-
-
- SelectedForOrder.Clear();
- OrderButton.IsEnabled = false;
- MessageWindow.ShowMessage($"The following orders were created:\n- {string.Join("\n- ",orders.Select(x=>x.Item1.PONumber))}", $"Created {orders.Count} orders");
- return true;
- }
- #endregion
- #region IDataModelSource
- public event DataModelUpdateEvent? OnUpdateDataModel;
- public string SectionName => "Stock Forecast";
-
- public bool Optimise { get; set; }
-
- public bool AllStock { get; set; }
-
- public bool RequiredOnly { get; set; }
- public DataModel DataModel(Selection selection)
- {
- return new AutoDataModel<ProductInstance>(null);
- }
-
- #endregion
- }
|