PurchaseOrder.cs 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351
  1. using System;
  2. using System.Collections.Generic;
  3. using System.Linq;
  4. using System.Linq.Expressions;
  5. using InABox.Core;
  6. namespace Comal.Classes
  7. {
  8. // public class PurchaseOrderDueDate : CoreAggregate<PurchaseOrder, PurchaseOrderItem, DateTime>
  9. // {
  10. // public override Expression<Func<PurchaseOrderItem, DateTime>> Aggregate => x => x.DueDate;
  11. //
  12. // public override AggregateCalculation Calculation => AggregateCalculation.Minimum;
  13. //
  14. // public override Filter<PurchaseOrderItem>? Filter => new Filter<PurchaseOrderItem>(c => c.DueDate).IsNotEqualTo(DateTime.MinValue);
  15. //
  16. // public override Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>> Links =>
  17. // new Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>>()
  18. // {
  19. // { PurchaseOrderItem => PurchaseOrderItem.PurchaseOrderLink.ID, PurchaseOrder => PurchaseOrder.ID }
  20. // };
  21. // }
  22. public class PurchaseOrderUnreceivedQtyAggregate : CoreAggregate<PurchaseOrder, PurchaseOrderItem, double>
  23. {
  24. public override Expression<Func<PurchaseOrderItem, double>> Aggregate => x => x.Qty;
  25. public override AggregateCalculation Calculation => AggregateCalculation.Sum;
  26. public override Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>> Links =>
  27. new Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>>()
  28. {
  29. { PurchaseOrderItem => PurchaseOrderItem.PurchaseOrderLink.ID, PurchaseOrder => PurchaseOrder.ID }
  30. };
  31. public override Filter<PurchaseOrderItem>? Filter => new Filter<PurchaseOrderItem>(x => x.ReceivedDate).IsEqualTo(DateTime.MinValue);
  32. }
  33. public class PurchaseOrderExTax : CoreAggregate<PurchaseOrder, PurchaseOrderItem, double>
  34. {
  35. public override Expression<Func<PurchaseOrderItem, double>> Aggregate => x => x.ExTax;
  36. public override AggregateCalculation Calculation => AggregateCalculation.Sum;
  37. public override Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>> Links =>
  38. new Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>>()
  39. {
  40. { PurchaseOrderItem => PurchaseOrderItem.PurchaseOrderLink.ID, PurchaseOrder => PurchaseOrder.ID }
  41. };
  42. }
  43. public class PurchaseOrderTax : CoreAggregate<PurchaseOrder, PurchaseOrderItem, double>
  44. {
  45. public override Expression<Func<PurchaseOrderItem, double>> Aggregate => x => x.Tax;
  46. public override AggregateCalculation Calculation => AggregateCalculation.Sum;
  47. public override Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>> Links =>
  48. new Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>>()
  49. {
  50. { PurchaseOrderItem => PurchaseOrderItem.PurchaseOrderLink.ID, PurchaseOrder => PurchaseOrder.ID }
  51. };
  52. }
  53. public class PurchaseOrderIncTax : CoreAggregate<PurchaseOrder, PurchaseOrderItem, double>
  54. {
  55. public override Expression<Func<PurchaseOrderItem, double>> Aggregate => x => x.IncTax;
  56. public override AggregateCalculation Calculation => AggregateCalculation.Sum;
  57. public override Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>> Links =>
  58. new Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>>()
  59. {
  60. { PurchaseOrderItem => PurchaseOrderItem.PurchaseOrderLink.ID, PurchaseOrder => PurchaseOrder.ID }
  61. };
  62. }
  63. public class PurchaseOrderBalance : CoreAggregate<PurchaseOrder, PurchaseOrderItem, double>
  64. {
  65. public override Expression<Func<PurchaseOrderItem, double>> Aggregate => x => x.Balance;
  66. public override AggregateCalculation Calculation => AggregateCalculation.Sum;
  67. public override Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>> Links =>
  68. new Dictionary<Expression<Func<PurchaseOrderItem, object?>>, Expression<Func<PurchaseOrder, object?>>>()
  69. {
  70. { PurchaseOrderItem => PurchaseOrderItem.PurchaseOrderLink.ID, PurchaseOrder => PurchaseOrder.ID }
  71. };
  72. }
  73. [UserTracking(typeof(Bill))]
  74. public class PurchaseOrder : Entity, IRemotable, IPersistent, IStringAutoIncrement<PurchaseOrder>, IOneToMany<Supplier>,
  75. ILicense<AccountsPayableLicense>, IDataEntryInstance, IPostable
  76. {
  77. private bool bChanging;
  78. [UniqueCodeEditor(Visible = Visible.Default, Editable = Editable.Enabled)]
  79. [EditorSequence(0)]
  80. public string PONumber { get; set; }
  81. [RequiredColumn]
  82. [EntityRelationship(DeleteAction.SetNull)]
  83. [EditorSequence(1)]
  84. public SupplierLink SupplierLink { get; set; }
  85. [MemoEditor]
  86. [EditorSequence(2)]
  87. public string Description { get; set; }
  88. [NotesEditor]
  89. [EditorSequence("Notes",1)]
  90. public string[] Notes { get; set; }
  91. [EditorSequence(3)]
  92. public PurchaseOrderCategoryLink Category { get; set; }
  93. [DateTimeEditor]
  94. [EditorSequence(4)]
  95. public DateTime IssuedDate { get; set; }
  96. [DateEditor]
  97. [EditorSequence(5)]
  98. public DateTime DueDate { get; set; }
  99. [EditorSequence("Additional",1)]
  100. public EmployeeLink RaisedBy { get; set; }
  101. [EditorSequence("Additional",2)]
  102. [TimestampEditor]
  103. public DateTime DataEntered { get; set; }
  104. [EditorSequence("Additional",3)]
  105. public EmployeeLink IssuedBy { get; set; }
  106. [TimestampEditor]
  107. [EditorSequence("Additional",4)]
  108. public DateTime ClosedDate { get; set; }
  109. [TimestampEditor]
  110. [EditorSequence("Additional",5)]
  111. public DateTime CancelledDate { get; set; }
  112. [EditorSequence(10)]
  113. [DoubleEditor(Editable = Editable.Hidden, Summary = Summary.Sum)]
  114. [Aggregate(typeof(PurchaseOrderExTax))]
  115. public double ExTax { get; set; }
  116. [EditorSequence(11)]
  117. [DoubleEditor(Editable = Editable.Hidden, Summary = Summary.Sum)]
  118. [Aggregate(typeof(PurchaseOrderTax))]
  119. public double Tax { get; set; }
  120. [EditorSequence(12)]
  121. [DoubleEditor(Editable = Editable.Hidden, Summary = Summary.Sum)]
  122. [Aggregate(typeof(PurchaseOrderIncTax))]
  123. public double IncTax { get; set; }
  124. [EditorSequence(13)]
  125. [DoubleEditor(Editable = Editable.Hidden, Summary = Summary.Sum)]
  126. [Aggregate(typeof(PurchaseOrderBalance))]
  127. public double Balance { get; set; }
  128. [EditorSequence(13)]
  129. [DoubleEditor(Editable = Editable.Hidden, Summary = Summary.Sum)]
  130. [Aggregate(typeof(PurchaseOrderUnreceivedQtyAggregate))]
  131. public double Unreceived { get; set; }
  132. [EditorSequence(14)]
  133. [EnumLookupEditor(typeof(PurchaseOrderStatus), Editable = Editable.Hidden)]
  134. public PurchaseOrderStatus Status { get; set; }
  135. //[CodeEditor(Visible = Visible.Default, Editable = Editable.Hidden)]
  136. [NullEditor]
  137. public string SupplierCode { get; set; }
  138. //[TextBoxEditor]
  139. [NullEditor]
  140. public string SupplierName { get; set; }
  141. [DoNotPersist]
  142. [DoNotSerialize]
  143. public static string PONumberPrefix { get; set; }
  144. [NullEditor]
  145. [LoggableProperty]
  146. public DateTime Posted { get; set; }
  147. [NullEditor]
  148. [LoggableProperty]
  149. [RequiredColumn]
  150. public PostedStatus PostedStatus { get; set; }
  151. [NullEditor]
  152. public string PostedNote { get; set; }
  153. [NullEditor]
  154. public string PostedReference { get; set; }
  155. public Expression<Func<PurchaseOrder, string>> AutoIncrementField() => x => x.PONumber;
  156. public Filter<PurchaseOrder> AutoIncrementFilter() => null;
  157. public string AutoIncrementPrefix() => PONumberPrefix;
  158. public string AutoIncrementFormat() => "{0:D6}";
  159. protected override void DoPropertyChanged(string name, object? before, object? after)
  160. {
  161. base.DoPropertyChanged(name, before, after);
  162. if (bChanging)
  163. return;
  164. bChanging = true;
  165. if (name.Equals("Status"))
  166. {
  167. var status = (PurchaseOrderStatus)after;
  168. if (status.Equals(PurchaseOrderStatus.Closed))
  169. {
  170. if (ClosedDate == DateTime.MinValue)
  171. ClosedDate = DateTime.Now;
  172. if (IssuedDate == DateTime.MinValue)
  173. IssuedDate = DateTime.Now;
  174. }
  175. else if (status == PurchaseOrderStatus.Issued)
  176. {
  177. if (ClosedDate != DateTime.MinValue)
  178. ClosedDate = DateTime.MinValue;
  179. if (IssuedDate == DateTime.MinValue)
  180. IssuedDate = DateTime.Now;
  181. }
  182. else if(status == PurchaseOrderStatus.Cancelled)
  183. {
  184. CancelledDate = DateTime.Now;
  185. }
  186. else
  187. {
  188. if (ClosedDate != DateTime.MinValue)
  189. ClosedDate = DateTime.MinValue;
  190. if (IssuedDate != DateTime.MinValue)
  191. IssuedDate = DateTime.MinValue;
  192. }
  193. }
  194. else
  195. {
  196. var status = PurchaseOrderStatus.Closed;
  197. if (CancelledDate != DateTime.MinValue)
  198. status = PurchaseOrderStatus.Cancelled;
  199. else if (ClosedDate != DateTime.MinValue)
  200. status = PurchaseOrderStatus.Closed;
  201. else if (IssuedDate != DateTime.MinValue)
  202. status = PurchaseOrderStatus.Issued;
  203. else
  204. status = PurchaseOrderStatus.Draft;
  205. if (Status != status)
  206. Status = status;
  207. }
  208. bChanging = false;
  209. }
  210. static PurchaseOrder()
  211. {
  212. LinkedProperties.Register<PurchaseOrder, SupplierLink, String>(x => x.SupplierLink, x => x.Code, x => x.SupplierCode);
  213. LinkedProperties.Register<PurchaseOrder, SupplierLink, String>(x => x.SupplierLink, x => x.Name, x => x.SupplierName);
  214. }
  215. public static void UpdateCosts(IEnumerable<PurchaseOrderItem> items, Guid supplierid, Dictionary<String,object?> changes)
  216. {
  217. void UpdateValue<TType>(PurchaseOrderItem item,Expression<Func<PurchaseOrderItem, TType>> property, TType value)
  218. {
  219. CoreUtils.MonitorChanges(
  220. item,
  221. () => CoreUtils.SetPropertyValue(item, CoreUtils.GetFullPropertyName(property, "."), value),
  222. changes
  223. );
  224. }
  225. var productids = items.Where(x => x.Product.ID != Guid.Empty).Select(x => x.Product.ID).ToArray();
  226. MultiQuery query = new MultiQuery();
  227. query.Add(
  228. new Filter<SupplierProduct>(x=>x.SupplierLink.ID).IsEqualTo(supplierid)
  229. .And(x=>x.Product.ID).InList(productids),
  230. Columns.None<SupplierProduct>().Add(x=>x.Product.ID)
  231. .Add(x=>x.Style.ID)
  232. .AddDimensionsColumns(x => x.Dimensions, Dimensions.ColumnsType.Local)
  233. .Add(x=>x.Job.ID)
  234. .Add(x=>x.SupplierCode)
  235. .Add(x=>x.SupplierDescription)
  236. .Add(x=>x.SupplierLink.ID)
  237. .Add(x=>x.ForeignCurrencyPrice)
  238. .Add(x=>x.CostPrice)
  239. );
  240. query.Add(
  241. new Filter<ProductInstance>(x=>x.Product.ID).InList(productids),
  242. Columns.None<ProductInstance>().Add(x=>x.Product.ID)
  243. .Add(x => x.Style.ID)
  244. .AddDimensionsColumns(x => x.Dimensions, Dimensions.ColumnsType.Local)
  245. .Add(x => x.NettCost)
  246. );
  247. query.Query();
  248. var supplierProducts = query.Get<SupplierProduct>().ToArray<SupplierProduct>();
  249. var productInstances = query.Get<ProductInstance>().ToArray<ProductInstance>();
  250. foreach (var item in items)
  251. {
  252. //Check Supplier / Job Specific Pricing
  253. var supplierProduct = supplierProducts.FirstOrDefault(x =>
  254. x.SupplierLink.ID == item.PurchaseOrderLink.SupplierLink.ID
  255. && x.Product.ID == item.Product.ID
  256. && x.Style.ID == item.Style.ID
  257. && x.Dimensions.Equals(item.Dimensions)
  258. && x.Job.ID == item.Job.ID);
  259. if (supplierProduct != null)
  260. {
  261. UpdateValue<string>(item, x => x.SupplierCode, supplierProduct.SupplierCode);
  262. UpdateValue<string>(item, x => x.Description, supplierProduct.SupplierDescription);
  263. UpdateValue<double>(item, x => x.ForeignCurrencyCost, supplierProduct.ForeignCurrencyPrice);
  264. UpdateValue<double>(item, x => x.Cost, supplierProduct.CostPrice);
  265. continue;
  266. }
  267. // Check Supplier Pricing
  268. supplierProduct = supplierProducts.FirstOrDefault(x =>
  269. x.SupplierLink.ID == item.PurchaseOrderLink.SupplierLink.ID
  270. && x.Product.ID == item.Product.ID
  271. && x.Style.ID == item.Style.ID
  272. && x.Dimensions.Equals(item.Dimensions)
  273. && x.Job.ID == Guid.Empty);
  274. if (supplierProduct != null)
  275. {
  276. UpdateValue<string>(item, x => x.SupplierCode, supplierProduct.SupplierCode);
  277. UpdateValue<string>(item, x => x.Description, supplierProduct.SupplierDescription);
  278. UpdateValue<double>(item, x => x.ForeignCurrencyCost, supplierProduct.ForeignCurrencyPrice);
  279. UpdateValue<double>(item, x => x.Cost, supplierProduct.CostPrice);
  280. continue;
  281. }
  282. // Check Specific Product Instance
  283. var productInstance = productInstances.FirstOrDefault(x =>
  284. x.Product.ID == item.Product.ID
  285. && x.Style.ID == item.Style.ID
  286. && x.Dimensions.Equals(item.Dimensions));
  287. if (productInstance != null)
  288. UpdateValue<double>(item, x => x.Cost, productInstance.NettCost);
  289. else
  290. UpdateValue<double>(item, x => x.Cost, 0.0F);
  291. UpdateValue<double>(item, x => x.ForeignCurrencyCost, 0.0F);
  292. }
  293. }
  294. }
  295. }