|
|
using ICSSoft.Common;using ICSSoft.Entity;using Newtonsoft.Json;using System;using System.Collections.Generic;using System.Data;using System.Data.SqlClient;using System.Linq;using System.Text;using System.Threading.Tasks;
namespace ICSSoft.DataProject{ /// <summary>
/// 生产订单备料表
/// </summary>
public class ManufactureOrderPick { private static log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType); private static string connString = System.Configuration.ConfigurationManager.AppSettings["ERPConnStr"]; private static string ERPDB = System.Configuration.ConfigurationManager.AppSettings["ERPDB"]; private static string Type = System.Configuration.ConfigurationManager.AppSettings["Type"]; /// <summary>
/// 创建生产订单备料表
/// </summary>
/// <param name="infos"></param>
/// <returns></returns>
public string CreateManufactureOrderPick(List<ICSManufactureOrderPick> Bills) { string msg = ""; string connS = ""; DataSet ds = null; if (Bills.Count <= 0) { throw new Exception("传送数据为空！"); } string res = string.Empty; SqlConnection conn = new SqlConnection(); SqlCommand cmd = new SqlCommand(); List<string> result = Bills.Select(t => t.WorkPoint).Distinct().ToList(); foreach (string WorkPoint in result) { try { connS = string.Format(connString, WorkPoint); conn = new System.Data.SqlClient.SqlConnection(connS); conn.Open(); SqlTransaction sqlTran = conn.BeginTransaction(); cmd = new SqlCommand(); cmd.Transaction = sqlTran; cmd.Connection = conn; var list = Bills.Where(a => a.WorkPoint == WorkPoint); foreach (ICSManufactureOrderPick head in list) { ICSUserInfo userInfo = new ICSUserInfo(); userInfo = DBHelper.GetPersonInfo(head.User, cmd); string[] ss = head.WorkPoint.Split('_'); ERPDB = ss[1]; Dictionary<string, int> dic; string sql = ""; List<int> ids = new List<int>(); #region 备料表
foreach (ICSManufactureOrderPicks body in head.details) { if (body.ParentAllocateId > 0 && body.Factor <= 0) throw new Exception("需要替代时替代比例必须大于零！");
dic = DBHelper.GetAllCode(ERPDB, "mom_moallocate", "1", head.WorkPoint, cmd); int iFatherId = Convert.ToInt32(dic["iFatherId"].ToString()); int iChildId = Convert.ToInt32(dic["iChildId"].ToString()); ids.Add(iChildId); #region 生产备料表
sql = @"
IF {10}>0 BEGIN IF NOT EXISTS (SELECT AllocateId FROM mom_moallocate WHERE AllocateId='{10}') BEGIN RAISERROR('子件不存在！AllocateId：{10}',16,1) END ELSE IF NOT EXISTS (SELECT AllocateId FROM mom_moallocate WHERE AllocateId='{10}' AND MoDId='{0}') BEGIN RAISERROR('工单行与子件不符！MoDId：{0}，AllocateId：{10}',16,1) END UPDATE mom_moallocate SET BaseQtyN='{3}',BaseQtyD='{4}',Qty='{5}',AuxQty='{11}',WhCode='{7}',WIPType='{8}' WHERE AllocateId='{10}' END ELSE BEGIN SELECT '{6}' AS AllocateId,d.MoDId,ISNULL((SELECT MAX(SortSeq) FROM mom_moallocate WHERE MoDId=d.MoDId), 0)+10 AS SortSeq,ISNULL(a.OpSeq, '0000') AS OpSeq,ISNULL(a.ComponentId,c.PartId) AS ComponentId, ISNULL(a.FVFlag,'1') AS FVFlag,'{3}' AS BaseQtyN,'{4}' AS BaseQtyD,'0' AS ParentScrap,ISNULL(a.CompScrap,'0') AS CompScrap, '{5}' AS Qty,'0' AS IssQty,'0' AS DeclaredQty, GETDATE() AS StartDemDate, GETDATE() AS EndDemDate, '{7}' AS WhCode,NULL AS LotNo,'{8}' AS WIPType,ISNULL(a.ByproductFlag,'0') AS ByproductFlag,'0' AS QcFlag, '0' AS Offset,c.InvCode,ISNULL(a.Free1,'') AS Free1,ISNULL(a.Free2,'') AS Free2,ISNULL(a.Free3,'') AS Free3 ,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 ,ISNULL(a.Free9,'') AS Free9,ISNULL(a.Free10,'') AS Free10,ISNULL(a.OpComponentId,'0') AS OpComponentId,a.Define22,a.Define23, a.Define24,a.Define25,a.Define26,a.Define27,a.Define28, a.Define29,a.Define30,a.Define31,a.Define32,a.Define33, a.Define34,a.Define35,a.Define36,a.Define37,'0' AS ReplenishQty, a.Remark,'0' AS TransQty,ISNULL(a.ProductType,'1') AS ProductType,'0' AS SoType,NULL AS SoDId, NULL AS SoCode,NULL AS SoSeq,NULL AS DemandCode,'0' AS QmFlag,'0' AS OrgQty, '0' AS OrgAuxQty,NULL AS CostItemCode,NULL AS CostItemName,(SELECT TOP 1 RequisitionFlag FROM mom_moallocate WHERE MoDId=d.MoDId ORDER BY RequisitionFlag DESC) AS RequisitionFlag,'0' AS RequisitionQty, '0' AS RequisitionIssQty,'0' AS CostWIPRel,NULL AS cSubSysBarCode,'0' AS PickingQty, '0' AS PickingAuxQty,'0' AS UpperMoQty,'0' AS InvAlloeFlag,NULL AS FactoryCode,'{11}' AS AuxQty ,ISNULL((SELECT MAX(Sequence) FROM mom_moallocatesub WHERE AllocateId=o.AllocateId), 0)+1 AS Sequence,o.AllocateId AS SubAllocateId,n.MoallocateSubId AS SubMoallocateSubId,ISNULL(n.MoallocateSubId, NEWID()) AS MoallocateSubId,c.PartId,'{9}' AS Factor,'2000-01-01' AS EffBegDate,'2099-12-31' AS EffEndDate,'0' AS ReplaceFlag INTO #TempMOAll FROM mom_orderdetail d INNER JOIN bas_part p on d.PartId = p.PartId LEFT JOIN bom_parent q on q.ParentId = p.PartId LEFT JOIN bom_bom b ON q.BomId=b.BomId AND b.VersionEndDate>=CONVERT(VARCHAR(10),GETDATE(),23) --子料 INNER JOIN bas_part c ON c.InvCode='{1}' LEFT JOIN bom_opcomponent a ON a.ComponentId = c.PartId AND a.BomId=b.BomId LEFT JOIN bom_opcomponentopt e ON a.OptionsId=e.OptionsId LEFT JOIN mom_moallocate o on d.MoDId = o.MoDId AND o.AllocateId='{2}' LEFT JOIN mom_moallocatesub n on o.AllocateId = n.AllocateId AND c.PartId=n.PartId WHERE d.MoDId='{0}' ORDER BY d.MoDId
IF @@ROWCOUNT<=0 BEGIN RAISERROR('工单行或物料不存在！物料：{1}，MoDId：{0}',16,1) END
IF {2}>0 BEGIN IF EXISTS (SELECT SubAllocateId FROM #TempMOAll WHERE SubAllocateId IS NULL) BEGIN RAISERROR('被替代料不存在！ParentAllocateId：{2}',16,1) END IF EXISTS (SELECT SubMoallocateSubId FROM #TempMOAll WHERE SubMoallocateSubId IS NULL) BEGIN INSERT INTO mom_moallocatesub(MoallocateSubId,AllocateId,Sequence,PartId,Factor,EffBegDate,EffEndDate,ReplaceFlag) SELECT MoallocateSubId,SubAllocateId,Sequence,PartId,Factor,EffBegDate,EffEndDate,ReplaceFlag FROM #TempMOAll END ELSE BEGIN UPDATE a SET Factor = b.Factor FROM mom_moallocatesub a INNER JOIN #TempMOAll b ON a.MoallocateSubId=b.MoallocateSubId END END
INSERT INTO mom_moallocate (AllocateId,MoDId,SortSeq,OpSeq,ComponentId, FVFlag,BaseQtyN,BaseQtyD,ParentScrap,CompScrap, Qty,IssQty,DeclaredQty,StartDemDate,EndDemDate, WhCode,LotNo,WIPType,ByproductFlag,QcFlag, Offset,InvCode,Free1,Free2,Free3, Free4,Free5,Free6,Free7,Free8, Free9,Free10,OpComponentId,Define22,Define23, Define24,Define25,Define26,Define27,Define28, Define29,Define30,Define31,Define32,Define33, Define34,Define35,Define36,Define37,ReplenishQty, Remark,TransQty,ProductType,SoType,SoDId, SoCode,SoSeq,DemandCode,QmFlag,OrgQty, OrgAuxQty,CostItemCode,CostItemName,RequisitionFlag,RequisitionQty, RequisitionIssQty,CostWIPRel,cSubSysBarCode,PickingQty, PickingAuxQty,UpperMoQty,InvAlloeFlag,FactoryCode,MoallocateSubId,AuxQty)
SELECT AllocateId,MoDId,SortSeq,OpSeq,ComponentId, FVFlag,BaseQtyN,BaseQtyD,ParentScrap,CompScrap, Qty,IssQty,DeclaredQty,StartDemDate,EndDemDate, WhCode,LotNo,WIPType,ByproductFlag,QcFlag, Offset,InvCode,Free1,Free2,Free3, Free4,Free5,Free6,Free7,Free8, Free9,Free10,OpComponentId,Define22,Define23, Define24,Define25,Define26,Define27,Define28, Define29,Define30,Define31,Define32,Define33, Define34,Define35,Define36,Define37,ReplenishQty, Remark,TransQty,ProductType,SoType,SoDId, SoCode,SoSeq,DemandCode,QmFlag,OrgQty, OrgAuxQty,CostItemCode,CostItemName,RequisitionFlag,RequisitionQty, RequisitionIssQty,CostWIPRel,cSubSysBarCode,PickingQty, PickingAuxQty,UpperMoQty,InvAlloeFlag,FactoryCode,MoallocateSubId,AuxQty FROM #TempMOAll DROP TABLE #TempMOAll END ";
//根据替代料数量更新主料数量，主料数量作为参数传递，此处不需要更新
//UPDATE a SET Qty = Qty-b.Qty
// FROM mom_moallocate a
// INNER JOIN(
// SELECT d.AllocateId, SUM(c.Qty / d.Factor) AS Qty
// FROM mom_moallocate c
// INNER JOIN mom_moallocatesub d ON c.MoallocateSubId = d.MoallocateSubId
// WHERE c.MoDId = '{0}'
// GROUP BY d.AllocateId
// ) b ON a.AllocateId = b.AllocateId
sql = string.Format(sql, head.DetailID, body.InvCode, body.ParentAllocateId, body.BaseQtyN, body.BaseQtyD, body.Quantity, iChildId, body.WHCode, body.SupplyType, body.Factor,body.AllocateId, body.Amount);
cmd.CommandText = sql; try { int count = cmd.ExecuteNonQuery(); if (count <= 0) { throw new Exception("生成生产订单备料表失败，受影响行数<=0；"); } } catch (Exception ex) { log.Error("生成生产订单备料表失败！异常：" + ex.Message + "；SQL：\r\n" + sql, ex); throw new Exception("生成生产订单备料表失败！异常：" + ex.Message + "；SQL：\r\n" + sql, ex); } #endregion
} #endregion
#region 查询
sql = @" SELECT DISTINCT a.MoDId AS IDs,a.MoDId AS DetailID,a.SortSeq AS DetailSequence,a.InvCode AS DetailInvCode,a.Qty AS DetailQuantity
FROM mom_orderdetail a INNER JOIN mom_moallocate b ON a.MoDId=b.MoDId WHERE b.AllocateId in ({0})
SELECT DISTINCT a.MoDId as IDs, AllocateId as PickID,SortSeq as Sequence, InvCode,Qty as Quantity,AuxQty as Amount,a.WhCode,b.cWhName AS WHName,WIPType AS SupplyType, '' ProjectCode,'' cBatch,'' version ,'' brand, isnull(a.Free1,'') as cFree1, isnull(a.Free2,'') as cFree2, isnull(a.Free3,'') as cFree3, isnull(a.Free4,'') as cFree4, isnull(a.Free5,'') as cFree5, isnull(a.Free6,'') as cFree6, isnull(a.Free7,'') as cFree7, isnull(a.Free8,'') as cFree8, isnull(a.Free9,'') as cFree9, isnull(a.Free10,'') as cFree10 FROM mom_moallocate a LEFT JOIN Warehouse b on a.WhCode=b.cWhCode WHERE a.AllocateId in ({0}) ";
sql = string.Format(sql, "'" + string.Join("','", ids) + "'"); if (ds != null) ds.Merge(DBHelper.SQlReturnDataSet(sql, cmd)); else ds = DBHelper.SQlReturnDataSet(sql, cmd); #endregion
} cmd.Transaction.Commit(); } catch (Exception ex) { if(cmd.Transaction!=null) cmd.Transaction.Rollback(); log.Error(ex.Message); throw new Exception(ex.Message); } finally { if (conn.State == ConnectionState.Open) { conn.Close(); } conn.Dispose(); } } msg = JSON.DataSetToJson(ds, "details", "IDs"); return msg; }
}}
|
