纽威
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.
 
 
 
 
 

192 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 ICSTransferSQ : 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.cTVCode AS TransferNO,
CAST(b.irowno AS NVARCHAR(50)) AS Sequence,
a.cOWhCode AS FromWarehouseCode,
--d.LocationCode as FromLocationCode,
a.cIWhCode AS ToWarehouseCode,
CASE WHEN ISNULL(a.cVerifyPerson , '')='' THEN '1' ELSE '2' END AS Status,
b.cInvCode AS InvCode,
b.iTVQuantity AS Quantity,
isnull(b.iTVNum,0) as Amount,
CASE WHEN ISNULL(a.cVerifyPerson, '')='' THEN '1' ELSE '2' END AS Type,
a.cTVMemo as Memo,
a.cMaker as CreatePerson,
a.dnmaketime as CreateDateTime,
a.ID as TransferID,
CAST(b.autoID AS NVARCHAR(50)) AS TransferDetailID,
ISNULL(a.dnmodifytime, a.dnmaketime) AS MTIME,
isnull(b.cItemCode,'') ProjectCode,isnull(b.cMoLotCode,'') cBatch,'' version ,'' brand,
(case WHEN inv.bFree1=1 THEN isnull(b.cFree1,'') ELSE '' END) as cFree1,
(case WHEN inv.bFree2=1 THEN isnull(b.cFree2,'') ELSE '' END) as cFree2,
(case WHEN inv.bFree3=1 THEN isnull(b.cFree3,'') ELSE '' END) as cFree3,
(case WHEN inv.bFree4=1 THEN isnull(b.cFree4,'') ELSE '' END) as cFree4,
(case WHEN inv.bFree5=1 THEN isnull(b.cFree5,'') ELSE '' END) as cFree5,
(case WHEN inv.bFree6=1 THEN isnull(b.cFree6,'') ELSE '' END) as cFree6,
(case WHEN inv.bFree7=1 THEN isnull(b.cFree7,'') ELSE '' END) as cFree7,
(case WHEN inv.bFree8=1 THEN isnull(b.cFree8,'') ELSE '' END) as cFree8,
(case WHEN inv.bFree9=1 THEN isnull(b.cFree9,'') ELSE '' END) as cFree9,
(case WHEN inv.bFree10=1 THEN isnull(b.cFree10,'') ELSE '' END) as cFree10,CAST('' AS NVARCHAR(500)) as Colspan
, '{0}' as WorkPoint
INTO #TempTrans
FROM {1}.dbo.ST_AppTransVouch a
INNER JOIN {1}.dbo.ST_AppTransVouchs b ON a.cTVCode = b.cTVCode
LEFT JOIN {1}.dbo.Inventory inv ON b.cInvCode = inv.cInvCode
WHERE ISNULL(a.dnmodifytime, a.dnmaketime)>=@LastTime
update #TempTrans 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 #TempTrans
IF NOT EXISTS(SELECT * FROM #TempTrans)
RETURN";
sql = ICSHelper.Time(Namespace, Class, WorkPoint, sql, "#TempTrans");
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 ICSTransferApplication where ISNULL(TransferDetailID,'') NOT IN ( SELECT autoID FROM {1}.dbo.ST_AppTransVouchs )
SELECT ISNULL(a.TransferDetailID,'') TransferDetailID INTO #tableICSTransfer
FROM ICSTransferApplication a With(NoLock)
LEFT JOIN {1}.dbo.[ST_AppTransVouchs] b With(NoLock) ON ISNULL(a.TransferDetailID,'')=b.autoID
WHERE a.WorkPoint='{0}' and b.autoID IS NULL
DELETE ICSTransferApplication
WHERE WorkPoint='{0}' and ISNULL(TransferDetailID,'') IN ( SELECT TransferDetailID from #tableICSTransfer)
";
sql += "\r\n";
Dictionary<string, string> values = new Dictionary<string, string>();
values.Add("TransferNO", "a.TransferNO");
values.Add("Sequence", "a.Sequence");
values.Add("FromWarehouseCode", "a.FromWarehouseCode");
//values.Add("FromLocationCode", "a.FromLocationCode");
values.Add("ToWarehouseCode", "a.ToWarehouseCode");
values.Add("Status", "a.Status");
values.Add("InvCode", "a.InvCode");
values.Add("Quantity", "a.Quantity");
values.Add("Amount", "a.Amount");
values.Add("Type", "a.Type");
values.Add("Memo", "a.Memo");
values.Add("CreateDateTime", "a.CreateDateTime");
values.Add("CreatePerson", "a.CreatePerson");
values.Add("TransferID", "a.TransferID");
values.Add("TransferDetailID", "a.TransferDetailID");
values.Add("ExtensionID", "c.ID");
values.Add("MUSER", "'" + ConstWorkPoint.Muser + "'");
values.Add("MUSERNAME", "'" + ConstWorkPoint.Musername + "'");
values.Add("WorkPoint", "'" + WorkPoint + "'");
values.Add("MTIME", "a.MTIME");
//更新存在数据
sql += "\r\n";
sql += ICSHelper.UpdateSQL("b", values)
+ @" #TempTrans a
INNER JOIN ICSTransferApplication b ON a.TransferDetailID=b.TransferDetailID 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("TransferQuantity", "0");
//values.Add("EATTRIBUTE3", "a.EATTRIBUTE3");
//插入新增数据
sql += "\r\n";
sql += ICSHelper.InsertSQL("ICSTransferApplication", values)
+ @" #TempTrans a
LEFT JOIN ICSTransferApplication b ON a.TransferDetailID=b.TransferDetailID and a.WorkPoint=b.WorkPoint
inner join ICSExtension c on a.Colspan=c.Colspan and a.WorkPoint=c.WorkPoint
WHERE b.TransferDetailID IS NULL and a.WorkPoint='" + WorkPoint + @"' ";
sql += "DROP TABLE #TempTrans";
sql += " DROP TABLE #TempExtension " +
" DROP TABLE #tableICSTransfer";
sql = string.Format(sql, WorkPoint, erpName);
ICSHelper.ExecuteDate(conStr, sql);
#endregion
}
}
catch (Exception ex)
{
log.Error(ex.ToString());
}
}
}
}