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

所有出库单据加上状态（未配料 已配料 已过账）

master
陆晔 2 years ago
parent
7bd534ba5b
commit
efc78f9c8b
1 changed files with 117 additions and 98 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. 29
      WMS-BS/NFine.Application/WMS/PickMaterialApp.cs

29
WMS-BS/NFine.Application/WMS/PickMaterialApp.cs
View File

@ -123,8 +123,11 @@ where b.MOCode='{0}' and a.WorkPoint='{1}'";
a.ReceiverNumber,a.ReceiverName,a.Urgency,a.NeedDate,a.NeedTime,a.RemarksTerm,a.TextNumber,a.InvDescribe,a.Unit,a.StockIndicator,
case when max(e.SourceID) is null then '未合并' else '已合并' end as IsNew,f.Colspan ,
case when max(k.TransCode) is null then '未占料' else '已占料' end as IsOccupy,
case when sum(a.Quantity) =sum(IssueQuantity) and a.MUSERName != 'JOB' then '已过账'
else (case when sum(a.Quantity) =sum(IssueQuantity) and a.MUSERName = 'JOB' then '已配料' else '未配料' end) end as Status,
case when (a.EATTRIBUTE='01' OR a.EATTRIBUTE='20') then(
case when sum(a.Quantity)=sum(IssueQuantity) and a.MUSERName != 'JOB' then '已过账'
when sum(a.Quantity) =sum(IssueQuantity) and a.MUSERName = 'JOB' then '已配料' else '未配料' end)
else (case when sum(a.Quantity) =sum(IssueQuantity) then '已过账'
when sum(a.Quantity)!=sum(IssueQuantity) AND sum(IssueQuantity)>0 then '已配料' else '未配料' end) END as Status,
f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,
f.cFree4 ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.ID,
case when a.MUSER!= 'JOB' then a.MUSER else '' end AS PickName
@ -303,8 +306,9 @@ where b.MOCode='{0}' and a.WorkPoint='{1}'";
a.ReceiverNumber,a.ReceiverName,a.Urgency,a.NeedDate,a.NeedTime,a.RemarksTerm,a.TextNumber,a.InvDescribe,a.Unit,a.StockIndicator,
case when max(e.SourceID) is null then '未合并' else '已合并' end as IsNew,f.Colspan ,
case when max(k.TransCode) is null then '未占料' else '已占料' end as IsOccupy,
case when sum(a.Quantity) =sum(IssueQuantity) and a.MUSERName != 'JOB' then '已过账'
else (case when sum(a.Quantity) =sum(IssueQuantity) and a.MUSERName = 'JOB' then '已配料' else '未配料' end) end as Status,
case when sum(a.Quantity) =sum(IssueQuantity) then '已过账'
when sum(a.Quantity)!=sum(IssueQuantity) AND sum(IssueQuantity)>0 then '已配料'
else '未配料' end as Status,
f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,
f.cFree4 ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.ID
from ICSMOApply a
@ -615,7 +619,10 @@ where a.IssueCode='{0}' and a.WorkPoint='{1}'";
else '已合并'
end as IsNew,
case when max(k.TransCode) is null then '未占料' else '已占料' end as IsOccupy,
f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,
case when sum(a.Quantity) =sum(IssueQuantity) then '已过账'
when sum(a.Quantity)!=sum(IssueQuantity) AND sum(IssueQuantity)>0 then '已配料'
else '未配料' end as Status,
f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,
f.cFree2,f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10,a.ID
from ICSOApply a
left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
@ -808,6 +815,9 @@ left join (select distinct TransCode,TransType,WorkPoint from dbo.ICSWareHouseLo
a.CusCode,a.CusName,
(CASE WHEN max(e.SourceID) IS NULL THEN '未合并' ELSE '已合并' END) AS IsNew,
case when max(k.TransCode) is null then '未占料' else '已占料' end as IsOccupy,
case when sum(a.Quantity) =sum(SDNQuantity) then '已过账'
when sum(a.Quantity)!=sum(SDNQuantity) AND sum(SDNQuantity)>0 then '已配料'
else '未配料' end as Status,
f.Colspan, f.ProjectCode, f.BatchCode, f.Version, f.Brand,
f.cFree1, f.cFree2, f.cFree3, f.cFree4, f.cFree5, f.cFree6, f.cFree7, f.cFree8, f.cFree9, f.cFree10,a.ID
FROM ICSSDN a
@ -939,6 +949,9 @@ left join (select distinct TransCode,TransType,WorkPoint from dbo.ICSWareHouseLo
else '已合并'
end as IsNew,
case when max(k.TransCode) is null then '未占料' else '已占料' end as IsOccupy,
case when sum(a.Quantity)=sum(a.OutQuantity) then '已过帐'
when sum(a.Quantity)!=sum(a.OutQuantity) and sum(a.OutQuantity)>0 then '已配料'
else '未配料' END AS Status,
f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,
f.cFree2,f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10,a.ID
from ICSOtherOut a
@ -1129,6 +1142,9 @@ f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,
else '已合并'
end as IsNew,
case when max(k.TransCode) is null then '未占料' else '已占料' end as IsOccupy,
case when sum(a.Quantity)=sum(a.TransferQuantity) then '已过帐'
when sum(a.Quantity)!=sum(a.TransferQuantity) and a.TransferQuantity>0 then '已配料'
else '未配料' END AS Status,
f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,
f.cFree2,f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10
from ICSTransfer a
@ -1912,6 +1928,8 @@ c.Sequence,
}
}
try
{
if (table.Rows.Count != 0)
{
#region 拣料时增加条码出入库记录,修改库存锁定数量,以作占料处理
string BusinessCode = string.Empty;
@ -2034,6 +2052,7 @@ c.Sequence,
SqlHelper.CmdExecuteNonQueryLi(pikTbLogsql);
#endregion
}
var result = ConvertCellToString(table);
if (Invmes.Rows.Count > 0)

Write Preview
Loading…
Cancel
Save