纽威
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

169 lines
10 KiB

  1. using ICSSoft.Common;
  2. using ICSSoft.Entity;
  3. using Newtonsoft.Json;
  4. using System;
  5. using System.Collections.Generic;
  6. using System.Data;
  7. using System.Data.SqlClient;
  8. using System.Linq;
  9. using System.Text;
  10. using System.Threading.Tasks;
  11. namespace ICSSoft.DataProject
  12. {
  13. /// <summary>
  14. /// 生产订单备料表
  15. /// </summary>
  16. public class ManufactureOrderPick
  17. {
  18. private static log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
  19. private static string connString = System.Configuration.ConfigurationManager.AppSettings["ERPConnStr"];
  20. private static string ERPDB = System.Configuration.ConfigurationManager.AppSettings["ERPDB"];
  21. private static string Type = System.Configuration.ConfigurationManager.AppSettings["Type"];
  22. /// <summary>
  23. /// 创建生产订单备料表
  24. /// </summary>
  25. /// <param name="infos"></param>
  26. /// <returns></returns>
  27. public string CreateManufactureOrderPick(List<ICSManufactureOrderPick> Bills)
  28. {
  29. string msg = "";
  30. string connS = "";
  31. if (Bills.Count <= 0)
  32. {
  33. throw new Exception("传送数据为空!");
  34. }
  35. string res = string.Empty;
  36. SqlConnection conn = new SqlConnection();
  37. SqlCommand cmd = new SqlCommand();
  38. List<string> result = Bills.Select(t => t.WorkPoint).Distinct().ToList();
  39. foreach (string WorkPoint in result)
  40. {
  41. try
  42. {
  43. connS = string.Format(connString, WorkPoint);
  44. conn = new System.Data.SqlClient.SqlConnection(connS);
  45. conn.Open();
  46. SqlTransaction sqlTran = conn.BeginTransaction();
  47. cmd = new SqlCommand();
  48. cmd.Transaction = sqlTran;
  49. cmd.Connection = conn;
  50. var list = Bills.Where(a => a.WorkPoint == WorkPoint);
  51. foreach (ICSManufactureOrderPick head in list)
  52. {
  53. ICSUserInfo userInfo = new ICSUserInfo();
  54. userInfo = DBHelper.GetPersonInfo(head.User, cmd);
  55. string[] ss = head.WorkPoint.Split('_');
  56. ERPDB = ss[1];
  57. Dictionary<string, int> dic;
  58. string sql = "";
  59. #region 备料表
  60. foreach (ICSManufactureOrderPicks body in head.details)
  61. {
  62. dic = DBHelper.GetAllCode(ERPDB, "mom_moallocate", "1", head.WorkPoint);
  63. int iFatherId = Convert.ToInt32(dic["iFatherId"].ToString());
  64. int iChildId = Convert.ToInt32(dic["iChildId"].ToString());
  65. #region 生产备料表
  66. sql = @"SELECT '{6}' AS AllocateId,d.MoDId,'{2}' AS SortSeq,ISNULL(a.OpSeq, '0000') AS OpSeq,ISNULL(a.ComponentId,c.PartId) AS ComponentId,
  67. ISNULL(a.FVFlag,'1') AS FVFlag,'{3}' AS BaseQtyN,'{4}' AS BaseQtyD,'0' AS ParentScrap,ISNULL(a.CompScrap,'0') AS CompScrap,
  68. '{5}' AS Qty,'0' AS IssQty,'0' AS DeclaredQty, GETDATE() AS StartDemDate, GETDATE() AS EndDemDate,
  69. '{7}' AS WhCode,NULL AS LotNo,'{8}' AS WIPType,ISNULL(a.ByproductFlag,'0') AS ByproductFlag,'0' AS QcFlag,
  70. '0' AS Offset,ISNULL(a.Free1,'') AS Free1,ISNULL(a.Free2,'') AS Free2,ISNULL(a.Free3,'') AS Free3
  71. ,ISNULL(a.Free4,'') AS Free4,ISNULL(a.Free5,'') AS Free5,ISNULL(a.Free6,'') AS Free6,ISNULL(a.Free7,'') AS Free7,ISNULL(a.Free8,'') AS Free8
  72. ,ISNULL(a.Free9,'') AS Free9,ISNULL(a.Free10,'') AS Free10,ISNULL(a.OpComponentId,'0') AS OpComponentId,a.Define22,a.Define23,
  73. a.Define24,a.Define25,a.Define26,a.Define27,a.Define28,
  74. a.Define29,a.Define30,a.Define31,a.Define32,a.Define33,
  75. a.Define34,a.Define35,a.Define36,a.Define37,'0' AS ReplenishQty,
  76. a.Remark,'0' AS TransQty,ISNULL(a.ProductType,'1') AS ProductType,'0' AS SoType,NULL AS SoDId,
  77. NULL AS SoCode,NULL AS SoSeq,NULL AS DemandCode,'0' AS QmFlag,'0' AS OrgQty,
  78. '0' AS OrgAuxQty,NULL AS CostItemCode,NULL AS CostItemName,'0' AS RequisitionFlag,'0' AS RequisitionQty,
  79. '0' AS RequisitionIssQty,'0' AS CostWIPRel,NULL AS MoallocateSubId,NULL AS cSubSysBarCode,'0' AS PickingQty,
  80. '0' AS PickingAuxQty,'0' AS UpperMoQty,'0' AS InvAlloeFlag,NULL AS FactoryCode
  81. INTO #TempBOMP
  82. FROM mom_orderdetail d
  83. INNER JOIN bas_part p on d.InvCode = p.InvCode
  84. LEFT JOIN bom_parent q on q.ParentId = p.PartId
  85. LEFT JOIN bom_bom b ON q.BomId=b.BomId AND a.VersionEndDate>=CONVERT(VARCHAR(10),GETDATE(),23)
  86. --
  87. INNER JOIN bas_part c ON c.InvCode='{1}'
  88. LEFT JOIN bom_opcomponent a ON a.ComponentId = c.PartId AND a.BomId=b.BomId
  89. LEFT JOIN bom_opcomponentopt e ON a.OptionsId=e.OptionsId
  90. WHERE d.MoDId='{0}'
  91. ORDER BY d.MoDId";
  92. sql = string.Format(sql, head.DetailID, body.InvCode, body.Sequence, body.BaseQtyN, body.BaseQtyD, body.Quantity, iChildId, body.WHCode, body.SupplyType);
  93. sql += @" INSERT INTO mom_moallocate (AllocateId,MoDId,SortSeq,OpSeq,ComponentId,
  94. FVFlag,BaseQtyN,BaseQtyD,ParentScrap,CompScrap,
  95. Qty,IssQty,DeclaredQty,StartDemDate,EndDemDate,
  96. WhCode,LotNo,WIPType,ByproductFlag,QcFlag,
  97. Offset,InvCode,Free1,Free2,Free3,
  98. Free4,Free5,Free6,Free7,Free8,
  99. Free9,Free10,OpComponentId,Define22,Define23,
  100. Define24,Define25,Define26,Define27,Define28,
  101. Define29,Define30,Define31,Define32,Define33,
  102. Define34,Define35,Define36,Define37,ReplenishQty,
  103. Remark,TransQty,ProductType,SoType,SoDId,
  104. SoCode,SoSeq,DemandCode,QmFlag,OrgQty,
  105. OrgAuxQty,CostItemCode,CostItemName,RequisitionFlag,RequisitionQty,
  106. RequisitionIssQty,CostWIPRel,cSubSysBarCode,PickingQty,
  107. PickingAuxQty,UpperMoQty,InvAlloeFlag,FactoryCode)
  108. SELECT AllocateId,MoDId,SortSeq,OpSeq,ComponentId,
  109. FVFlag,BaseQtyN,BaseQtyD,ParentScrap,CompScrap,
  110. Qty,IssQty,DeclaredQty,StartDemDate,EndDemDate,
  111. WhCode,LotNo,WIPType,ByproductFlag,QcFlag,
  112. Offset,InvCode,Free1,Free2,Free3,
  113. Free4,Free5,Free6,Free7,Free8,
  114. Free9,Free10,OpComponentId,Define22,Define23,
  115. Define24,Define25,Define26,Define27,Define28,
  116. Define29,Define30,Define31,Define32,Define33,
  117. Define34,Define35,Define36,Define37,ReplenishQty,
  118. Remark,TransQty,ProductType,SoType,SoDId,
  119. SoCode,SoSeq,DemandCode,QmFlag,OrgQty,
  120. OrgAuxQty,CostItemCode,CostItemName,RequisitionFlag,RequisitionQty,
  121. RequisitionIssQty,CostWIPRel,cSubSysBarCode,PickingQty,
  122. PickingAuxQty,UpperMoQty,InvAlloeFlag,FactoryCode
  123. FROM #TempMOAll";
  124. sql += @" DROP TABLE #TempMOAll" + iFatherId + Environment.NewLine;
  125. cmd.CommandText = sql;
  126. try
  127. {
  128. int count = cmd.ExecuteNonQuery();
  129. if (count <= 0)
  130. {
  131. throw new Exception("生成生产订单备料表失败,受影响行数<=0;");
  132. }
  133. }
  134. catch (Exception ex)
  135. {
  136. log.Error("生成生产订单备料表失败!异常:" + ex.Message + ";SQL:\r\n" + sql, ex);
  137. throw new Exception("生成生产订单备料表失败!异常:" + ex.Message + ";SQL:\r\n" + sql, ex);
  138. }
  139. #endregion
  140. }
  141. #endregion
  142. }
  143. cmd.Transaction.Commit();
  144. }
  145. catch (Exception ex)
  146. {
  147. cmd.Transaction.Rollback();
  148. log.Error(ex.Message);
  149. throw new Exception(ex.Message);
  150. }
  151. finally
  152. {
  153. if (conn.State == ConnectionState.Open)
  154. {
  155. conn.Close();
  156. }
  157. conn.Dispose();
  158. }
  159. }
  160. return msg;
  161. }
  162. }
  163. }