IcsFromERPJob
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.

203 lines
10 KiB

using System;
using System.Collections.Generic;
using System.Data;
using System.Linq;
using System.Text;
using Quartz;
namespace ICSSoft.FromERP
{
/// <summary>
/// 领料单
/// </summary>
public class ICSMOApply : IJob
{
private static object key = new object();
private static log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
public void Execute(IJobExecutionContext context)
{
try
{
lock (key)
{
log.Info("开始……………………………………………………………………");
Execute();
log.Info("结束……………………………………………………………………");
}
}
catch (Exception ex)
{
log.Error(ex.ToString());
}
}
public void Execute()
{
try
{
string conStr = ICSHelper.GetConnectString();
string Namespace = this.GetType().Namespace;
//string Class = this.GetType().Name;
DataTable dt = ICSHelper.GetERPDB(conStr);
foreach (DataRow dr in dt.Rows)
{
string erpName = ICSHelper.GetConfigString()["ERPDB"];
string WorkPoint = dr["WorkPointCode"].ToString();
string Class = this.GetType().Name + WorkPoint;
erpName = string.Format(erpName, WorkPoint);
#region SQL
string sql = @"select
A.DocNo as ApplyCode,
B.LineNum as Sequence,
CASE WHEN A.IssueType=0 OR A.IssueType=3 THEN C.DocNo WHEN A.IssueType=1 THEN E.DocNo END as SourceCode,
CASE WHEN A.IssueType=0 OR A.IssueType=3 THEN 1 WHEN A.IssueType=1 THEN D.LineNum END as SourceSequence,
F.Code as InvCode,
B.IssuedQty as Quantity,
0 as Amount,
G.Code as WHCode,
CASE WHEN A.IssueType=0 THEN '1' WHEN A.IssueType=1 THEN '2' END as Type,
'2' as Status,
A.CreatedBy as CreatePerson,
A.CreatedOn as CreateDateTime,
A.ID as ApplyID,
B.ID as ApplyDetailID ,
ISNULL(B.ModifiedOn,B.CreatedOn) AS MTIME,
isnull(I.Code,'') ProjectCode,isnull(B.LotNo,'') cBatch,'' version ,'' brand,
'' as cFree1,
'' as cFree2,
'' as cFree3,
'' as cFree4,
'' as cFree5,
'' as cFree6,
'' as cFree7,
'' as cFree8,
'' as cFree9,
'' as cFree10,CAST('' AS NVARCHAR(500)) as Colspan
,H.Code as WorkPoint
,B.MOPick PickID
INTO #TempPick
from {1}.dbo.MO_IssueDoc A
LEFT JOIN {1}.dbo.MO_IssueDocLine B ON IssueDoc=A.ID
LEFT JOIN {1}.dbo.MO_MO C ON C.ID=B.MO
LEFT JOIN {1}.dbo.MO_IssueDocLine D ON D.ID=B.SourceIssueDocLine
LEFT JOIN {1}.dbo.MO_IssueDoc E ON E.ID=D.IssueDoc
LEFT JOIN {1}.dbo.CBO_ItemMaster F ON F.ID=B.Item
LEFT JOIN {1}.dbo.CBO_Wh G ON G.ID=B.Wh
LEFT JOIN {1}.dbo.Base_Organization H ON H.ID=A.Org
LEFT JOIN {1}.dbo.CBO_Project I ON I.ID=B.Project
where (A.IssueType=0 OR A.IssueType=3) AND A.DocState=3 AND H.Code='{0}' AND ISNULL(B.ModifiedOn,B.CreatedOn)>=@LastTime
update #TempPick set Colspan=isNULL(ProjectCode,'')+'~'+isNULL(cBatch,'')+'~'+isNULL(Version,'')+'~'+isNULL(Brand,'')+'~'+isNULL(cFree1,'')+'~'+isnull(cFree2,'')+'~'+isnull(cFree3,'')+'~'+isnull(cFree4,'')+'~'+isnull(cFree5,'')+'~'+isnull(cFree6,'')+'~'+isnull(cFree7,'')+'~'+isnull(cFree8,'')+'~'+isnull(cFree9,'')+'~'+isnull(cFree10,'')
select distinct
Colspan,ProjectCode,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10,WorkPoint,cBatch,version ,brand
INTO #TempExtension
from #TempPick
IF NOT EXISTS(SELECT * FROM #TempPick)
RETURN";
sql = ICSHelper.Time(Namespace, Class, WorkPoint, sql, "#TempPick");
Dictionary<string, string> value = new Dictionary<string, string>();
value.Add("ID", "NEWID()");
value.Add("BatchCode", "a.cBatch");
value.Add("version", "a.version");
value.Add("brand", "a.brand");
value.Add("ProjectCode", "a.ProjectCode");
value.Add("cFree1", "a.cFree1");
value.Add("cFree2", "a.cFree2");
value.Add("cFree3", "a.cFree3");
value.Add("cFree4", "a.cFree4");
value.Add("cFree5", "a.cFree5");
value.Add("cFree6", "a.cFree6");
value.Add("cFree7", "a.cFree7");
value.Add("cFree8", "a.cFree8");
value.Add("cFree9", "a.cFree9");
value.Add("cFree10", "a.cFree10");
value.Add("Colspan", "a.Colspan");
value.Add("MTIME", "GETDATE()");
value.Add("MUSER", "'" + ConstWorkPoint.Muser + "'");
value.Add("MUSERName", "'" + ConstWorkPoint.Musername + "'");
value.Add("WorkPoint", "'" + WorkPoint + "'");
//插入新增数据->ICSExtension表
sql += ICSHelper.InsertSQL("ICSExtension", value)
+ @"#TempExtension a
LEFT JOIN ICSExtension b ON a.ProjectCode+'~'+a.cBatch+'~'+a.Version+'~'+a.Brand+'~'+a.cFree1+'~'+a.cFree2+'~'+a.cFree3+'~'+a.cFree4+'~'+a.cFree5+'~'+a.cFree6+'~'+a.cFree7+'~'+a.cFree8+'~'+a.cFree9+'~'+a.cFree10=b.Colspan and a.WorkPoint=b.WorkPoint
WHERE b.Colspan IS NULL";
sql += @"--删除数据
-- DELETE ICSMOApply WHERE ApplyDetailID IN (SELECT ApplyDetailID FROM ICSMOApply a left join {1}.dbo.MaterialAppVouchs b on a.ApplyDetailID=b.AutoID where b.AutoID is null) AND LEN(ApplyDetailID)>0
SELECT a.ApplyDetailID INTO #tableICSMOApply
FROM ICSMOApply a With(NoLock)
LEFT JOIN {1}.dbo.[MO_IssueDocLine] b With(NoLock) ON a.ApplyDetailID=b.ID
WHERE a.WorkPoint='{0}' and b.ID IS NULL
DELETE ICSMOApply
WHERE WorkPoint='{0}' and ApplyDetailID IN ( SELECT ApplyDetailID from #tableICSMOApply)
";
Dictionary<string, string> values = new Dictionary<string, string>();
values.Add("ApplyCode", "a.ApplyCode");
values.Add("Sequence", "a.Sequence");
values.Add("SourceCode", "a.SourceCode");
values.Add("SourceSequence", "a.SourceSequence");
values.Add("InvCode", "a.InvCode");
//values.Add("SubInvCode", "a.SubInvCode");
values.Add("Quantity", "a.Quantity");
values.Add("Amount", "0");
values.Add("WHCode", "a.WHCode");
values.Add("Type", "1");
values.Add("Status", "a.Status");
//values.Add("VoucherDate", "a.VoucherDate");
//values.Add("EATTRIBUTE", "a.EATTRIBUTE");
values.Add("CreatePerson", "a.CreatePerson");
values.Add("CreateDateTime", "a.CreateDateTime");
values.Add("ApplyID", "a.ApplyID");
values.Add("ApplyDetailID", "a.ApplyDetailID");
values.Add("ExtensionID", "c.ID");
values.Add("MUSER", "'" + ConstWorkPoint.Muser + "'");
values.Add("MUSERName", "'" + ConstWorkPoint.Musername + "'");
values.Add("MTIME", "a.MTIME");
//values.Add("MoveType", "a.MoveType");
// values.Add("ORDERNO", "a.ORDERNO");
values.Add("WorkPoint", "'" + WorkPoint + "'");
//values.Add("WorkPoint", "a.WorkPoint");
// values.Add("cBatch", "a.cBatch");
//values.Add("DepCode", "a.DepCode");
//更新存在数据
sql += ICSHelper.UpdateSQL("b", values)
+ @" #TempPick a
INNER JOIN ICSMOApply b ON a.ApplyDetailID=b.ApplyDetailID and a.WorkPoint=b.WorkPoint
inner join ICSExtension c on a.Colspan=c.Colspan and a.WorkPoint=c.WorkPoint
WHERE a.WorkPoint='" + WorkPoint + "' ";
values.Add("ID", "NEWID()");
values.Add("IssueQuantity", "'0'");
//插入新增数据
sql += ICSHelper.InsertSQL("ICSMOApply", values)
+ @" #TempPick a
LEFT JOIN ICSMOApply b ON a.ApplyDetailID=b.ApplyDetailID and a.WorkPoint=b.WorkPoint
inner join ICSExtension c on a.Colspan=c.Colspan and a.WorkPoint=c.WorkPoint
WHERE b.ID IS NULL and a.WorkPoint='" + WorkPoint + "' ";
sql += " DROP TABLE #TempPick ";
sql += " DROP TABLE #TempExtension " +
" DROP TABLE #tableICSMOApply";
sql = string.Format(sql, WorkPoint, erpName);
ICSHelper.ExecuteDate(conStr, sql);
#endregion
}
}
catch (Exception ex)
{
log.Error(ex.ToString());
}
}
}
}