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.
263 lines
16 KiB
263 lines
16 KiB
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;
|
|
}
|
|
|
|
}
|
|
}
|
|
|