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

205 lines
12 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 ICSOtherIn : 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 = @"SELECT
  48. CAST(b.AutoID AS NVARCHAR(50)) AS InDetailID,
  49. CAST(a.ID AS NVARCHAR(50)) AS InID,
  50. a.cCode AS InCode,
  51. a.cWhCode AS cWhCode,
  52. c.ID as TransferID,
  53. c.autoID as TransferDetailID,
  54. CAST(b.irowno AS NVARCHAR(50)) AS Sequence,
  55. b.cInvCode AS InvCode,
  56. b.iQuantity AS Quantity,
  57. ISNULL(b.iNum,0) as Amount,
  58. a.cMaker as CreatePerson,
  59. a.dnmaketime as CreateDateTime,
  60. a.dDate AS VoucherDate,
  61. CASE WHEN ISNULL(a.cHandler , '')='' THEN '1' ELSE '2' END AS Status,
  62. ISNULL(b.iFQuantity,0) AS iFQuantity,
  63. ISNULL(b.cBatch,'') AS cBatch,
  64. '入' AS TransType,
  65. ISNULL(a.dnverifytime, a.dnmaketime) AS MTIME,
  66. isnull(b.cItemCode,'') ProjectCode, '' version ,'' brand,
  67. (case WHEN inv.bFree1=1 THEN b.cFree1 ELSE '' END) as cFree1,
  68. (case WHEN inv.bFree2=1 THEN b.cFree2 ELSE '' END) as cFree2,
  69. (case WHEN inv.bFree3=1 THEN b.cFree3 ELSE '' END) as cFree3,
  70. (case WHEN inv.bFree4=1 THEN b.cFree4 ELSE '' END) as cFree4,
  71. (case WHEN inv.bFree5=1 THEN b.cFree5 ELSE '' END) as cFree5,
  72. (case WHEN inv.bFree6=1 THEN b.cFree6 ELSE '' END) as cFree6,
  73. (case WHEN inv.bFree7=1 THEN b.cFree7 ELSE '' END) as cFree7,
  74. (case WHEN inv.bFree8=1 THEN b.cFree8 ELSE '' END) as cFree8,
  75. (case WHEN inv.bFree9=1 THEN b.cFree9 ELSE '' END) as cFree9,
  76. (case WHEN inv.bFree10=1 THEN b.cFree10 ELSE '' END) as cFree10,CAST('' AS NVARCHAR(500)) as Colspan
  77. , '{0}' as WorkPoint
  78. INTO #TempPickIN
  79. FROM {1}.dbo.RdRecord08 a
  80. LEFT JOIN {1}.dbo.rdrecords08 b ON a.ID=b.ID
  81. LEFT JOIN {1}.dbo.TransVouchs c on b.iTrIds =c.autoID
  82. LEFT JOIN {1}.dbo.Inventory inv ON b.cInvCode = inv.cInvCode
  83. WHERE ISNULL(a.cHandler, '')='' AND ISNULL(a.dnverifytime, a.dnmaketime)>=@LastTime
  84. -- UNION ALL
  85. -- SELECT
  86. -- CAST(b.AutoID AS NVARCHAR(50)) AS InDetailID,
  87. -- CAST(a.ID AS NVARCHAR(50)) AS InID,
  88. -- a.cCode AS InCode,
  89. --a.cWhCode AS cWhCode,
  90. -- a.dDate AS VoucherDate,
  91. -- b.cInvCode AS cInvCode,
  92. -- b.iQuantity AS iQuantity,
  93. -- ISNULL(b.iFQuantity,0) AS iFQuantity,
  94. -- ISNULL(b.cBatch,'') AS cBatch,
  95. --'出' AS TransType,
  96. -- CAST(b.irowno AS NVARCHAR(50)) AS irowno,
  97. -- '' AS Status,
  98. -- ISNULL(a.dnverifytime, a.dnmaketime) AS MTIME
  99. -- FROM {1}.dbo.RdRecord09 a
  100. -- LEFT JOIN {1}.dbo.rdrecords09 b ON b.ID=a.ID
  101. -- WHERE ISNULL(a.cHandler, '')='' AND ISNULL(a.dnverifytime, a.dnmaketime)>=@LastTime
  102. update #TempPickIN 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,'')
  103. select distinct
  104. Colspan,ProjectCode,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10,WorkPoint,cBatch,version ,brand
  105. INTO #TempExtension
  106. from #TempPickIN
  107. IF NOT EXISTS(SELECT * FROM #TempPickIN)
  108. RETURN";
  109. sql = ICSHelper.Time(Namespace, Class, WorkPoint, sql, "#TempPickIN");
  110. Dictionary<string, string> value = new Dictionary<string, string>();
  111. value.Add("ID", "NEWID()");
  112. value.Add("BatchCode", "a.cBatch");
  113. value.Add("version", "a.version");
  114. value.Add("brand", "a.brand");
  115. value.Add("ProjectCode", "a.ProjectCode");
  116. value.Add("cFree1", "a.cFree1");
  117. value.Add("cFree2", "a.cFree2");
  118. value.Add("cFree3", "a.cFree3");
  119. value.Add("cFree4", "a.cFree4");
  120. value.Add("cFree5", "a.cFree5");
  121. value.Add("cFree6", "a.cFree6");
  122. value.Add("cFree7", "a.cFree7");
  123. value.Add("cFree8", "a.cFree8");
  124. value.Add("cFree9", "a.cFree9");
  125. value.Add("cFree10", "a.cFree10");
  126. value.Add("Colspan", "a.Colspan");
  127. value.Add("MTIME", "GETDATE()");
  128. value.Add("MUSER", "'" + ConstWorkPoint.Muser + "'");
  129. value.Add("MUSERName", "'" + ConstWorkPoint.Musername + "'");
  130. value.Add("WorkPoint", "'" + WorkPoint + "'");
  131. //插入新增数据->ICSExtension表
  132. sql += ICSHelper.InsertSQL("ICSExtension", value)
  133. + @"#TempExtension a
  134. 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
  135. WHERE b.Colspan IS NULL";
  136. sql += @"--删除数据
  137. --DELETE ICSOtherIn WHERE InDetailID NOT IN (SELECT AutoID FROM {1}.dbo.rdrecords08)
  138. SELECT a.InDetailID INTO #tableICSOtherIn
  139. FROM ICSOtherIn a With(NoLock)
  140. LEFT JOIN {1}.dbo.[rdrecords08] b With(NoLock) ON a.InDetailID= b.AutoID
  141. WHERE a.WorkPoint='{0}' and b.AutoID IS NULL
  142. DELETE ICSOtherIn
  143. WHERE WorkPoint='{0}' and InDetailID IN ( SELECT InDetailID from #tableICSOtherIn)
  144. ";
  145. Dictionary<string, string> values = new Dictionary<string, string>();
  146. values.Add("InCode", "a.InCode");
  147. values.Add("WHCode", "a.cWhCode");
  148. values.Add("Sequence", "a.Sequence");
  149. values.Add("InvCode", "a.InvCode");
  150. values.Add("Quantity", "a.Quantity");
  151. values.Add("Amount", "a.Amount");
  152. values.Add("Status", "a.Status");
  153. values.Add("CreatePerson", "a.CreatePerson");
  154. values.Add("CreateDateTime", "a.CreateDateTime");
  155. values.Add("InID", "a.InID");
  156. values.Add("InDetailID", "a.InDetailID");
  157. values.Add("TransferID", "a.TransferID");
  158. values.Add("TransferDetailID", "a.TransferDetailID");
  159. values.Add("ExtensionID", "c.ID");
  160. values.Add("MUSER", "'" + ConstWorkPoint.Muser + "'");
  161. values.Add("MUSERName", "'" + ConstWorkPoint.Musername + "'");
  162. values.Add("WorkPoint", "'" + WorkPoint + "'");
  163. values.Add("MTIME", "a.MTIME");
  164. //更新存在数据
  165. sql += ICSHelper.UpdateSQL("b", values)
  166. + @" #TempPickIN a
  167. INNER JOIN ICSOtherIn b ON a.InDetailID+a.TransType=b.InDetailID+a.TransType and a.WorkPoint=b.WorkPoint
  168. inner join ICSExtension c on a.Colspan=c.Colspan and a.WorkPoint=c.WorkPoint
  169. WHERE a.WorkPoint='" + WorkPoint + "' ";
  170. values.Add("ID", "NEWID()");
  171. values.Add("InQuantity", "0");
  172. //插入新增数据
  173. sql += ICSHelper.InsertSQL("ICSOtherIn", values)
  174. + @" #TempPickIN a
  175. LEFT JOIN ICSOtherIn b ON a.InDetailID+a.TransType=b.InDetailID+a.TransType and a.WorkPoint=b.WorkPoint
  176. inner join ICSExtension c on a.Colspan=c.Colspan and a.WorkPoint=c.WorkPoint
  177. WHERE b.ID IS NULL and a.WorkPoint='" + WorkPoint + @"'
  178. ";
  179. sql += "DROP TABLE #TempPickIN";
  180. sql += " DROP TABLE #TempExtension " +
  181. " DROP TABLE #tableICSOtherIn";
  182. sql = string.Format(sql, WorkPoint, erpName);
  183. ICSHelper.ExecuteDate(conStr, sql);
  184. #endregion
  185. }
  186. }
  187. catch (Exception ex)
  188. {
  189. log.Error(ex.ToString());
  190. }
  191. }
  192. }
  193. }