VSMAppService.cs 23 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403
  1. using Azure;
  2. using Business.Core.Enum;
  3. using Business.Core.Utilities;
  4. using Business.Domain;
  5. using Business.Dto;
  6. using Business.EntityFrameworkCore;
  7. using Business.EntityFrameworkCore.SqlRepositories;
  8. using Business.ResourceExamineManagement;
  9. using Business.ResourceExamineManagement.Dto;
  10. using Business.StructuredDB.MES.IC;
  11. using Business.VSM;
  12. using EFCore.BulkExtensions;
  13. using Microsoft.EntityFrameworkCore;
  14. using Microsoft.Extensions.Configuration;
  15. using MongoDB.Driver.Linq;
  16. using Newtonsoft.Json;
  17. using NLog;
  18. using System;
  19. using System.Collections.Generic;
  20. using System.Data;
  21. using System.Diagnostics.Metrics;
  22. using System.Linq;
  23. using System.Text;
  24. using System.Threading;
  25. using System.Threading.Tasks;
  26. using Volo.Abp.Application.Services;
  27. using Volo.Abp.Domain.Repositories;
  28. using Volo.Abp.MultiTenancy;
  29. using WkHtmlToPdfDotNet;
  30. using ZstdSharp.Unsafe;
  31. namespace Business.VSMManagement
  32. {
  33. public class VSMAppService : ApplicationService,IVSMAppService
  34. {
  35. private readonly ISqlRepository<ItemMaster> _itemMaster;
  36. private readonly ISqlRepository<InvTransHist> _invTransHist;
  37. private readonly IRepository<srm_purchase> _srm_purchase;
  38. private readonly IRepository<ic_item> _ic_item;
  39. private readonly ISqlRepository<LocationDetail> _LocationDetail;
  40. private readonly BusinessDbContext _businessDbContext;
  41. public VSMAppService(
  42. ISqlRepository<ItemMaster> itemMaster,
  43. ISqlRepository<InvTransHist> invTransHist,
  44. IRepository<srm_purchase> srm_purchase,
  45. IRepository<ic_item> ic_item,
  46. ISqlRepository<LocationDetail> locationDetail,
  47. BusinessDbContext businessDbContext
  48. )
  49. {
  50. _itemMaster = itemMaster;
  51. _invTransHist = invTransHist;
  52. _srm_purchase = srm_purchase;
  53. _ic_item = ic_item;
  54. _LocationDetail=locationDetail;
  55. _businessDbContext = businessDbContext;
  56. }
  57. public string ValueFrequency(string Loc, string BeginDate, string EndDate, string KanBan, string Frequency)
  58. {
  59. try
  60. {
  61. var itemLoc = _LocationDetail.Select(a => a.Location == Loc && a.Domain == "8010");
  62. var itemList = itemLoc.Select(a => a.ItemNum).Distinct().ToList();
  63. ValueFrequencyDto dto = new ValueFrequencyDto();
  64. DateTime beginDate = Convert.ToDateTime(BeginDate);
  65. DateTime endDate = Convert.ToDateTime(EndDate);
  66. var itemTranList=_invTransHist.Select(a => a.Loc == Loc && a.CreateTime >= beginDate && a.CreateTime < endDate && itemList.Contains(a.ItemNum));
  67. List<ValueFrequencyKanBanDto> kanBanDtos = new List<ValueFrequencyKanBanDto>();
  68. var icitems = _ic_item.GetListAsync(a => itemList.Contains(a.number)).Result;
  69. var srm_purchases = _srm_purchase.GetListAsync(a => icitems.Select(b=>b.Id).ToList().Contains(a.icitem_id)).Result;
  70. string sqldzd = @"select MATNR AS ItemNum,MAx(NETPR)*10 AS NETPR from SupplierStatement group by MATNR";
  71. var dzdList = _businessDbContext.SupplierStatementDto.FromSqlRaw(sqldzd).ToList();
  72. string sql = @"select a.Loc as Loc,BeginBalance,BeginBalance+QtyChange as BalanceNum,a.ItemNum,
  73. (case when a.QtyChange>0 then a.QtyChange else 0 end) as QtyChangeAdvance,
  74. (case when a.QtyChange<0 then abs(a.QtyChange) else 0 end) as QtyChangeOut,
  75. a.LotSerial,a.createTime from InvTransHist a inner join (select itemnum,LotSerial,Max(CreateTime) AS CreateTime from
  76. InvTransHist where loc='1001' and domain='8010' group by itemnum,LotSerial) b on a.ItemNum=b.ItemNum
  77. and a.CreateTime=b.CreateTime and a.Loc='1001' and a.Domain='8010' and a.LotSerial=b.LotSerial";
  78. var InvTransHistDto = _businessDbContext.InvTransHistDto.FromSqlRaw(sql).ToList();
  79. itemList.ForEach(item =>
  80. {
  81. if(icitems.Any(a=>a.number==item))
  82. {
  83. ValueFrequencyKanBanDto itemKanBanDto = new ValueFrequencyKanBanDto();
  84. itemKanBanDto.ItemNumber = item;
  85. itemKanBanDto.ItemId = icitems.Find(a => a.number == item).Id;
  86. itemKanBanDto.Model = icitems.Find(a => a.number == item).model;
  87. itemKanBanDto.ItemName = icitems.Find(a => a.number == item).name;
  88. itemKanBanDto.PLT = 14;
  89. //供应提前期取货源清单最大值,没有默认14天
  90. if (srm_purchases.Any(a => a.icitem_id == itemKanBanDto.ItemId && a.quota_rate.GetValueOrDefault() > 0))
  91. {
  92. itemKanBanDto.PLT = srm_purchases.Where(a => a.number == item && a.quota_rate.GetValueOrDefault() > 0).Max(a => a.lead_time).Value;
  93. }
  94. var entry = dzdList.FirstOrDefault(p => p.ItemNum == item);
  95. if (entry != null)
  96. {
  97. itemKanBanDto.NETPR = entry.NETPR;
  98. }
  99. else
  100. {
  101. itemKanBanDto.NETPR = 1 * 10;
  102. }
  103. //出库总数
  104. var outstock = itemTranList.Where(a => a.ItemNum == item && a.QtyChange < 0).ToList();
  105. itemKanBanDto.OutStockQty = Math.Abs(outstock.Sum(a => a.QtyChange).Value);
  106. //库存数据取进出存期末数据
  107. if(InvTransHistDto.Any(a=>a.ItemNum==item))
  108. {
  109. itemKanBanDto.Amount = InvTransHistDto.Where(a=>a.ItemNum==item).Sum(a=>a.BalanceNum)* itemKanBanDto.NETPR;
  110. }
  111. itemKanBanDto.MoveCount = itemTranList.Where(a => a.ItemNum == item && a.QtyChange < 0).Count();
  112. int days = endDate.Subtract(beginDate).Days;
  113. //同一天算1天
  114. if (days == 0)
  115. days = 1;
  116. itemKanBanDto.ADU = itemKanBanDto.OutStockQty / days;
  117. itemKanBanDto.Kanban = itemKanBanDto.ADU * itemKanBanDto.PLT;
  118. kanBanDtos.Add(itemKanBanDto);
  119. if(item== "1000304")
  120. {
  121. string a = "";
  122. }
  123. }
  124. });
  125. decimal totalmoveCount = kanBanDtos.Sum(a=>a.MoveCount);
  126. decimal totalAmount = kanBanDtos.Sum(a => a.Amount);
  127. decimal avgmoveCount = kanBanDtos.Average(a => a.MoveCount);
  128. kanBanDtos=kanBanDtos.OrderByDescending(a => a.Amount).ToList();
  129. for (int i=0;i< kanBanDtos.Count;i++)
  130. {
  131. kanBanDtos[i].MovePencent = kanBanDtos[i].MoveCount * 100 / totalmoveCount;
  132. if (kanBanDtos[i].MoveCount > avgmoveCount)
  133. {
  134. kanBanDtos[i].FMR = "F";
  135. }
  136. else if(kanBanDtos[i].MoveCount < avgmoveCount / 2)
  137. {
  138. kanBanDtos[i].FMR = "R";
  139. }else
  140. {
  141. kanBanDtos[i].FMR = "M";
  142. }
  143. if(i<=kanBanDtos.Count*0.7)
  144. {
  145. kanBanDtos[i].ABC = "A";
  146. }else if(i>=kanBanDtos.Count*0.9)
  147. {
  148. kanBanDtos[i].ABC = "C";
  149. }else
  150. {
  151. kanBanDtos[i].ABC = "B";
  152. }
  153. kanBanDtos[i].AmountTotal = totalAmount;
  154. }
  155. int totalCount = kanBanDtos.Count();
  156. dto.jzpc1 = $"{kanBanDtos.Where(a => a.ABC == "A" && a.FMR == "R").Count()}/{kanBanDtos.Count}";
  157. dto.jzpc2 = $"{kanBanDtos.Where(a => a.ABC == "A" && a.FMR == "M").Count()}/{kanBanDtos.Count}";
  158. dto.jzpc3 = $"{kanBanDtos.Where(a => a.ABC == "A" && a.FMR == "F").Count()}/{kanBanDtos.Count}";
  159. dto.jzpc4 = $"{kanBanDtos.Where(a => a.ABC == "B" && a.FMR == "R").Count()}/{kanBanDtos.Count}";
  160. dto.jzpc5 = $"{kanBanDtos.Where(a => a.ABC == "B" && a.FMR == "M").Count()}/{kanBanDtos.Count}";
  161. dto.jzpc6 = $"{kanBanDtos.Where(a => a.ABC == "B" && a.FMR == "F").Count()}/{kanBanDtos.Count}";
  162. dto.jzpc7 = $"{kanBanDtos.Where(a => a.ABC == "C" && a.FMR == "R").Count()}/{kanBanDtos.Count}";
  163. dto.jzpc8 = $"{kanBanDtos.Where(a => a.ABC == "C" && a.FMR == "M").Count()}/{kanBanDtos.Count}";
  164. dto.jzpc9 = $"{kanBanDtos.Where(a => a.ABC == "C" && a.FMR == "F").Count()}/{kanBanDtos.Count}";
  165. return JsonConvert.SerializeObject(dto);
  166. }
  167. catch (Exception ex)
  168. {
  169. return ex.Message;
  170. }
  171. }
  172. public string ValueFrequencyDetail(string Loc, string BeginDate, string EndDate, string KanBan, string Frequency, string JZ, string PC)
  173. {
  174. try
  175. {
  176. List<ValueFrequencyDetailDto> dtos = new List<ValueFrequencyDetailDto>();
  177. try
  178. {
  179. var itemLoc = _LocationDetail.Select(a => a.Location == Loc && a.Domain == "8010");
  180. var itemList = itemLoc.Select(a => a.ItemNum).Distinct().ToList();
  181. ValueFrequencyDto dto = new ValueFrequencyDto();
  182. DateTime beginDate = Convert.ToDateTime(BeginDate);
  183. DateTime endDate = Convert.ToDateTime(EndDate);
  184. var itemTranList = _invTransHist.Select(a => a.Loc == Loc && a.CreateTime >= beginDate && a.CreateTime < endDate && itemList.Contains(a.ItemNum));
  185. List<ValueFrequencyKanBanDto> kanBanDtos = new List<ValueFrequencyKanBanDto>();
  186. var icitems = _ic_item.GetListAsync(a => itemList.Contains(a.number)).Result;
  187. var srm_purchases = _srm_purchase.GetListAsync(a => icitems.Select(b => b.Id).ToList().Contains(a.icitem_id)).Result;
  188. string sqldzd = @"select MATNR AS ItemNum,MAx(NETPR)*10 AS NETPR from SupplierStatement group by MATNR";
  189. var dzdList = _businessDbContext.SupplierStatementDto.FromSqlRaw(sqldzd).ToList();
  190. string sql = @"select a.Loc as Loc,BeginBalance,BeginBalance+QtyChange as BalanceNum,a.ItemNum,
  191. (case when a.QtyChange>0 then a.QtyChange else 0 end) as QtyChangeAdvance,
  192. (case when a.QtyChange<0 then abs(a.QtyChange) else 0 end) as QtyChangeOut,
  193. a.LotSerial,a.createTime from InvTransHist a inner join (select itemnum,LotSerial,Max(CreateTime) AS CreateTime from
  194. InvTransHist where loc='1001' and domain='8010' group by itemnum,LotSerial) b on a.ItemNum=b.ItemNum
  195. and a.CreateTime=b.CreateTime and a.Loc='1001' and a.Domain='8010' and a.LotSerial=b.LotSerial";
  196. var InvTransHistDto = _businessDbContext.InvTransHistDto.FromSqlRaw(sql).ToList();
  197. itemList.ForEach(item =>
  198. {
  199. if (icitems.Any(a => a.number == item))
  200. {
  201. ValueFrequencyKanBanDto itemKanBanDto = new ValueFrequencyKanBanDto();
  202. itemKanBanDto.ItemNumber = item;
  203. itemKanBanDto.ItemId = icitems.Find(a => a.number == item).Id;
  204. itemKanBanDto.Model = icitems.Find(a => a.number == item).model;
  205. itemKanBanDto.ItemName = icitems.Find(a => a.number == item).name;
  206. itemKanBanDto.PLT = 14;
  207. //供应提前期取货源清单最大值,没有默认14天
  208. if (srm_purchases.Any(a => a.icitem_id == itemKanBanDto.ItemId && a.quota_rate.GetValueOrDefault() > 0))
  209. {
  210. itemKanBanDto.PLT = srm_purchases.Where(a => a.number == item && a.quota_rate.GetValueOrDefault() > 0).Max(a => a.lead_time).Value;
  211. }
  212. var entry = dzdList.FirstOrDefault(p => p.ItemNum == item);
  213. if (entry != null)
  214. {
  215. itemKanBanDto.NETPR = entry.NETPR;
  216. }
  217. else
  218. {
  219. itemKanBanDto.NETPR = 1 * 10;
  220. }
  221. //出库总数
  222. var outstock = itemTranList.Where(a => a.ItemNum == item && a.QtyChange < 0).ToList();
  223. itemKanBanDto.OutStockQty = Math.Abs(outstock.Sum(a => a.QtyChange).Value);
  224. //库存数据取进出存期末数据
  225. if (InvTransHistDto.Any(a => a.ItemNum == item))
  226. {
  227. itemKanBanDto.Amount = InvTransHistDto.Where(a => a.ItemNum == item).Sum(a => a.BalanceNum) * itemKanBanDto.NETPR;
  228. }
  229. itemKanBanDto.MoveCount = itemTranList.Where(a => a.ItemNum == item && a.QtyChange < 0).Count();
  230. int days = endDate.Subtract(beginDate).Days;
  231. //同一天算1天
  232. if (days == 0)
  233. days = 1;
  234. itemKanBanDto.ADU = itemKanBanDto.OutStockQty / days;
  235. itemKanBanDto.Kanban = itemKanBanDto.ADU * itemKanBanDto.PLT;
  236. kanBanDtos.Add(itemKanBanDto);
  237. }
  238. });
  239. decimal totalmoveCount = kanBanDtos.Sum(a => a.MoveCount);
  240. decimal totalAmount = kanBanDtos.Sum(a => a.Amount);
  241. decimal avgmoveCount = kanBanDtos.Average(a => a.MoveCount);
  242. kanBanDtos = kanBanDtos.OrderByDescending(a => a.Amount).ToList();
  243. for (int i = 0; i < kanBanDtos.Count; i++)
  244. {
  245. kanBanDtos[i].MovePencent = kanBanDtos[i].MoveCount * 100 / totalmoveCount;
  246. if (kanBanDtos[i].MoveCount > avgmoveCount)
  247. {
  248. kanBanDtos[i].FMR = "F";
  249. }
  250. else if (kanBanDtos[i].MoveCount < avgmoveCount / 2)
  251. {
  252. kanBanDtos[i].FMR = "R";
  253. }
  254. else
  255. {
  256. kanBanDtos[i].FMR = "M";
  257. }
  258. if (i <= kanBanDtos.Count * 0.7)
  259. {
  260. kanBanDtos[i].ABC = "A";
  261. }
  262. else if (i >= kanBanDtos.Count * 0.9)
  263. {
  264. kanBanDtos[i].ABC = "C";
  265. }
  266. else
  267. {
  268. kanBanDtos[i].ABC = "B";
  269. }
  270. kanBanDtos[i].AmountTotal = totalAmount;
  271. kanBanDtos[i].MovePencent = kanBanDtos[i].MoveCount*100 / totalmoveCount;
  272. }
  273. kanBanDtos=kanBanDtos.Where(a=>a.ABC==JZ&&a.FMR==PC && a.Kanban > Convert.ToDecimal(KanBan) && a.MovePencent > Convert.ToDecimal(Frequency)).OrderByDescending(a=>a.Amount).ToList();
  274. for(int i=0;i< kanBanDtos.Count(); i++)
  275. {
  276. ValueFrequencyDetailDto detailDto = new ValueFrequencyDetailDto();
  277. detailDto.RowSeq =i+1;
  278. detailDto.ItemNum = kanBanDtos[i].ItemNumber;
  279. detailDto.ItemName = kanBanDtos[i].ItemName;
  280. detailDto.Model = kanBanDtos[i].Model;
  281. detailDto.ItemABC = kanBanDtos[i].ABC;
  282. detailDto.ItemFMR = kanBanDtos[i].FMR;
  283. detailDto.Amount = kanBanDtos[i].Amount;
  284. detailDto.AmountFix = Convert.ToDecimal(KanBan) * kanBanDtos[i].NETPR;
  285. detailDto.AmountDiff = detailDto.Amount- detailDto.AmountFix;
  286. dtos.Add(detailDto);
  287. }
  288. return JsonConvert.SerializeObject(dtos);
  289. }
  290. catch (Exception ex)
  291. {
  292. return ex.Message;
  293. }
  294. return JsonConvert.SerializeObject(dtos);
  295. }
  296. catch (Exception ex)
  297. {
  298. return ex.Message;
  299. }
  300. }
  301. public string ChartLineOption(string Loc, string BeginDate, string EndDate, string ItemNum,string TurnOver,string KanBan)
  302. {
  303. try
  304. {
  305. DateTime beginDate = Convert.ToDateTime(BeginDate);
  306. DateTime endDate = Convert.ToDateTime(EndDate);
  307. var icitems = _ic_item.FindAsync(a => a.number== ItemNum).Result;
  308. var srm_purchases = _srm_purchase.GetListAsync(a => icitems.Id==a.icitem_id).Result;
  309. decimal chartPLT = 14;
  310. decimal chartKanBan = Convert.ToDecimal(KanBan);
  311. //供应提前期取货源清单最大值,没有默认14天
  312. if (srm_purchases.Any(a => a.icitem_id == icitems.Id && a.quota_rate.GetValueOrDefault() > 0))
  313. {
  314. chartPLT = srm_purchases.Where(a => a.number == ItemNum && a.quota_rate.GetValueOrDefault() > 0).Max(a => a.lead_time).Value;
  315. }
  316. //string sqldzd = @"select MATNR AS ItemNum,MAx(NETPR)*10 AS NETPR from SupplierStatement group by MATNR";
  317. //var dzdList = _businessDbContext.SupplierStatementDto.FromSqlRaw(sqldzd).ToList();
  318. string sql = string.Format(@"select a.ItemNum,a.Loc,a.LotSerial,BeginBalance,a.QtyChange,(case when a.QtyChange>0 then a.QtyChange else 0 end) as QtyChangeAdvance,
  319. (case when a.QtyChange<0 then abs(a.QtyChange) else 0 end) as QtyChangeOut,BeginBalance+QtyChange as BalanceNum,
  320. a.CreateTime from InvTransHist a where loc='{0}' and domain='8010' and itemnum='{1}' order by CreateTime", Loc,ItemNum);
  321. var InvTransHistDto = _businessDbContext.InvTransHistDetailDto.FromSqlRaw(sql).ToList();
  322. DateTime minTime = InvTransHistDto.Min(a => a.CreateTime);
  323. DateTime maxTime = InvTransHistDto.Max(a => a.CreateTime);
  324. if(beginDate<minTime)
  325. {
  326. minTime = beginDate;
  327. }
  328. if(endDate>maxTime)
  329. {
  330. maxTime = endDate;
  331. }
  332. int tranDays = (maxTime - minTime).Days;
  333. List<ValueFrequencyChartDto> chartDtos = new List<ValueFrequencyChartDto>();
  334. for(int i = 0; i < tranDays; i++)
  335. {
  336. ValueFrequencyChartDto dtoChart = new ValueFrequencyChartDto();
  337. dtoChart.Date = minTime.AddDays(i).ToString("yyyy-MM-dd");
  338. dtoChart.InStockQty = InvTransHistDto.Where(a => minTime.AddDays(i).Date==a.CreateTime.Date).Sum(a => a.QtyChangeAdvance);
  339. dtoChart.OutStockQty = InvTransHistDto.Where(a => minTime.AddDays(i).Date == a.CreateTime.Date).Sum(a => a.QtyChangeOut);
  340. if(i>0)
  341. {
  342. dtoChart.StockQty = chartDtos[i-1].StockQty + InvTransHistDto.Where(a => minTime.AddDays(i).Date == a.CreateTime.Date).Sum(a => a.QtyChange);
  343. }else
  344. {
  345. dtoChart.StockQty = InvTransHistDto.Where(a => minTime.AddDays(i).Date == a.CreateTime.Date).Sum(a => a.QtyChange);
  346. }
  347. dtoChart.SuggestQty =chartKanBan*chartPLT;
  348. chartDtos.Add(dtoChart);
  349. }
  350. chartDtos = chartDtos.Where(a => string.Compare(a.Date, BeginDate) >= 0 && string.Compare(a.Date, EndDate) <= 0).ToList();
  351. StringBuilder sb = new StringBuilder();
  352. StringBuilder sbDays = new StringBuilder();
  353. StringBuilder sbDaysStock = new StringBuilder();
  354. StringBuilder sbDaysInStock = new StringBuilder();
  355. StringBuilder sbDaysOutStock = new StringBuilder();
  356. StringBuilder sbDaysSuggest = new StringBuilder();
  357. sb.Append("tooltip:{trigger:'axis'},legend:{data: ['日库存数量','日出库数量','日入库数量','推荐日库存数量']},grid:{left:'3%',right:'4%',bottom:'3%',containLabel:true},toolbox:{feature:{saveAsImage: {}}},xAxis: {type:'category',boundaryGap: false,data:[");
  358. chartDtos.ForEach(a =>
  359. {
  360. sbDays.Append(string.Format("'{0}',",a.Date));
  361. sbDaysStock.Append(string.Format("{0},", a.StockQty));
  362. sbDaysOutStock.Append(string.Format("{0},", a.OutStockQty));
  363. sbDaysInStock.Append(string.Format("{0},", a.InStockQty));
  364. sbDaysSuggest.Append(string.Format("{0},", a.SuggestQty));
  365. });
  366. sb.Append(sbDays.ToString().TrimEnd(',')).
  367. Append("]},yAxis:{type:'value',},series:[{name:'日库存数量',type:'line',stack: 'Total',data:[").
  368. Append(sbDaysStock.ToString().TrimEnd(',')).
  369. Append("]},{name:'日出库数量',type:'line',stack:'Total',data:[").
  370. Append(sbDaysOutStock.ToString().TrimEnd(',')).
  371. Append("]},{name:'日入库数量',type:'line',stack:'Total',data:[").
  372. Append(sbDaysInStock.ToString().TrimEnd(',')).
  373. Append("]},{name:'推荐日库存数量',type:'line',stack:'Total',data:[").
  374. Append(sbDaysSuggest.ToString().TrimEnd(',')).
  375. Append("]}]}");
  376. return sb.ToString();
  377. }
  378. catch (Exception ex)
  379. {
  380. return ex.Message;
  381. }
  382. }
  383. }
  384. }