Luy
/
NWeiWMS
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
Browse Source

工单备料表

master
李晓华 2 years ago
parent
b63a337429
commit
7172d15e5b
3 changed files with 115 additions and 52 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Split View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 161
      ICSSoft.ERP.WebAPI/ICSSoft.DataProject/ManufactureOrderPick.cs
  2. 6
      ICSSoft.ERP.WebAPI/ICSSoft.Entity/ICSManufactureOrderPick.cs

161
ICSSoft.ERP.WebAPI/ICSSoft.DataProject/ManufactureOrderPick.cs
View File

@ -63,72 +63,131 @@ namespace ICSSoft.DataProject
#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);
int iFatherId = Convert.ToInt32(dic["iFatherId"].ToString());
int iChildId = Convert.ToInt32(dic["iChildId"].ToString());
ids.Add(iChildId);
#region 生产备料表
sql = @"SELECT '{6}' AS AllocateId,d.MoDId,'{2}' 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,
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,'0' AS RequisitionFlag,'0' AS RequisitionQty,
'0' AS RequisitionIssQty,'0' AS CostWIPRel,NULL AS MoallocateSubId,NULL AS cSubSysBarCode,'0' AS PickingQty,
'0' AS PickingAuxQty,'0' AS UpperMoQty,'0' AS InvAlloeFlag,NULL AS FactoryCode
'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.InvCode = p.InvCode
LEFT JOIN bom_parent q on q.ParentId = p.PartId
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";
sql = string.Format(sql, head.DetailID, body.InvCode, body.Sequence, body.BaseQtyN, body.BaseQtyD, body.Quantity, iChildId, body.WHCode, body.SupplyType);
sql += @" 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)
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 ";
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
FROM #TempMOAll";
//根据替代料数量更新主料数量，主料数量作为参数传递，此处不需要更新
//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);
sql += @" DROP TABLE #TempMOAll" + Environment.NewLine;
cmd.CommandText = sql;
try
{
@ -154,7 +213,7 @@ namespace ICSSoft.DataProject
WHERE b.AllocateId in ({0})
SELECT DISTINCT a.MoDId as IDs, AllocateId as PickID,SortSeq as Sequence,
InvCode,Qty as Quantity,0 as Amount,a.WhCode,b.cWhName AS WHName,WIPType AS SupplyType,
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,

6
ICSSoft.ERP.WebAPI/ICSSoft.Entity/ICSManufactureOrderPick.cs
View File

@ -15,7 +15,8 @@ namespace ICSSoft.Entity
}
public class ICSManufactureOrderPicks
{
public int Sequence;
//public int Sequence;
public int AllocateId;
public string InvCode;
public decimal Quantity;
public decimal Amount;
@ -23,5 +24,8 @@ namespace ICSSoft.Entity
public string SupplyType;
public decimal BaseQtyN;
public decimal BaseQtyD;
public int ParentAllocateId;
public decimal Factor;
}
}
Write Preview
Loading…
Cancel
Save