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.

191 lines
11 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 ICSDisassemblyDoc : 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 CAST(b.ID as VARCHAR(50)) AS EATTRIBUTE ,
b.cAVCode AS DABDOCCode,
b.cDepCode AS DepCode,
ISNULL(a.cWhCode,'') AS WHCode ,
CAST(a.irowno as VARCHAR(50)) AS Sequence ,
a.cInvCode AS InvCode ,
a.iAVQuantity AS Quantity ,
isnull(a.iAVNum,0) as Amount,
CASE WHEN a.bAVType='套件'THEN '1' ELSE '2' END AS DABDOCType,
CASE WHEN ISNULL(b.cVerifyPerson , '')='' THEN '1' ELSE '2' END AS Status,
isnull(b.cMaker,'') as CreatePerson,
b.dnmaketime as CreateDateTime,
CAST(a.ID as VARCHAR(50)) AS DABDOCID ,
CAST(a.autoID as VARCHAR(50)) AS DABDOCDetailID ,
ISNULL(b.dnmodifytime, b.dnmaketime) AS MTIME,
isnull(a.cItemCode,'') ProjectCode,isnull(a.cAVBatch,'') cBatch,'' version ,'' brand,
(case WHEN e.bFree1=1 THEN a.cFree1 ELSE '' END) as cFree1,
(case WHEN e.bFree2=1 THEN a.cFree2 ELSE '' END) as cFree2,
(case WHEN e.bFree3=1 THEN a.cFree3 ELSE '' END) as cFree3,
(case WHEN e.bFree4=1 THEN a.cFree4 ELSE '' END) as cFree4,
(case WHEN e.bFree5=1 THEN a.cFree5 ELSE '' END) as cFree5,
(case WHEN e.bFree6=1 THEN a.cFree6 ELSE '' END) as cFree6,
(case WHEN e.bFree7=1 THEN a.cFree7 ELSE '' END) as cFree7,
(case WHEN e.bFree8=1 THEN a.cFree8 ELSE '' END) as cFree8,
(case WHEN e.bFree9=1 THEN a.cFree9 ELSE '' END) as cFree9,
(case WHEN e.bFree10=1 THEN a.cFree10 ELSE '' END) as cFree10,CAST('' AS NVARCHAR(500)) as Colspan
, '{0}' as WorkPoint
INTO #TempPickAssem
FROM {1}.dbo.AssemVouchs a
INNER JOIN {1}.dbo.AssemVouch b ON a.ID = b.ID
LEFT JOIN {1}.dbo.Inventory e ON a.cInvCode = e.cInvCode
WHERE ISNULL(b.cVerifyPerson,'')='' AND b.cVouchType='14'
AND ISNULL(b.dnmodifytime, b.dnmaketime)>=@LastTime
update #TempPickAssem 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 #TempPickAssem
IF NOT EXISTS(SELECT * FROM #TempPickAssem)
RETURN";
sql = ICSHelper.Time(Namespace, Class, WorkPoint, sql, "#TempPickAssem");
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 += "\r\n";
sql += @"--删除数据
--DELETE ICSDisassemblyDoc WHERE DABDOCDetailID NOT IN (SELECT autoID FROM {1}.dbo.AssemVouchs ) AND LEN(DABDOCDetailID)>0
SELECT a.DABDOCDetailID INTO #tableICSDisassemblyDoc
FROM ICSDisassemblyDoc a With(NoLock)
LEFT JOIN {1}.dbo.[AssemVouchs] b With(NoLock) ON a.DABDOCDetailID=b.autoID
WHERE a.WorkPoint='{0}' and b.autoID IS NULL AND LEN(a.DABDOCDetailID)>0
DELETE ICSDisassemblyDoc
WHERE WorkPoint='{0}' and DABDOCDetailID IN ( SELECT DABDOCDetailID from #tableICSDisassemblyDoc)
";
Dictionary<string, string> values = new Dictionary<string, string>();
values.Add("DABDOCCode", "a.DABDOCCode");
values.Add("DepCode", "a.DepCode");
values.Add("WHCode", "a.WHCode");
values.Add("Sequence", "a.Sequence");
values.Add("InvCode", "a.InvCode");
values.Add("Quantity", "a.Quantity");
values.Add("Amount", "a.Amount");
values.Add("DABDOCType", "a.DABDOCType");
values.Add("Status", "a.Status");
values.Add("CreatePerson", "a.CreatePerson");
values.Add("CreateDateTime", "a.CreateDateTime");
values.Add("DABDOCID", "a.DABDOCID");
values.Add("DABDOCDetailID", "a.DABDOCDetailID");
values.Add("ExtensionID", "c.ID");
//values.Add("ORDERNO", "a.ORDERNO");
//values.Add("WorkPoint", "a.WorkPoint");
//values.Add("cBatch", "a.cBatch");
//values.Add("DepCode", "a.DepCode");
//更新存在数据
sql += ICSHelper.UpdateSQL("b", values)
+ @" #TempPickAssem a
INNER JOIN ICSDisassemblyDoc b ON a.DABDOCDetailID=b.DABDOCDetailID 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("DABDOCQuantity", "0");
//values.Add("HasQuantity", "'0'");
//values.Add("Did", "a.Did");
values.Add("MUSER", "'" + ConstWorkPoint.Muser + "'");
values.Add("MUSERName", "'" + ConstWorkPoint.Musername + "'");
values.Add("MTIME", "a.MTIME");
values.Add("WorkPoint", "'" + WorkPoint + "'");
//插入新增数据
sql += ICSHelper.InsertSQL("ICSDisassemblyDoc", values)
+ @" #TempPickAssem a
LEFT JOIN ICSDisassemblyDoc b ON a.DABDOCDetailID=b.DABDOCDetailID 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 #TempPickAssem ";
sql += " DROP TABLE #TempExtension " +
" DROP TABLE #tableICSDisassemblyDoc";
sql = string.Format(sql, WorkPoint, erpName);
ICSHelper.ExecuteDate(conStr, sql);
#endregion
}
}
catch (Exception ex)
{
log.Error(ex.ToString());
}
}
}
}