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

194 lines
11 KiB

  1. using System;
  2. using System.Collections.Generic;
  3. using System.Data;
  4. using System.Linq;
  5. using System.Text;
  6. using Quartz;
  7. namespace ICSSoft.FromERP
  8. {
  9. /// <summary>
  10. /// 调拨单
  11. /// </summary>
  12. public class ICSTransfer : IJob
  13. {
  14. private static object key = new object();
  15. private static log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
  16. public void Execute(IJobExecutionContext context)
  17. {
  18. try
  19. {
  20. lock (key)
  21. {
  22. log.Info("开始……………………………………………………………………");
  23. Execute();
  24. log.Info("结束……………………………………………………………………");
  25. }
  26. }
  27. catch (Exception ex)
  28. {
  29. log.Error(ex.ToString());
  30. }
  31. }
  32. public void Execute()
  33. {
  34. try
  35. {
  36. string conStr = ICSHelper.GetConnectString();
  37. string Namespace = this.GetType().Namespace;
  38. //string Class = this.GetType().Name;
  39. DataTable dt = ICSHelper.GetERPDB(conStr);
  40. foreach (DataRow dr in dt.Rows)
  41. {
  42. string erpName = ICSHelper.GetConfigString()["ERPDB"];
  43. string WorkPoint = dr["WorkPointCode"].ToString();
  44. string Class = this.GetType().Name + WorkPoint;
  45. erpName = string.Format(erpName, WorkPoint);
  46. #region SQL
  47. string sql = @"
  48. SELECT a.cTVCode AS TransferNO,
  49. CAST(b.irowno AS NVARCHAR(50)) AS Sequence,
  50. a.cOWhCode AS FromWarehouseCode,
  51. --d.LocationCode as FromLocationCode,
  52. a.cIWhCode AS ToWarehouseCode,
  53. CASE WHEN ISNULL(a.cVerifyPerson , '')='' THEN '1' ELSE '2' END AS Status,
  54. b.cInvCode AS InvCode,
  55. b.iTVQuantity AS Quantity,
  56. isnull(b.iTVNum,0) as Amount,
  57. CASE WHEN ISNULL(a.cVerifyPerson, '')='' THEN '1' ELSE '2' END AS Type,
  58. a.cTVMemo as Memo,
  59. a.cMaker as CreatePerson,
  60. a.dnmaketime as CreateDateTime,
  61. a.ID as TransferID,
  62. CAST(b.autoID AS NVARCHAR(50)) AS TransferDetailID,
  63. ISNULL(a.dnmodifytime, a.dnmaketime) AS MTIME,
  64. isnull(b.cItemCode,'') ProjectCode,isnull(b.cMoLotCode,'') cBatch,'' version ,'' brand,
  65. (case WHEN inv.bFree1=1 THEN b.cFree1 ELSE '' END) as cFree1,
  66. (case WHEN inv.bFree2=1 THEN b.cFree2 ELSE '' END) as cFree2,
  67. (case WHEN inv.bFree3=1 THEN b.cFree3 ELSE '' END) as cFree3,
  68. (case WHEN inv.bFree4=1 THEN b.cFree4 ELSE '' END) as cFree4,
  69. (case WHEN inv.bFree5=1 THEN b.cFree5 ELSE '' END) as cFree5,
  70. (case WHEN inv.bFree6=1 THEN b.cFree6 ELSE '' END) as cFree6,
  71. (case WHEN inv.bFree7=1 THEN b.cFree7 ELSE '' END) as cFree7,
  72. (case WHEN inv.bFree8=1 THEN b.cFree8 ELSE '' END) as cFree8,
  73. (case WHEN inv.bFree9=1 THEN b.cFree9 ELSE '' END) as cFree9,
  74. (case WHEN inv.bFree10=1 THEN b.cFree10 ELSE '' END) as cFree10,CAST('' AS NVARCHAR(500)) as Colspan
  75. , '{0}' as WorkPoint
  76. INTO #TempTrans
  77. FROM {1}.dbo.TransVouch a
  78. INNER JOIN {1}.dbo.TransVouchs b ON a.cTVCode = b.cTVCode
  79. --inner join ICSWarehouse c on a.cOWhCode= c.WarehouseCode
  80. LEFT JOIN {1}.dbo.Inventory inv ON b.cInvCode = inv.cInvCode
  81. --inner join ICSLocation d on c.ID=d.WHID
  82. WHERE ISNULL(a.dnmodifytime, a.dnmaketime)>=@LastTime
  83. 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,'')
  84. select distinct
  85. Colspan,ProjectCode,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10,WorkPoint,cBatch,version ,brand
  86. INTO #TempExtension
  87. from #TempTrans
  88. IF NOT EXISTS(SELECT * FROM #TempTrans)
  89. RETURN";
  90. sql = ICSHelper.Time(Namespace, Class, WorkPoint, sql, "#TempTrans");
  91. Dictionary<string, string> value = new Dictionary<string, string>();
  92. value.Add("ID", "NEWID()");
  93. value.Add("BatchCode", "a.cBatch");
  94. value.Add("version", "a.version");
  95. value.Add("brand", "a.brand");
  96. value.Add("ProjectCode", "a.ProjectCode");
  97. value.Add("cFree1", "a.cFree1");
  98. value.Add("cFree2", "a.cFree2");
  99. value.Add("cFree3", "a.cFree3");
  100. value.Add("cFree4", "a.cFree4");
  101. value.Add("cFree5", "a.cFree5");
  102. value.Add("cFree6", "a.cFree6");
  103. value.Add("cFree7", "a.cFree7");
  104. value.Add("cFree8", "a.cFree8");
  105. value.Add("cFree9", "a.cFree9");
  106. value.Add("cFree10", "a.cFree10");
  107. value.Add("Colspan", "a.Colspan");
  108. value.Add("MTIME", "GETDATE()");
  109. value.Add("MUSER", "'" + ConstWorkPoint.Muser + "'");
  110. value.Add("MUSERName", "'" + ConstWorkPoint.Musername + "'");
  111. value.Add("WorkPoint", "'" + WorkPoint + "'");
  112. //插入新增数据->ICSExtension表
  113. sql += ICSHelper.InsertSQL("ICSExtension", value)
  114. + @"#TempExtension a
  115. 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
  116. WHERE b.Colspan IS NULL";
  117. sql += @"--删除数据
  118. -- DELETE ICSTransfer where ISNULL(TransferDetailID,'') NOT IN ( SELECT autoID FROM {1}.dbo.TransVouchs )
  119. SELECT ISNULL(a.TransferDetailID,'') TransferDetailID INTO #tableICSTransfer
  120. FROM ICSTransfer a With(NoLock)
  121. LEFT JOIN {1}.dbo.[TransVouchs] b With(NoLock) ON ISNULL(a.TransferDetailID,'')=b.autoID
  122. WHERE a.WorkPoint='{0}' and b.autoID IS NULL
  123. DELETE ICSTransfer
  124. WHERE WorkPoint='{0}' and ISNULL(TransferDetailID,'') IN ( SELECT TransferDetailID from #tableICSTransfer)
  125. ";
  126. sql += "\r\n";
  127. Dictionary<string, string> values = new Dictionary<string, string>();
  128. values.Add("TransferNO", "a.TransferNO");
  129. values.Add("Sequence", "a.Sequence");
  130. values.Add("FromWarehouseCode", "a.FromWarehouseCode");
  131. //values.Add("FromLocationCode", "a.FromLocationCode");
  132. values.Add("ToWarehouseCode", "a.ToWarehouseCode");
  133. values.Add("Status", "a.Status");
  134. values.Add("InvCode", "a.InvCode");
  135. values.Add("Quantity", "a.Quantity");
  136. values.Add("Amount", "a.Amount");
  137. values.Add("Type", "a.Type");
  138. values.Add("Memo", "a.Memo");
  139. values.Add("CreateDateTime", "a.CreateDateTime");
  140. values.Add("CreatePerson", "a.CreatePerson");
  141. values.Add("TransferID", "a.TransferID");
  142. values.Add("TransferDetailID", "a.TransferDetailID");
  143. values.Add("ExtensionID", "c.ID");
  144. values.Add("MUSER", "'" + ConstWorkPoint.Muser + "'");
  145. values.Add("MUSERNAME", "'" + ConstWorkPoint.Musername + "'");
  146. values.Add("WorkPoint", "'" + WorkPoint + "'");
  147. values.Add("MTIME", "a.MTIME");
  148. //更新存在数据
  149. sql += "\r\n";
  150. sql += ICSHelper.UpdateSQL("b", values)
  151. + @" #TempTrans a
  152. INNER JOIN ICSTransfer b ON a.TransferDetailID=b.TransferDetailID and a.WorkPoint=b.WorkPoint
  153. inner join ICSExtension c on a.Colspan=c.Colspan and a.WorkPoint=c.WorkPoint
  154. WHERE a.WorkPoint='" + WorkPoint + "' ";
  155. values.Add("ID", "newid()");
  156. values.Add("TransferQuantity", "0");
  157. //values.Add("EATTRIBUTE3", "a.EATTRIBUTE3");
  158. //插入新增数据
  159. sql += "\r\n";
  160. sql += ICSHelper.InsertSQL("ICSTransfer", values)
  161. + @" #TempTrans a
  162. LEFT JOIN ICSTransfer b ON a.TransferDetailID=b.TransferDetailID and a.WorkPoint=b.WorkPoint
  163. inner join ICSExtension c on a.Colspan=c.Colspan and a.WorkPoint=c.WorkPoint
  164. WHERE b.TransferDetailID IS NULL and a.WorkPoint='" + WorkPoint + @"' ";
  165. sql += "DROP TABLE #TempTrans";
  166. sql += " DROP TABLE #TempExtension " +
  167. " DROP TABLE #tableICSTransfer";
  168. sql = string.Format(sql, WorkPoint, erpName);
  169. ICSHelper.ExecuteDate(conStr, sql);
  170. #endregion
  171. }
  172. }
  173. catch (Exception ex)
  174. {
  175. log.Error(ex.ToString());
  176. }
  177. }
  178. }
  179. }