PurchaseOrder.cs 13 KB

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