195 lines
11 KiB
195 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 ICSPurchaseReceive : 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(A2.ID AS NVARCHAR(50)) AS ERPAutoid,
|
|
A1.Code AS RCVCode,
|
|
CAST(A2.DocLineNo AS NVARCHAR(50)) AS Sequence,
|
|
A2.SrcDoc_SrcDocNo as SourceCode,
|
|
CAST(A2.SrcDoc_SrcDocLineNo AS NVARCHAR(50)) as SourceSequence,
|
|
A2.ItemInfo_ItemCode AS InvCode,
|
|
Case When A2.SplitFlag=2 Then (SELECT ArriveQtyCU FROM {0}.dbo.PM_RcvLine
|
|
WHERE Receivement=A1.ID AND DocLineNo=A2.DocLineNo AND SplitFlag=1)
|
|
ELSE A2.ArriveQtyCU END AS Quantity,
|
|
0 as Amount,
|
|
0 as RCVQuantity,
|
|
A5.Code AS AS WhCode,
|
|
'1' as Status,
|
|
A1.CreatedBy as CreatePerson,
|
|
A2.CreatedOn as CreateDateTime,
|
|
A1.ID as RCVID,
|
|
CAST(A2.ID AS NVARCHAR(50)) as RCVDetailID,
|
|
ISNULL(A2.ModifiedOn ,A2.CreatedOn) AS MTIME,
|
|
isnull(A7.Code,'') ProjectCode,isnull(A2.InvLotCode,'') 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,
|
|
A6.Code as WorkPoint
|
|
INTO #TempPOArrive
|
|
FROM {1}.dbo.PM_Receivement A1
|
|
LEFT JOIN {1}.dbo.PM_RcvLine A2 ON A2.Receivement=A1.ID
|
|
LEFT JOIN {1}.dbo.CBO_Department A3 ON A2.RcvDept=A3.ID
|
|
LEFT JOIN {1}.dbo.CBO_Department_Trl A4 ON A4.ID = A3.ID AND A4.SysMLFlag='zh-CN'
|
|
LEFT JOIN {1}.dbo.CBO_Wh A5 ON A2.Wh=A5.ID
|
|
LEFT JOIN {1}.dbo.Base_Organization A6 ON A1.Org=A6.ID
|
|
LEFT JOIN {1}.dbo.CBO_Project A7 ON A7.ID=A2.Project
|
|
LEFT JOIN {1}.dbo.PM_RcvDocType A8 ON A1.RcvDocType=A8.ID
|
|
WHERE A1.ReceivementType='0' AND A2.Status='3'
|
|
AND (A2.QCQCConclusion=-1 OR A2.QCQCConclusion=0 OR A2.QCQCConclusion=1 OR A2.QCQCConclusion=5
|
|
OR A2.QCQCConclusion=6 OR A2.QCQCConclusion=7 OR A2.QCQCConclusion=12)
|
|
and ISNULL(A2.ModifiedOn ,A2.CreatedOn)>=@LastTime
|
|
|
|
update #TempPOArrive 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 #TempPOArrive
|
|
IF NOT EXISTS(SELECT * FROM #TempPOArrive)
|
|
RETURN";
|
|
sql = ICSHelper.Time(Namespace, Class, WorkPoint, sql, "#TempPOArrive");
|
|
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 ICSPurchaseReceive WHERE RCVDetailID NOT IN (SELECT Autoid FROM {1}.dbo.RdRecords01) AND LEN(RCVDetailID)>0
|
|
|
|
SELECT a.RCVDetailID INTO #tableICSPurchaseReceive
|
|
FROM ICSPurchaseReceive a With(NoLock)
|
|
LEFT JOIN {1}.dbo.[PM_RcvLine] b With(NoLock) ON a.RCVDetailID=b.ID
|
|
WHERE a.WorkPoint='{0}' and b.Autoid IS NULL AND LEN(a.RCVDetailID)>0
|
|
|
|
DELETE ICSPurchaseReceive
|
|
WHERE WorkPoint='{0}' and RCVDetailID IN ( SELECT RCVDetailID from #tableICSPurchaseReceive)
|
|
|
|
";
|
|
Dictionary<string, string> values = new Dictionary<string, string>();
|
|
values.Add("RCVCode", "a.RCVCode");//入库单号
|
|
values.Add("Sequence", "a.Sequence");//入库单行号
|
|
values.Add("SourceCode", "a.SourceCode");//来源单号
|
|
|
|
values.Add("SourceSequence", "a.SourceSequence");//来源单号行号
|
|
values.Add("InvCode", "a.InvCode");//物料编码
|
|
values.Add("Quantity", "ABS(a.Quantity)");//入库数量
|
|
values.Add("Amount", "a.Amount");//辅助数量
|
|
values.Add("WHCode", "a.WHCode");//仓库代码
|
|
values.Add("RCVDetailID", "a.RCVDetailID");
|
|
values.Add("RCVID", "a.RCVID");
|
|
values.Add("CreateDateTime", "a.CreateDateTime");
|
|
values.Add("CreatePerson", "a.CreatePerson");
|
|
values.Add("Status", "a.Status");//状态
|
|
values.Add("ExtensionID", "c.ID");
|
|
values.Add("MTIME", "a.MTIME");
|
|
values.Add("Type", "2");//类型
|
|
//更新存在数据
|
|
sql += ICSHelper.UpdateSQL("b", values)
|
|
+ @" #TempPOArrive a
|
|
INNER JOIN ICSPurchaseReceive b ON a.RCVDetailID=b.RCVDetailID 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("MUSER", "'" + ConstWorkPoint.Muser + "'");
|
|
values.Add("MUSERName", "'" + ConstWorkPoint.Musername + "'");
|
|
values.Add("WorkPoint", "'" + WorkPoint + "'");
|
|
values.Add("ID", "NewID()");
|
|
values.Add("RCVQuantity", "a.RCVQuantity");
|
|
sql += "\r\n";
|
|
//插入新增数据
|
|
sql += ICSHelper.InsertSQL("ICSPurchaseReceive", values)
|
|
+ @" #TempPOArrive a
|
|
LEFT JOIN ICSPurchaseReceive b ON a.RCVDetailID=b.RCVDetailID and a.WorkPoint=b.WorkPoint
|
|
inner join ICSExtension c on a.Colspan=c.Colspan and a.WorkPoint=c.WorkPoint
|
|
WHERE b.RCVDetailID IS NULL and a.WorkPoint='" + WorkPoint + @"' ";
|
|
sql += "DROP TABLE #TempPOArrive";
|
|
sql += " DROP TABLE #TempExtension " +
|
|
"DROP TABLE #tableICSPurchaseReceive";
|
|
sql = string.Format(sql, WorkPoint, erpName);
|
|
ICSHelper.ExecuteDate(conStr, sql);
|
|
#endregion
|
|
}
|
|
}
|
|
catch (Exception ex)
|
|
{
|
|
log.Error(ex.ToString());
|
|
}
|
|
}
|
|
}
|
|
}
|