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

3963 lines
214 KiB

3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
2 years ago
3 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
3 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
2 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
2 years ago
3 years ago
2 years ago
3 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
2 years ago
3 years ago
2 years ago
3 years ago
2 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
2 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
2 years ago
3 years ago
3 years ago
3 years ago
2 years ago
3 years ago
3 years ago
2 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
3 years ago
2 years ago
3 years ago
3 years ago
3 years ago
2 years ago
3 years ago
2 years ago
3 years ago
3 years ago
3 years ago
2 years ago
3 years ago
2 years ago
3 years ago
3 years ago
2 years ago
3 years ago
2 years ago
3 years ago
3 years ago
3 years ago
2 years ago
3 years ago
2 years ago
3 years ago
3 years ago
2 years ago
3 years ago
2 years ago
3 years ago
3 years ago
2 years ago
3 years ago
2 years ago
3 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
2 years ago
3 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
3 years ago
3 years ago
3 years ago
3 years ago
2 years ago
2 years ago
2 years ago
2 years ago
2 years ago
3 years ago
  1. using NFine.Data.Extensions;
  2. using System;
  3. using System.Collections.Generic;
  4. using System.Data;
  5. using System.Linq;
  6. using System.Text;
  7. using System.Threading.Tasks;
  8. using NFine.Code;
  9. using NFine.Repository;
  10. using System.Data.Common;
  11. using NFine.Domain._03_Entity.SRM;
  12. using ICS.Application.Entity;
  13. using Newtonsoft.Json;
  14. using System.Configuration;
  15. using System.Data.SqlClient;
  16. using ICS.Data;
  17. using NFine.Domain._03_Entity.WMS;
  18. namespace NFine.Application.WMS
  19. {
  20. public class PickMaterialApp : RepositoryFactory<ICSVendor>
  21. {
  22. public static DataTable Invmes = new DataTable();
  23. //工单备料(工单子件)
  24. public DataTable GetGridJson(string queryJson, ref Pagination jqgridparam)
  25. {
  26. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  27. DataTable dt = new DataTable();
  28. var queryParam = queryJson.ToJObject();
  29. List<DbParameter> parameter = new List<DbParameter>();
  30. StringBuilder sqlstring = new StringBuilder();
  31. #region [SQL]
  32. // sql = @"select a.ID,b.MOCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,c.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  33. //case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  34. //from ICSMOPick a
  35. //left join ICSMO b on a.MODetailID=b.MODetailID and a.WorkPoint=b.WorkPoint
  36. //left join ICSWarehouse c on a.WHCode=c.WarehouseCode and a.WorkPoint=c.WorkPoint
  37. //left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  38. //left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint";
  39. // sql += " WHERE 1=1 and e.ID is null";
  40. sqlstring.Append($@"select a.MOCode as Code,a.CreateDateTime as MTIME,a.createperson as MUSER,
  41. case when max(d.SourceID) is null then '' else '' end as IsNew,
  42. f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,
  43. f.cFree2 ,f.cFree3 ,f.cFree4 ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10
  44. from ICSMO a
  45. inner join ICSMOPick b on b.MODetailID=a.MODetailID and b.WorkPoint=a.WorkPoint
  46. left join ICSMOPickMerge d on d.SourceID=b.ID and d.WorkPoint=b.WorkPoint
  47. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  48. where a.WorkPoint='{WorkPoint}' ");
  49. if (!string.IsNullOrWhiteSpace(queryJson))
  50. {
  51. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  52. {
  53. sqlstring.Append($" and a.MOCode like '%{queryParam["POCode"]}%' ");
  54. }
  55. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  56. {
  57. sqlstring.Append($" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  58. }
  59. }
  60. sqlstring.Append(@" group by a.MOCode, a.WorkPoint,a.CreateDateTime,a.createperson,f.Colspan,f.ProjectCode,
  61. f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4,
  62. f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10");
  63. #endregion
  64. return Repository().FindTablePageBySql(sqlstring.ToString(), parameter.ToArray(), ref jqgridparam);
  65. }
  66. //工单备料(工单子件)子表查询
  67. public DataTable GetSubGridJson1(string Code)
  68. {
  69. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  70. DataTable dt = new DataTable();
  71. //var queryParam = queryJson.ToJObject();
  72. List<DbParameter> parameter = new List<DbParameter>();
  73. string sql = @" select a.ID,b.MOCode as Code,a.Sequence+'-'+b.Sequence AS Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,c.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  74. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity
  75. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  76. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.IssueQuantity as IssueQuantity
  77. from ICSMOPick a
  78. left join ICSMO b on a.MODetailID=b.MODetailID and a.WorkPoint=b.WorkPoint
  79. left join ICSWarehouse c on a.WHCode=c.WarehouseCode and a.WorkPoint=c.WorkPoint
  80. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  81. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  82. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  83. where b.MOCode='{0}' and a.WorkPoint='{1}'";
  84. sql = string.Format(sql, Code, WorkPoint);
  85. return Repository().FindTableBySql(sql.ToString());
  86. }
  87. //工单领料(发料申请)
  88. public DataTable GetGridJson2(string queryJson, ref Pagination jqgridparam)
  89. {
  90. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  91. DataTable dt = new DataTable();
  92. var queryParam = queryJson.ToJObject();
  93. List<DbParameter> parameter = new List<DbParameter>();
  94. StringBuilder sqlString = new StringBuilder();
  95. #region [SQL]
  96. // select a.ID,a.ApplyCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName ,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  97. //case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  98. // from ICSMOApply a
  99. // left join ICSWarehouse b on a.WHCode = b.WarehouseCode and a.WorkPoint = b.WorkPoint
  100. // left join ICSInventory d on a.InvCode = d.InvCode and a.WorkPoint = d.WorkPoint
  101. // left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
  102. sqlString.Append($@"
  103. SELECT * from(select row_number() over(partition by a.ApplyCode ORDER BY a.ApplyCode) as row,
  104. a.ApplyCode as Code,CONVERT(varchar(100),a.CreateDateTime,23) as MTIME,a.createperson as MUSER,a.WHCode,detail.LocationCode AS Area,
  105. a.EATTRIBUTE,a.Sets,a.OrderInvCode,a.OrderInvDescribe,a.BillType,a.Remarks,a.Desks,a.DispatchNumber,a.DispatcherName,
  106. a.ReceiverNumber,a.ReceiverName,a.Urgency,a.NeedDate,a.NeedTime,a.RemarksTerm,a.TextNumber,a.Unit,a.StockIndicator,
  107. case when max(e.SourceID) is null then '' else '' end as IsNew,f.Colspan ,
  108. g.Status, ISNULL(p.PrintCount, 0) as PrintCount,
  109. case when max(k.TransCode) is null then '' else '' end as IsOccupy,
  110. --case when sum(a.Quantity) =sum(IssueQuantity) and a.MUSERName != 'JOB' then ''
  111. --else (case when sum(a.Quantity) =sum(IssueQuantity) and a.MUSERName = 'JOB' then '' else '' end) end as Status,
  112. f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,
  113. f.cFree4 ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,
  114. case when a.MUSER!= 'JOB' then a.MUSER else '' end AS PickName
  115. from ICSMOApply a
  116. left JOIN ICSInventory b ON b.InvCode=a.InvCode
  117. LEFT JOIN ICSPrintCount p ON a.APPlyCode=p.TransCode
  118. LEFT JOIN ICSInventoryDetail detail ON b.InvCode=detail.INVCode AND a.WHCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  119. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  120. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  121. left join (SELECT ApplyCode,
  122. case when sum(Quantity) =sum(IssueQuantity) and MUSERName != 'JOB' then ''
  123. else (case when sum(Quantity) =sum(IssueQuantity) and MUSERName = 'JOB' AND sum(IssueQuantity)>0 then ''
  124. else '' end) end as Status
  125. from ICSMOApply where WorkPoint='{WorkPoint}' and EATTRIBUTE!='17' group by ApplyCode,MUSERName) g on a.ApplyCode = g.ApplyCode
  126. left join (select distinct TransCode,TransType,WorkPoint from dbo.ICSWareHouseLotInfoLog ) k on a.ApplyCode=k.TransCode and a.WorkPoint=k.WorkPoint and k.TransType='15'
  127. where a.WorkPoint='{WorkPoint}' and a.EATTRIBUTE!='17'");
  128. if (!string.IsNullOrWhiteSpace(queryJson))
  129. {
  130. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  131. {
  132. sqlString.Append($@" and a.ApplyCode like '%{queryParam["POCode"]}%' ");
  133. }
  134. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  135. {
  136. sqlString.Append($@" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  137. }
  138. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  139. {
  140. sqlString.Append($@" and a.WHCode like '%{queryParam["WHCode"]}%' ");
  141. }
  142. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  143. {
  144. sqlString.Append($@" and detail.LocationCode like '%{queryParam["Area"]}%' ");
  145. }
  146. if (!string.IsNullOrWhiteSpace(queryParam["Order"].ToString()))
  147. {
  148. sqlString.Append($@" and a.OrderNumber like '%{queryParam["Order"]}%' ");
  149. }
  150. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  151. {
  152. sqlString.Append($@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  153. WHERE
  154. F_Define3='HGAreaConfig' AND F_Define1=a.WHCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ");
  155. }
  156. if (!string.IsNullOrWhiteSpace(queryParam["CreateDate"].ToString()))
  157. {
  158. sqlString.Append($@" and a.CreateDateTime >='{queryParam["CreateDate"].ToDate()}' and a.CreateDateTime <'{queryParam["CreateDate"].ToDate().AddDays(+1)}' ");
  159. }
  160. if (!string.IsNullOrWhiteSpace(queryParam["NeedDate"].ToString()))
  161. {
  162. sqlString.Append($@" and a.NeedDate like '%{queryParam["NeedDate"]}%' ");
  163. }
  164. }
  165. sqlString.Append(@"group by a.ApplyCode, a.WorkPoint,a.CreateDateTime,a.createperson,
  166. f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,f.cFree2,
  167. f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10,g.Status,
  168. a.WHCode,detail.LocationCode,a.EATTRIBUTE,a.Sets,a.OrderInvCode,a.OrderInvDescribe,a.BillType,a.Remarks,a.Desks,a.DispatchNumber,a.DispatcherName,
  169. a.ReceiverNumber,a.ReceiverName,a.Urgency,a.NeedDate,a.NeedTime,a.RemarksTerm,a.TextNumber,a.Unit,a.StockIndicator,a.MUSERName,a.MUSER,p.PrintCount) as t where t.row=1");
  170. if (!string.IsNullOrWhiteSpace(queryParam["Status"].ToString()))
  171. {
  172. if (queryParam["Status"].ToString() == "3")
  173. {
  174. sqlString.Append($@" AND t.Status='已过账' ");
  175. }
  176. else if (queryParam["Status"].ToString() == "2")
  177. {
  178. sqlString.Append($@" AND t.Status='已配料' ");
  179. }
  180. else if (queryParam["Status"].ToString() == "1")
  181. {
  182. sqlString.Append($@" AND t.Status='未配料' ");
  183. }
  184. }
  185. #endregion
  186. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  187. }
  188. //工单领料(发料申请)子表查询
  189. public DataTable GetSubGridJson2(string queryJson, string Code, ref Pagination jqgridparam)
  190. {
  191. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  192. DataTable dt = new DataTable();
  193. var queryParam = queryJson.ToJObject();
  194. List<DbParameter> parameter = new List<DbParameter>();
  195. string sql = @"SELECT * FROM (select row_number() over(partition by a.ApplyCode,a.InvCode,a.Sequence ORDER BY a.ApplyCode) as row,
  196. a.ID,a.ApplyCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName ,a.InvCode,a.OrderNumber,
  197. a.EATTRIBUTE,a.Sets,a.OrderInvCode,a.OrderInvDescribe,a.BillType,a.Remarks,a.Desks,a.DispatchNumber,a.DispatcherName,
  198. a.ReceiverNumber,a.ReceiverName,a.Urgency,a.NeedDate,a.NeedTime,a.RemarksTerm,a.TextNumber,a.InvDescribe,a.Unit,a.StockIndicator,
  199. d.InvName,d.InvDesc,d.InvStd,d.InvUnit,detail.LocationCode AS Area,a.SAPSequence,
  200. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity
  201. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  202. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.IssueQuantity as IssueQuantity
  203. from ICSMOApply a
  204. left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  205. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  206. LEFT JOIN ICSInventoryDetail detail ON d.InvCode=detail.INVCode AND a.WHCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  207. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  208. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  209. where a.ApplyCode='{0}' and a.WorkPoint='{1}' and a.EATTRIBUTE!='17'";
  210. if (!string.IsNullOrWhiteSpace(queryJson))
  211. {
  212. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  213. {
  214. sql += " and a.WHCode like '%" + queryParam["WHCode"].ToString() + "%' ";
  215. }
  216. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  217. {
  218. sql += " and detail.LocationCode like '%" + queryParam["Area"].ToString() + "%' ";
  219. }
  220. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  221. {
  222. sql += " and a.InvCode like '%" + queryParam["InvCode"].ToString() + "%' ";
  223. }
  224. if (!string.IsNullOrWhiteSpace(queryParam["Order"].ToString()))
  225. {
  226. sql += $@" and a.OrderNumber like '%{queryParam["Order"]}%' ";
  227. }
  228. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  229. {
  230. sql += $@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  231. WHERE
  232. F_Define3='HGAreaConfig' AND F_Define1=a.WHCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ";
  233. }
  234. if (!string.IsNullOrWhiteSpace(queryParam["CreateDate"].ToString()))
  235. {
  236. sql += $@" and a.CreateDateTime >='{queryParam["CreateDate"].ToDate()}' and a.CreateDateTime <'{queryParam["CreateDate"].ToDate().AddDays(+1)}' ";
  237. }
  238. if (!string.IsNullOrWhiteSpace(queryParam["NeedDate"].ToString()))
  239. {
  240. sql += $@" and a.NeedDate like '%{queryParam["NeedDate"]}%' ";
  241. }
  242. }
  243. sql += " ) c WHERE c.row=1 ";
  244. sql = string.Format(sql, Code, WorkPoint);
  245. //return Repository().FindTableBySql(sql.ToString());
  246. return Repository().FindTablePageBySql(sql.ToString(), parameter.ToArray(), ref jqgridparam);
  247. }
  248. //售后领料
  249. public DataTable GetGridJson12(string queryJson, ref Pagination jqgridparam)
  250. {
  251. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  252. DataTable dt = new DataTable();
  253. var queryParam = queryJson.ToJObject();
  254. List<DbParameter> parameter = new List<DbParameter>();
  255. StringBuilder sqlString = new StringBuilder();
  256. #region [SQL]
  257. // select a.ID,a.ApplyCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName ,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  258. //case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  259. // from ICSMOApply a
  260. // left join ICSWarehouse b on a.WHCode = b.WarehouseCode and a.WorkPoint = b.WorkPoint
  261. // left join ICSInventory d on a.InvCode = d.InvCode and a.WorkPoint = d.WorkPoint
  262. // left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
  263. sqlString.Append($@"
  264. SELECT * from(select row_number() over(partition by a.ApplyCode ORDER BY a.ApplyCode) as row,
  265. a.ApplyCode as Code,CONVERT(varchar(100),a.CreateDateTime,23) as MTIME,a.createperson as MUSER,a.WHCode,detail.LocationCode AS Area,
  266. a.EATTRIBUTE,a.Sets,a.OrderInvCode,a.OrderInvDescribe,a.BillType,a.Remarks,a.Desks,a.DispatchNumber,a.DispatcherName,
  267. a.ReceiverNumber,a.ReceiverName,a.Urgency,a.NeedDate,a.NeedTime,a.RemarksTerm,a.TextNumber,a.Unit,a.StockIndicator,
  268. case when max(e.SourceID) is null then '' else '' end as IsNew,f.Colspan,a.CustomerName,a.Pagination,
  269. g.Status,ISNULL(p.PrintCount, 0) as PrintCount,
  270. case when max(k.TransCode) is null then '' else '' end as IsOccupy,
  271. f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,
  272. f.cFree4 ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,
  273. case when a.MUSER!= 'JOB' then a.MUSER else '' end AS PickName
  274. from ICSMOApply a
  275. left JOIN ICSInventory b ON b.InvCode=a.InvCode
  276. LEFT JOIN ICSPrintCount p ON a.APPlyCode=p.TransCode
  277. LEFT JOIN ICSInventoryDetail detail ON b.InvCode=detail.INVCode AND a.WHCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  278. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  279. left join (SELECT ApplyCode,
  280. case when sum(Quantity) =sum(IssueQuantity) and MUSERName != 'JOB' then ''
  281. else (case when sum(Quantity) =sum(IssueQuantity) and MUSERName = 'JOB'AND sum(IssueQuantity)>0 then ''
  282. else '' end) end as Status
  283. from ICSMOApply where WorkPoint='{WorkPoint}' and EATTRIBUTE='17' group by ApplyCode,MUSERName) g on a.ApplyCode = g.ApplyCode
  284. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  285. left join (select distinct TransCode,TransType,WorkPoint from dbo.ICSWareHouseLotInfoLog ) k on a.ApplyCode=k.TransCode and a.WorkPoint=k.WorkPoint and k.TransType='15'
  286. where a.WorkPoint='{WorkPoint}' and a.EATTRIBUTE='17' ");
  287. if (!string.IsNullOrWhiteSpace(queryJson))
  288. {
  289. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  290. {
  291. sqlString.Append($@" and a.ApplyCode like '%{queryParam["POCode"]}%' ");
  292. }
  293. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  294. {
  295. sqlString.Append($@" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  296. }
  297. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  298. {
  299. sqlString.Append($@" and a.WHCode like '%{queryParam["WHCode"]}%' ");
  300. }
  301. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  302. {
  303. sqlString.Append($@" and detail.LocationCode like '%{queryParam["Area"]}%' ");
  304. }
  305. if (!string.IsNullOrWhiteSpace(queryParam["Order"].ToString()))
  306. {
  307. sqlString.Append($@" and a.OrderNumber like '%{queryParam["Order"]}%' ");
  308. }
  309. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  310. {
  311. sqlString.Append($@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  312. WHERE
  313. F_Define3='HGAreaConfig' AND F_Define1=a.WHCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ");
  314. }
  315. if (!string.IsNullOrWhiteSpace(queryParam["CreateDate"].ToString()))
  316. {
  317. sqlString.Append($@" and a.CreateDateTime >='{queryParam["CreateDate"].ToDate()}' and a.CreateDateTime <'{queryParam["CreateDate"].ToDate().AddDays(+1)}' ");
  318. }
  319. if (!string.IsNullOrWhiteSpace(queryParam["NeedDate"].ToString()))
  320. {
  321. sqlString.Append($@" and a.NeedDate like '%{queryParam["NeedDate"]}%' ");
  322. }
  323. }
  324. sqlString.Append(@"group by a.ApplyCode, a.WorkPoint,a.CreateDateTime,a.createperson,
  325. f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,f.cFree2,
  326. f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10,g.Status,
  327. a.WHCode,detail.LocationCode,a.EATTRIBUTE,a.Sets,a.OrderInvCode,a.OrderInvDescribe,a.BillType,a.Remarks,a.Desks,a.DispatchNumber,a.DispatcherName,
  328. a.ReceiverNumber,a.ReceiverName,a.Urgency,a.NeedDate,a.NeedTime,a.RemarksTerm,a.TextNumber,a.Unit,a.StockIndicator,a.MUSERName,a.MUSER,p.PrintCount,a.CustomerName,a.Pagination) as t where t.row=1");
  329. if (!string.IsNullOrWhiteSpace(queryParam["Status"].ToString()))
  330. {
  331. if (queryParam["Status"].ToString() == "3")
  332. {
  333. sqlString.Append($@" AND t.Status='已过账' ");
  334. }
  335. else if (queryParam["Status"].ToString() == "2")
  336. {
  337. sqlString.Append($@" AND t.Status='已配料' ");
  338. }
  339. else if (queryParam["Status"].ToString() == "1")
  340. {
  341. sqlString.Append($@" AND t.Status='未配料' ");
  342. }
  343. }
  344. #endregion
  345. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  346. }
  347. //售后领料(子表查询)
  348. public DataTable GetSubGridJson12(string queryJson, string Code)
  349. {
  350. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  351. DataTable dt = new DataTable();
  352. var queryParam = queryJson.ToJObject();
  353. List<DbParameter> parameter = new List<DbParameter>();
  354. string sql = @"SELECT * FROM (select row_number() over(partition by a.ApplyCode,a.InvCode,a.Sequence ORDER BY a.ApplyCode) as row,
  355. a.ID,a.ApplyCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName ,a.InvCode,a.OrderNumber,
  356. a.EATTRIBUTE,a.Sets,a.OrderInvCode,a.OrderInvDescribe,a.BillType,a.Remarks,a.Desks,a.DispatchNumber,a.DispatcherName,
  357. a.ReceiverNumber,a.ReceiverName,a.Urgency,a.NeedDate,a.NeedTime,a.RemarksTerm,a.TextNumber,a.InvDescribe,a.Unit,a.StockIndicator,
  358. d.InvName,d.InvDesc,d.InvStd,d.InvUnit,detail.LocationCode AS Area,a.SAPSequence,
  359. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity
  360. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  361. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.IssueQuantity as IssueQuantity
  362. from ICSMOApply a
  363. left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  364. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  365. LEFT JOIN ICSInventoryDetail detail ON d.InvCode=detail.INVCode AND a.WHCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  366. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  367. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  368. where a.ApplyCode='{0}' and a.WorkPoint='{1}' and a.EATTRIBUTE='17'";
  369. if (!string.IsNullOrWhiteSpace(queryJson))
  370. {
  371. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  372. {
  373. sql += " and a.WHCode like '%" + queryParam["WHCode"].ToString() + "%' ";
  374. }
  375. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  376. {
  377. sql += " and detail.LocationCode like '%" + queryParam["Area"].ToString() + "%' ";
  378. }
  379. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  380. {
  381. sql += " and a.InvCode like '%" + queryParam["InvCode"].ToString() + "%' ";
  382. }
  383. if (!string.IsNullOrWhiteSpace(queryParam["Order"].ToString()))
  384. {
  385. sql += $@" and a.OrderNumber like '%{queryParam["Order"]}%' ";
  386. }
  387. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  388. {
  389. sql += $@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  390. WHERE
  391. F_Define3='HGAreaConfig' AND F_Define1=a.WHCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ";
  392. }
  393. if (!string.IsNullOrWhiteSpace(queryParam["CreateDate"].ToString()))
  394. {
  395. sql += $@" and a.CreateDateTime like '%{queryParam["CreateDate"]}%' ";
  396. }
  397. if (!string.IsNullOrWhiteSpace(queryParam["NeedDate"].ToString()))
  398. {
  399. sql += $@" and a.NeedDate like '%{queryParam["NeedDate"]}%' ";
  400. }
  401. }
  402. sql += " ) c WHERE c.row=1 ";
  403. sql = string.Format(sql, Code, WorkPoint);
  404. return Repository().FindTableBySql(sql.ToString());
  405. }
  406. //工单材料出库(材料出库)
  407. public DataTable GetGridJson3(string queryJson, ref Pagination jqgridparam)
  408. {
  409. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  410. DataTable dt = new DataTable();
  411. var queryParam = queryJson.ToJObject();
  412. List<DbParameter> parameter = new List<DbParameter>();
  413. StringBuilder sqlString = new StringBuilder();
  414. #region [SQL]
  415. // sql = @"select a.ID,a.IssueCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode ,b.WarehouseName ,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  416. // case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  417. // from ICSMOIssue a
  418. //left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  419. //left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  420. //left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint ";
  421. // sql += " WHERE 1=1 and e.ID is null";
  422. sqlString.Append($@"SELECT * FROM(SELECT row_number ( ) OVER ( partition BY a.IssueCode ORDER BY a.IssueCode ) AS row,
  423. a.IssueCode as Code,a.CreateDateTime as MTIME,a.createperson as MUSER,
  424. case when max(e.SourceID) is null then '' else ''
  425. end as IsNew,f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,f.cFree2,
  426. f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10
  427. from ICSMOIssue a
  428. left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
  429. left join ICSExtension f on a.ExtensionID = f.ID and a.WorkPoint = f.WorkPoint
  430. where a.WorkPoint = '{WorkPoint}' ");
  431. if (!string.IsNullOrWhiteSpace(queryJson))
  432. {
  433. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  434. {
  435. sqlString.Append($@" and a.IssueCode like '%{queryParam["POCode"]}%' ");
  436. }
  437. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  438. {
  439. sqlString.Append($@" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  440. }
  441. }
  442. sqlString.Append(@"group by a.IssueCode,a.CreateDateTime,a.createperson,f.Colspan,f.ProjectCode,f.BatchCode,
  443. f.Version,f.Brand,f.cFree1,f.cFree2,f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,
  444. f.cFree8, f.cFree9, f.cFree10 ) AS t WHERE t.row= 1 ");
  445. #endregion
  446. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  447. }
  448. //工单材料出库(材料出库)子表查询
  449. public DataTable GetSubGridJson3(string Code)
  450. {
  451. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  452. DataTable dt = new DataTable();
  453. //var queryParam = queryJson.ToJObject();
  454. List<DbParameter> parameter = new List<DbParameter>();
  455. string sql = @"select a.ID,a.IssueCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode ,b.WarehouseName ,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  456. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity
  457. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  458. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.IssueQuantity as IssueQuantity
  459. from ICSMOIssue a
  460. left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  461. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  462. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  463. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  464. where a.IssueCode='{0}' and a.WorkPoint='{1}'";
  465. sql = string.Format(sql, Code, WorkPoint);
  466. return Repository().FindTableBySql(sql.ToString());
  467. }
  468. //委外备料(委外备料)
  469. public DataTable GetGridJson4(string queryJson, ref Pagination jqgridparam)
  470. {
  471. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  472. DataTable dt = new DataTable();
  473. var queryParam = queryJson.ToJObject();
  474. List<DbParameter> parameter = new List<DbParameter>();
  475. StringBuilder sqlString = new StringBuilder();
  476. #region [SQL]
  477. sqlString.Append($@"select * from (select row_number() over(partition by b.OOCode order by b.OOCode) row, b.OOCode as Code,
  478. b.CreateDateTime as MTIME,
  479. b.CreatePerson as MUSER,
  480. case
  481. when max(e.SourceID) is null then ''
  482. else ''
  483. end as IsNew,
  484. f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,f.cFree2,
  485. f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10
  486. from ICSOOPick a
  487. inner join ICSOutsourcingOrder b on a.OODetailID = b.OODetailID and a.WorkPoint = b.WorkPoint
  488. left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
  489. left join ICSExtension f on a.ExtensionID = f.ID and a.WorkPoint = f.WorkPoint
  490. WHERE b.WorkPoint = '{WorkPoint}' ");
  491. if (!string.IsNullOrWhiteSpace(queryJson))
  492. {
  493. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  494. {
  495. sqlString.Append($@" and a.OOCode like '%{queryParam["POCode"]}%' ");
  496. }
  497. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  498. {
  499. sqlString.Append($@" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  500. }
  501. }
  502. sqlString.Append(@" group by b.OOCode,b.CreateDateTime,b.CreatePerson,f.Colspan ,f.ProjectCode ,
  503. f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4,
  504. f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10) t where t.row=1");
  505. #endregion
  506. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  507. }
  508. //委外备料(委外备料)子表查询
  509. public DataTable GetSubGridJson4(string Code)
  510. {
  511. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  512. DataTable dt = new DataTable();
  513. //var queryParam = queryJson.ToJObject();
  514. List<DbParameter> parameter = new List<DbParameter>();
  515. string sql = @"select a.ID,b.OOCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,c.WarehouseName ,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  516. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity
  517. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  518. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.IssueQuantity as IssueQuantity
  519. from ICSOOPick a
  520. left join ICSOutsourcingOrder b on a.OODetailID=b.OODetailID and a.WorkPoint=b.WorkPoint
  521. left join ICSWarehouse c on a.WHCode=c.WarehouseCode and a.WorkPoint=c.WorkPoint
  522. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  523. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  524. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  525. where b.OOCode='{0}' and b.WorkPoint='{1}'";
  526. sql = string.Format(sql, Code, WorkPoint);
  527. return Repository().FindTableBySql(sql.ToString());
  528. }
  529. //委外领料(委外发料申请)
  530. public DataTable GetGridJson5(string queryJson, ref Pagination jqgridparam)
  531. {
  532. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  533. DataTable dt = new DataTable();
  534. var queryParam = queryJson.ToJObject();
  535. List<DbParameter> parameter = new List<DbParameter>();
  536. StringBuilder sqlString = new StringBuilder();
  537. #region [SQL]
  538. // sql = @"select a.ID,a.ApplyCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  539. //case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  540. // from ICSOApply a
  541. //left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  542. //left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  543. //left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint";
  544. // sql += " WHERE 1=1 and e.ID is null";
  545. sqlString.Append($@"select * from (select row_number() over (partition by a.ApplyCode order by a.ApplyCode ) row, a.ApplyCode as Code,CONVERT(varchar(100),a.CreateDateTime,23) as MTIME,a.CreatePerson as MUSER,
  546. case when max(e.SourceID) is null then ''
  547. else ''
  548. end as IsNew,
  549. case when max(k.TransCode) is null then '' else '' end as IsOccupy,
  550. g.Status as Status1,ISNULL(p.PrintCount, 0) as PrintCount,
  551. f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,
  552. f.cFree2,f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10,a.ID
  553. from ICSOApply a
  554. left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
  555. LEFT JOIN ICSPrintCount p ON a.APPlyCode=p.TransCode
  556. left join ICSExtension f on a.ExtensionID = f.ID and a.WorkPoint = f.WorkPoint
  557. left join (SELECT ApplyCode,
  558. case when sum(Quantity) =sum(IssueQuantity) AND sum(IssueQuantity)>0 then ''
  559. else '' end as Status
  560. from ICSOApply
  561. where WorkPoint='{WorkPoint}'
  562. group by ApplyCode) g on a.ApplyCode = g.ApplyCode
  563. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  564. LEFT JOIN ICSInventoryDetail detail ON d.InvCode=detail.INVCode AND a.WHCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  565. left join (select distinct TransCode,TransType,WorkPoint from dbo.ICSWareHouseLotInfoLog ) k on a.ApplyCode=k.TransCode and a.WorkPoint=k.WorkPoint and k.TransType='15'
  566. where a.WorkPoint = '{WorkPoint}'");
  567. if (!string.IsNullOrWhiteSpace(queryJson))
  568. {
  569. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  570. {
  571. sqlString.Append($@" and a.ApplyCode like '%{queryParam["POCode"]}%' ");
  572. }
  573. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  574. {
  575. sqlString.Append($@" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  576. }
  577. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  578. {
  579. sqlString.Append($@" and a.WHCode like '%{queryParam["WHCode"]}%' ");
  580. }
  581. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  582. {
  583. sqlString.Append($@" and detail.LocationCode like '%{queryParam["Area"]}%' ");
  584. }
  585. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  586. {
  587. sqlString.Append($@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  588. WHERE
  589. F_Define3='HGAreaConfig' AND F_Define1=a.WHCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ");
  590. }
  591. }
  592. sqlString.Append(@"group by a.ApplyCode,a.CreateDateTime,a.CreatePerson,f.Colspan,f.ProjectCode,
  593. f.BatchCode,f.Version,f.Brand,f.cFree1,f.cFree2,f.cFree3,f.cFree4,f.cFree5,
  594. f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10,a.ID,g.Status,p.PrintCount ) t where row=1");
  595. if (!string.IsNullOrWhiteSpace(queryParam["Status1"].ToString()))
  596. {
  597. if (queryParam["Status1"].ToString() == "1")
  598. {
  599. sqlString.Append($@" AND t.Status1='已过账' ");
  600. }
  601. else
  602. {
  603. sqlString.Append($@" AND t.Status1='未过账' ");
  604. }
  605. }
  606. #endregion
  607. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  608. }
  609. //委外领料(委外发料申请)子表查询
  610. public DataTable GetSubGridJson5(string Code, string queryJson, ref Pagination jqgridparam)
  611. {
  612. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  613. DataTable dt = new DataTable();
  614. var queryParam = queryJson.ToJObject();
  615. List<DbParameter> parameter = new List<DbParameter>();
  616. string sql = @"SELECT * FROM (select row_number() over(partition by a.ApplyCode,a.InvCode,a.Sequence ORDER BY a.ApplyCode) as row,
  617. a.ID,a.ApplyCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode, a.SourceCode,a.SourceSequence,a.VenCode,a.VenName,
  618. b.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,a.SAPSequence,
  619. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity,detail.LocationCode AS Area,
  620. f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  621. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.IssueQuantity as IssueQuantity
  622. from ICSOApply a
  623. left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  624. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  625. LEFT JOIN ICSInventoryDetail detail ON d.InvCode=detail.INVCode AND a.WHCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  626. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  627. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  628. where a.ApplyCode='{0}' and a.WorkPoint='{1}'";
  629. if (!string.IsNullOrWhiteSpace(queryJson))
  630. {
  631. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  632. {
  633. sql += " and a.WHCode like '%" + queryParam["WHCode"].ToString() + "%' ";
  634. }
  635. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  636. {
  637. sql += " and detail.LocationCode like '%" + queryParam["Area"].ToString() + "%' ";
  638. }
  639. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  640. {
  641. sql += " and a.InvCode like '%" + queryParam["InvCode"].ToString() + "%' ";
  642. }
  643. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  644. {
  645. sql += $@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  646. WHERE
  647. F_Define3='HGAreaConfig' AND F_Define1=a.WHCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ";
  648. }
  649. }
  650. sql += " ) c WHERE c.row=1 ";
  651. sql = string.Format(sql, Code, WorkPoint);
  652. //return Repository().FindTableBySql(sql.ToString());
  653. return Repository().FindTablePageBySql(sql.ToString(), parameter.ToArray(), ref jqgridparam);
  654. }
  655. //委外材料出库(委外发料申请)
  656. public DataTable GetGridJson6(string queryJson, ref Pagination jqgridparam)
  657. {
  658. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  659. DataTable dt = new DataTable();
  660. var queryParam = queryJson.ToJObject();
  661. List<DbParameter> parameter = new List<DbParameter>();
  662. StringBuilder sqlString = new StringBuilder();
  663. #region [SQL]
  664. // sql = @"select a.ID,a.IssueCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseCode,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  665. //case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  666. // from ICSOIssue a
  667. //left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  668. //left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  669. //left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint";
  670. // sql += " WHERE 1=1 and e.ID is null";
  671. sqlString.Append($@"select * from(select row_number() over(partition by a.IssueCode order by a.IssueCode) row, a.IssueCode as Code,
  672. a.CreateDateTime as MTIME,
  673. a.CreatePerson as MUSER,
  674. case
  675. when max(e.SourceID) is null then ''
  676. else ''
  677. end as IsNew,f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,
  678. f.cFree1,f.cFree2,f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,
  679. f.cFree8,f.cFree9,f.cFree10
  680. from ICSOIssue a
  681. left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
  682. left join ICSExtension f on a.ExtensionID = f.ID and a.WorkPoint = f.WorkPoint
  683. where a.WorkPoint = '{WorkPoint}'");
  684. if (!string.IsNullOrWhiteSpace(queryJson))
  685. {
  686. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  687. {
  688. sqlString.Append($@" and a.IssueCode like '%{queryParam["POCode"]}%' ");
  689. }
  690. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  691. {
  692. sqlString.Append($@" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  693. }
  694. }
  695. sqlString.Append(@"group by a.IssueCode,a.CreateDateTime,a.CreatePerson,f.Colspan,f.ProjectCode,
  696. f.BatchCode,f.Version,f.Brand,f.cFree1,f.cFree2,f.cFree3,f.cFree4,f.cFree5,
  697. f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10) t where t.row=1");
  698. #endregion
  699. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  700. }
  701. //委外材料出库(委外发料申请)子表查询
  702. public DataTable GetSubGridJson6(string Code)
  703. {
  704. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  705. DataTable dt = new DataTable();
  706. //var queryParam = queryJson.ToJObject();
  707. List<DbParameter> parameter = new List<DbParameter>();
  708. string sql = @"select a.ID,a.IssueCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseCode,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  709. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity
  710. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  711. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.IssueQuantity as IssueQuantity
  712. from ICSOIssue a
  713. left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  714. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  715. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  716. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  717. where a.IssueCode='{0}' and a.WorkPoint='{1}'";
  718. sql = string.Format(sql, Code, WorkPoint);
  719. return Repository().FindTableBySql(sql.ToString());
  720. }
  721. //销售发货(销售发货)
  722. public DataTable GetGridJson7(string queryJson, ref Pagination jqgridparam)
  723. {
  724. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  725. DataTable dt = new DataTable();
  726. var queryParam = queryJson.ToJObject();
  727. List<DbParameter> parameter = new List<DbParameter>();
  728. StringBuilder sqlString = new StringBuilder();
  729. #region [SQL]
  730. // sql = @"select a.ID,a.SDNCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  731. //case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  732. // from ICSSDN a
  733. //left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  734. //left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  735. //left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint";
  736. // sql += " WHERE 1=1 and a.Type='1' and e.ID is null";
  737. sqlString.Append($@"SELECT * from (SELECT Row_Number() over(partition by a.SDNCode Order by a.SDNCode) as r, a.SDNCode AS Code,
  738. CONVERT(varchar(100),a.CreateDateTime,23) AS MTIME,
  739. a.CreatePerson AS MUSER,
  740. a.CusCode,a.CusName,ISNULL(p.PrintCount, 0) as PrintCount,
  741. (CASE WHEN max(e.SourceID) IS NULL THEN '' ELSE '' END) AS IsNew,
  742. case when max(k.TransCode) is null then '' else '' end as IsOccupy,g.Status as Status1,
  743. f.Colspan, f.ProjectCode, f.BatchCode, f.Version, f.Brand,
  744. f.cFree1, f.cFree2, f.cFree3, f.cFree4, f.cFree5, f.cFree6, f.cFree7, f.cFree8, f.cFree9, f.cFree10,a.ID
  745. FROM ICSSDN a
  746. LEFT JOIN ICSPrintCount p ON a.SDNCode=p.TransCode
  747. left join (SELECT SDNCode,case when sum(Quantity) =sum(SDNQuantity) AND sum(SDNQuantity)>0 then '' else '' end as Status
  748. from ICSSDN where WorkPoint='{WorkPoint}' group by SDNCode) g on a.SDNCode = g.SDNCode
  749. LEFT JOIN ICSMOPickMerge e ON a.ID = e.SourceID AND a.WorkPoint = e.WorkPoint
  750. LEFT JOIN ICSExtension f ON a.ExtensionID = f.ID AND a.WorkPoint = f.WorkPoint
  751. LEFT JOIN ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  752. LEFT JOIN ICSInventoryDetail detail ON d.InvCode=detail.INVCode AND a.WHCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  753. left join (select distinct TransCode,TransType,WorkPoint from dbo.ICSWareHouseLotInfoLog ) k on a.SDNCode=k.TransCode and a.WorkPoint=k.WorkPoint and k.TransType='15'
  754. WHERE a.WorkPoint = '{WorkPoint}' ");
  755. if (!string.IsNullOrWhiteSpace(queryJson))
  756. {
  757. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  758. {
  759. sqlString.Append($" and a.SDNCode like '%{queryParam["POCode"]}%' ");
  760. }
  761. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  762. {
  763. sqlString.Append($" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  764. }
  765. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  766. {
  767. sqlString.Append($@" and a.WHCode like '%{queryParam["WHCode"]}%' ");
  768. }
  769. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  770. {
  771. sqlString.Append($@" and detail.LocationCode like '%{queryParam["Area"]}%' ");
  772. }
  773. if (!string.IsNullOrWhiteSpace(queryParam["CusCode"].ToString()))
  774. {
  775. sqlString.Append($@" and a.CusCode like '%{queryParam["CusCode"]}%' ");
  776. }
  777. if (!string.IsNullOrWhiteSpace(queryParam["CusName"].ToString()))
  778. {
  779. sqlString.Append($@" and a.CusName like '%{queryParam["CusName"]}%' ");
  780. }
  781. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  782. {
  783. sqlString.Append($@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  784. WHERE
  785. F_Define3='HGAreaConfig' AND F_Define1=a.WHCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ");
  786. }
  787. }
  788. sqlString.Append(@"GROUP BY a.SDNCode, a.CreateDateTime, a.CreatePerson, f.Colspan, f.ProjectCode, f.BatchCode, f.Version, f.Brand,
  789. f.cFree1, f.cFree2, f.cFree3, f.cFree4, f.cFree5, f.cFree6, f.cFree7, f.cFree8, f.cFree9, f.cFree10,a.ID,a.CusCode,a.CusName,p.PrintCount,g.Status) t WHERE t.r=1");
  790. if (!string.IsNullOrWhiteSpace(queryParam["Status1"].ToString()))
  791. {
  792. if (queryParam["Status1"].ToString() == "1")
  793. {
  794. sqlString.Append($@" AND t.Status1='已过账' ");
  795. }
  796. else
  797. {
  798. sqlString.Append($@" AND t.Status1='未过账' ");
  799. }
  800. }
  801. #endregion
  802. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  803. }
  804. //销售发货(销售发货)子表查询
  805. public DataTable GetSubGridJson7(string Code, string queryJson, ref Pagination jqgridparam)
  806. {
  807. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  808. DataTable dt = new DataTable();
  809. var queryParam = queryJson.ToJObject();
  810. List<DbParameter> parameter = new List<DbParameter>();
  811. string sql = @"SELECT * FROM (select row_number() over(partition by a.SDNCode,a.InvCode,a.Sequence ORDER BY a.SDNCode) as row,
  812. a.ID,a.SDNCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName,a.InvCode
  813. ,a.WorkPoint,a.Points,a.DeliveryType,a.DeliveryDescribe,a.InvDescribe,a.OtherDescribe,a.CusCode,a.CusName,
  814. a.SalesUnit,a.StockIndicator,a.IsSerialNumber,a.SAPSequence,
  815. d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  816. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity,detail.LocationCode AS Area
  817. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  818. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.SDNQuantity as IssueQuantity
  819. from ICSSDN a
  820. left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  821. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  822. LEFT JOIN ICSInventoryDetail detail ON d.InvCode=detail.INVCode AND a.WHCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  823. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  824. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  825. where a.SDNCode='{0}' and a.WorkPoint='{1}'";
  826. if (!string.IsNullOrWhiteSpace(queryJson))
  827. {
  828. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  829. {
  830. sql += " and a.WHCode like '%" + queryParam["WHCode"].ToString() + "%' ";
  831. }
  832. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  833. {
  834. sql += " and detail.LocationCode like '%" + queryParam["Area"].ToString() + "%' ";
  835. }
  836. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  837. {
  838. sql += " and a.InvCode like '%" + queryParam["InvCode"].ToString() + "%' ";
  839. }
  840. if (!string.IsNullOrWhiteSpace(queryParam["CusCode"].ToString()))
  841. {
  842. sql += $@" and a.CusCode like '%{queryParam["CusCode"]}%' ";
  843. }
  844. if (!string.IsNullOrWhiteSpace(queryParam["CusName"].ToString()))
  845. {
  846. sql += $@" and a.CusName like '%{queryParam["CusName"]}%' ";
  847. }
  848. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  849. {
  850. sql += $@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  851. WHERE
  852. F_Define3='HGAreaConfig' AND F_Define1=a.WHCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ";
  853. }
  854. }
  855. sql += " ) c WHERE c.row=1 ";
  856. sql = string.Format(sql, Code, WorkPoint);
  857. //return Repository().FindTableBySql(sql.ToString());
  858. return Repository().FindTablePageBySql(sql.ToString(), parameter.ToArray(), ref jqgridparam);
  859. }
  860. //其它出库(其它出库)
  861. public DataTable GetGridJson8(string queryJson, ref Pagination jqgridparam)
  862. {
  863. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  864. DataTable dt = new DataTable();
  865. var queryParam = queryJson.ToJObject();
  866. List<DbParameter> parameter = new List<DbParameter>();
  867. StringBuilder sqlString = new StringBuilder();
  868. #region [SQL]
  869. // sql = @"select a.ID,a.OutCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  870. //case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  871. //from ICSOtherOut a
  872. //left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  873. //left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  874. //left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint";
  875. // sql += " WHERE 1=1 and e.ID is null ";
  876. sqlString.Append($@"select * from(select row_number() over(partition by a.OutCode order by a.OutCode) row, a.OutCode as Code,
  877. CONVERT(varchar(100),a.CreateDateTime,23) as MTIME,
  878. a.CreatePerson as MUSER,
  879. case
  880. when max(e.SourceID) is null then ''
  881. else ''
  882. end as IsNew,
  883. case when max(k.TransCode) is null then '' else '' end as IsOccupy,
  884. g.Status as Status1,ISNULL(p.PrintCount, 0) as PrintCount,
  885. f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,
  886. f.cFree2,f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10,a.ID
  887. from ICSOtherOut a
  888. LEFT JOIN ICSPrintCount p ON a.OutCode=p.TransCode
  889. left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
  890. left join (SELECT OutCode,case when sum(Quantity) =sum(OutQuantity) AND sum(OutQuantity)>0 then '' else '' end as Status
  891. from ICSOtherOut where WorkPoint='{WorkPoint}' group by OutCode) g on a.OutCode = g.OutCode
  892. left join ICSExtension f on a.ExtensionID = f.ID and a.WorkPoint = f.WorkPoint
  893. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  894. LEFT JOIN ICSInventoryDetail detail ON d.InvCode=detail.INVCode AND a.WHCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  895. left join (select distinct TransCode,TransType,WorkPoint from dbo.ICSWareHouseLotInfoLog ) k on a.OutCode=k.TransCode and a.WorkPoint=k.WorkPoint and k.TransType='15'
  896. where a.WorkPoint = '{WorkPoint}'");
  897. #endregion
  898. if (!string.IsNullOrWhiteSpace(queryJson))
  899. {
  900. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  901. {
  902. sqlString.Append($@" and a.OutCode like '%{queryParam["POCode"]}%' ");
  903. }
  904. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  905. {
  906. sqlString.Append($@" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  907. }
  908. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  909. {
  910. sqlString.Append($@" and a.WHCode like '%{queryParam["WHCode"]}%' ");
  911. }
  912. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  913. {
  914. sqlString.Append($@" and detail.LocationCode like '%{queryParam["Area"]}%' ");
  915. }
  916. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  917. {
  918. sqlString.Append($@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  919. WHERE
  920. F_Define3='HGAreaConfig' AND F_Define1=a.WHCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ");
  921. }
  922. }
  923. sqlString.Append(@" group by a.OutCode,a.CreateDateTime,a.CreatePerson,f.Colspan,f.ProjectCode,f.BatchCode,
  924. f.Version,f.Brand,f.cFree1,f.cFree2,f.cFree3,f.cFree4,f.cFree5,f.cFree6,
  925. f.cFree7,f.cFree8,f.cFree9,f.cFree10,a.ID,g.Status,p.PrintCount) t where t.row=1");
  926. if (!string.IsNullOrWhiteSpace(queryParam["Status1"].ToString()))
  927. {
  928. if (queryParam["Status1"].ToString() == "1")
  929. {
  930. sqlString.Append($@" AND t.Status1='已过账' ");
  931. }
  932. else
  933. {
  934. sqlString.Append($@" AND t.Status1='未过账' ");
  935. }
  936. }
  937. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  938. }
  939. //其它出库(其它出库)子表查询
  940. public DataTable GetSubGridJson8(string Code, string queryJson, ref Pagination jqgridparam)
  941. {
  942. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  943. DataTable dt = new DataTable();
  944. var queryParam = queryJson.ToJObject();
  945. List<DbParameter> parameter = new List<DbParameter>();
  946. string sql = @"SELECT * FROM (select row_number() over(partition by a.OutCode,a.InvCode,a.Sequence ORDER BY a.OutCode) as row,
  947. a.ID,a.OutCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName,a.Quantity,
  948. a.InvCode,a.WorkPoint,a.OrderType, a.TypeDescribe,a.CostCenter,a.Remarks,a.PersonNumber,a.InvDescribe,
  949. a.Unit,a.StockIndicator,a.SAPSequence,
  950. d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  951. case when e.SourceID is null then '' else '' end as IsNew,detail.LocationCode AS Area
  952. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  953. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.OutQuantity as IssueQuantity
  954. from ICSOtherOut a
  955. left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  956. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  957. LEFT JOIN ICSInventoryDetail detail ON d.InvCode=detail.INVCode AND a.WHCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  958. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  959. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  960. where a.OutCode='{0}' and a.WorkPoint='{1}'";
  961. if (!string.IsNullOrWhiteSpace(queryJson))
  962. {
  963. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  964. {
  965. sql += " and a.WHCode like '%" + queryParam["WHCode"].ToString() + "%' ";
  966. }
  967. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  968. {
  969. sql += " and detail.LocationCode like '%" + queryParam["Area"].ToString() + "%' ";
  970. }
  971. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  972. {
  973. sql += " and a.InvCode like '%" + queryParam["InvCode"].ToString() + "%' ";
  974. }
  975. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  976. {
  977. sql += $@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  978. WHERE
  979. F_Define3='HGAreaConfig' AND F_Define1=a.WHCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ";
  980. }
  981. }
  982. sql += " ) c WHERE c.row=1 ";
  983. sql = string.Format(sql, Code, WorkPoint);
  984. return Repository().FindTableBySql(sql.ToString());
  985. }
  986. //借用(借用)
  987. public DataTable GetGridJson9(string queryJson, ref Pagination jqgridparam)
  988. {
  989. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  990. DataTable dt = new DataTable();
  991. var queryParam = queryJson.ToJObject();
  992. List<DbParameter> parameter = new List<DbParameter>();
  993. StringBuilder sqlString = new StringBuilder();
  994. #region [SQL]
  995. // sql = @"
  996. //select a.ID,a.BrrowCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  997. // case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  998. // from ICSBrrow a
  999. // left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  1000. // left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  1001. // left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint";
  1002. // sql += " WHERE 1=1 and e.ID is null ";
  1003. sqlString.Append($@"select * from(select row_number() over(partition by a.BrrowCode order by a.BrrowCode) row, a.BrrowCode as Code,
  1004. a.CreateDateTime as MTIME,
  1005. a.CreatePerson as MUSER,
  1006. case
  1007. when max(e.SourceID) is null then ''
  1008. else ''
  1009. end as IsNew,f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,
  1010. f.cFree1,f.cFree2,f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,
  1011. f.cFree8,f.cFree9,f.cFree10
  1012. from ICSBrrow a
  1013. left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
  1014. left join ICSExtension f on a.ExtensionID = f.ID and a.WorkPoint = f.WorkPoint
  1015. where a.WorkPoint = '{WorkPoint}'");
  1016. if (!string.IsNullOrWhiteSpace(queryJson))
  1017. {
  1018. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  1019. {
  1020. sqlString.Append($@" and a.BrrowCode like '%{queryParam["POCode"]}%' ");
  1021. }
  1022. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  1023. {
  1024. sqlString.Append($@" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  1025. }
  1026. }
  1027. sqlString.Append(@"group by a.BrrowCode,a.CreateDateTime,a.CreatePerson,f.Colspan,f.ProjectCode,
  1028. f.BatchCode,f.Version,f.Brand,f.cFree1,f.cFree2,f.cFree3,f.cFree4,
  1029. f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,
  1030. f.cFree10) t where t.row=1");
  1031. #endregion
  1032. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  1033. }
  1034. //借用(借用)子表查询
  1035. public DataTable GetSubGridJson9(string Code)
  1036. {
  1037. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  1038. DataTable dt = new DataTable();
  1039. //var queryParam = queryJson.ToJObject();
  1040. List<DbParameter> parameter = new List<DbParameter>();
  1041. string sql = @"select a.ID,a.BrrowCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  1042. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity
  1043. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  1044. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.BrrowQuantity as IssueQuantity
  1045. from ICSBrrow a
  1046. left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  1047. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  1048. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  1049. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  1050. where a.BrrowCode='{0}' and a.WorkPoint='{1}'";
  1051. sql = string.Format(sql, Code, WorkPoint);
  1052. return Repository().FindTableBySql(sql.ToString());
  1053. }
  1054. //物料调拨
  1055. public DataTable GetGridJson10(string queryJson, ref Pagination jqgridparam)
  1056. {
  1057. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  1058. DataTable dt = new DataTable();
  1059. var queryParam = queryJson.ToJObject();
  1060. List<DbParameter> parameter = new List<DbParameter>();
  1061. StringBuilder sqlString = new StringBuilder();
  1062. #region [SQL]
  1063. // sql = @"
  1064. //select a.ID,a.BrrowCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  1065. // case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  1066. // from ICSBrrow a
  1067. // left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  1068. // left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  1069. // left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint";
  1070. // sql += " WHERE 1=1 and e.ID is null ";
  1071. sqlString.Append($@"select * from (select row_number() over(partition by a.TransferNO order by a.TransferNO) row,
  1072. a.TransferNO as Code,a.ID,CONVERT(varchar(100),a.CreateDateTime,23) as MTIME,a.CreatePerson as MUSER,
  1073. g.Status as Status1,ISNULL(p.PrintCount, 0) as PrintCount,
  1074. f.Colspan,f.ProjectCode,f.BatchCode,f.Version,f.Brand,f.cFree1,
  1075. case when max(k.TransCode) is null then '' else '' end as IsOccupy,
  1076. f.cFree2,f.cFree3,f.cFree4,f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10
  1077. from ICSTransfer a
  1078. LEFT JOIN ICSPrintCount p ON a.TransferNO=p.TransCode
  1079. left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
  1080. left join ICSExtension f on a.ExtensionID = f.ID and a.WorkPoint = f.WorkPoint
  1081. left join (SELECT TransferNO,case when sum(Quantity) =sum(TransferQuantity) AND sum(TransferQuantity)>0 then '' else '' end as Status
  1082. from ICSTransfer where WorkPoint='{WorkPoint}' group by TransferNO) g on a.TransferNO = g.TransferNO
  1083. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  1084. LEFT JOIN ICSInventoryDetail detail ON d.InvCode=detail.INVCode AND a.FromWarehouseCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  1085. left join (select distinct TransCode,TransType,WorkPoint from dbo.ICSWareHouseLotInfoLog ) k on a.TransferNO=k.TransCode and a.WorkPoint=k.WorkPoint and k.TransType='15'
  1086. where a.WorkPoint = '{WorkPoint}' and a.Status = '2'");
  1087. if (!string.IsNullOrWhiteSpace(queryJson))
  1088. {
  1089. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  1090. {
  1091. sqlString.Append($@" and a.TransferNO like '%{queryParam["POCode"]}%' ");
  1092. }
  1093. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  1094. {
  1095. sqlString.Append($@" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  1096. }
  1097. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  1098. {
  1099. sqlString.Append($@" and a.ToWarehouseCode like '%{queryParam["WHCode"]}%' ");
  1100. }
  1101. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  1102. {
  1103. sqlString.Append($@" and detail.LocationCode like '%{queryParam["Area"]}%' ");
  1104. }
  1105. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  1106. {
  1107. sqlString.Append($@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  1108. WHERE
  1109. F_Define3='HGAreaConfig' AND F_Define1=a.FromWarehouseCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ");
  1110. }
  1111. }
  1112. sqlString.Append(@"group by a.TransferNO,a.CreateDateTime,a.CreatePerson,f.Colspan,f.ProjectCode,
  1113. f.BatchCode,f.Version,f.Brand,f.cFree1,f.cFree2,f.cFree3,f.cFree4,
  1114. f.cFree5,f.cFree6,f.cFree7,f.cFree8,f.cFree9,f.cFree10,a.ID,a.TransferQuantity,g.Status,p.PrintCount) t where t.row=1");
  1115. if (!string.IsNullOrWhiteSpace(queryParam["Status"].ToString()))
  1116. {
  1117. if (queryParam["Status1"].ToString() == "1")
  1118. {
  1119. sqlString.Append($@" AND t.Status1='已过账' ");
  1120. }
  1121. else
  1122. {
  1123. sqlString.Append($@" AND t.Status1='未过账' ");
  1124. }
  1125. }
  1126. #endregion
  1127. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  1128. }
  1129. //物料调拨子表查询
  1130. public DataTable GetSubGridJson10(string Code, string queryJson, ref Pagination jqgridparam)
  1131. {
  1132. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  1133. DataTable dt = new DataTable();
  1134. var queryParam = queryJson.ToJObject();
  1135. List<DbParameter> parameter = new List<DbParameter>();
  1136. string sql = @"SELECT * from (select row_number() over(partition by a.TransferNO,a.InvCode,
  1137. a.Sequence ORDER BY a.TransferNO) as row, a.ID,a.TransferNO as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.FromWarehouseCode as WHCode,b.WarehouseName,detail.LocationCode AS Area,
  1138. a.InvCode,a.ToWarehouseCode,a.EATTRIBUTE1 AS ReceiveWork,a.WorkPoint,a.OrderType,
  1139. a.TypeDescribe,a.Remarks,a.PersonNumber,a.InvDescribe,
  1140. a.Unit,a.StockIndicator,a.ReceiveInvCode,a.ReceiveInvDescribe,
  1141. a.ReceiveStock,a.ReceiveSales,a.ReceiveSequence,a.Remark2,
  1142. d.InvName,d.InvDesc,d.InvStd,d.InvUnit,a.SAPSequence,
  1143. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity
  1144. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  1145. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.TransferQuantity as IssueQuantity
  1146. from ICSTransfer a
  1147. left join ICSWarehouse b on a.FromWarehouseCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  1148. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  1149. LEFT JOIN ICSInventoryDetail detail ON d.InvCode=detail.INVCode AND a.FromWarehouseCode=detail.WHCode AND a.WorkPoint=detail.WorkPoint
  1150. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  1151. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  1152. where a.TransferNO='{0}' and b.WorkPoint='{1}'";
  1153. if (!string.IsNullOrWhiteSpace(queryJson))
  1154. {
  1155. if (!string.IsNullOrWhiteSpace(queryParam["WHCode"].ToString()))
  1156. {
  1157. sql += " and a.ToWarehouseCode like '%" + queryParam["WHCode"].ToString() + "%' ";
  1158. }
  1159. if (!string.IsNullOrWhiteSpace(queryParam["Area"].ToString()))
  1160. {
  1161. sql += " and detail.LocationCode like '%" + queryParam["Area"].ToString() + "%' ";
  1162. }
  1163. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  1164. {
  1165. sql += " and a.InvCode like '%" + queryParam["InvCode"].ToString() + "%' ";
  1166. }
  1167. if (!string.IsNullOrWhiteSpace(queryParam["Container"].ToString()) && queryParam["Container"].ToString() == "2")
  1168. {
  1169. sql += $@" and (detail.LocationCode not in (SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  1170. WHERE
  1171. F_Define3='HGAreaConfig' AND F_Define1=a.FromWarehouseCode AND F_Define4=a.WorkPoint) OR detail.LocationCode is null OR detail.LocationCode='') ";
  1172. }
  1173. }
  1174. sql += " ) as t where t.row=1";
  1175. sql = string.Format(sql, Code, WorkPoint);
  1176. //return Repository().FindTableBySql(sql.ToString());
  1177. return Repository().FindTablePageBySql(sql.ToString(), parameter.ToArray(), ref jqgridparam);
  1178. }
  1179. //两步调拨
  1180. public DataTable GetGridJson11(string queryJson, ref Pagination jqgridparam)
  1181. {
  1182. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  1183. DataTable dt = new DataTable();
  1184. var queryParam = queryJson.ToJObject();
  1185. List<DbParameter> parameter = new List<DbParameter>();
  1186. StringBuilder sqlString = new StringBuilder();
  1187. #region [SQL]
  1188. // sql = @"
  1189. //select a.ID,a.BrrowCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode,b.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  1190. // case when e.SourceID is null then '未合并' else '已合并' end as IsNew,a.Quantity
  1191. // from ICSBrrow a
  1192. // left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  1193. // left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  1194. // left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint";
  1195. // sql += " WHERE 1=1 and e.ID is null ";
  1196. sqlString.Append($@"select * from (select row_number() over(partition by a.OutCode order by a.OutCode)row, a.OutCode as Code, a.CreateDateTime as MTIME, a.CreatePerson as MUSER,
  1197. case when max(e.SourceID) is null then '' else '' end as IsNew,a.EATTRIBUTE1 AS ReceiveWork,tra.ToWarehouseCode,
  1198. f.Colspan, f.ProjectCode, f.BatchCode, f.Version, f.Brand,
  1199. f.cFree1, f.cFree2, f.cFree3, f.cFree4, f.cFree5, f.cFree6, f.cFree7, f.cFree8, f.cFree9, f.cFree10
  1200. FROM ICSOtherOut a
  1201. INNER JOIN ICSTransfer tra ON a.TransferDetailID = tra.TransferDetailID AND a.WorkPoint = tra.WorkPoint
  1202. left join ICSMOPickMerge e on a.ID = e.SourceID and a.WorkPoint = e.WorkPoint
  1203. left join ICSExtension f on a.ExtensionID = f.ID and a.WorkPoint = f.WorkPoint
  1204. where a.WorkPoint = '{WorkPoint}'
  1205. and a.Status = '2' ");
  1206. if (!string.IsNullOrWhiteSpace(queryJson))
  1207. {
  1208. if (!string.IsNullOrWhiteSpace(queryParam["POCode"].ToString()))
  1209. {
  1210. sqlString.Append($@" and a.OutCode like '%{queryParam["POCode"]}%' ");
  1211. }
  1212. if (!string.IsNullOrWhiteSpace(queryParam["InvCode"].ToString()))
  1213. {
  1214. sqlString.Append($@" and a.InvCode like '%{queryParam["InvCode"]}%' ");
  1215. }
  1216. }
  1217. sqlString.Append(@" group by a.OutCode, a.CreateDateTime, a.CreatePerson,a.EATTRIBUTE1 ,tra.ToWarehouseCode, f.Colspan ,f.ProjectCode ,
  1218. f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4 ,
  1219. f.cFree5, f.cFree6, f.cFree7, f.cFree8, f.cFree9, f.cFree10) t where t.row=1");
  1220. #endregion
  1221. return Repository().FindTablePageBySql(sqlString.ToString(), parameter.ToArray(), ref jqgridparam);
  1222. }
  1223. //两步调拨子表查询
  1224. public DataTable GetSubGridJson11(string Code)
  1225. {
  1226. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  1227. DataTable dt = new DataTable();
  1228. //var queryParam = queryJson.ToJObject();
  1229. List<DbParameter> parameter = new List<DbParameter>();
  1230. string sql = @" select a.ID,a.OutCode as Code,a.Sequence,a.MTIME,a.MUSERName,a.MUSER,a.WHCode ,b.WarehouseName,a.InvCode,d.InvName,d.InvDesc,d.InvStd,d.InvUnit,
  1231. case when e.SourceID is null then '' else '' end as IsNew,a.Quantity
  1232. ,f.Colspan ,f.ProjectCode ,f.BatchCode ,f.Version ,f.Brand ,f.cFree1 ,f.cFree2 ,f.cFree3 ,f.cFree4
  1233. ,f.cFree5 ,f.cFree6 ,f.cFree7 ,f.cFree8 ,f.cFree9 ,f.cFree10,a.OutQuantity as IssueQuantity
  1234. FROM ICSOtherOut a
  1235. INNER JOIN ICSTransfer tra ON a.TransferDetailID=tra.TransferDetailID AND a.WorkPoint=tra.WorkPoint
  1236. left join ICSWarehouse b on a.WHCode=b.WarehouseCode and a.WorkPoint=b.WorkPoint
  1237. left join ICSInventory d on a.InvCode=d.InvCode and a.WorkPoint=d.WorkPoint
  1238. left join ICSMOPickMerge e on a.ID=e.SourceID and a.WorkPoint=e.WorkPoint
  1239. left join ICSExtension f on a.ExtensionID=f.ID and a.WorkPoint=f.WorkPoint
  1240. where a.OutCode='{0}' and a.WorkPoint='{1}'";
  1241. sql = string.Format(sql, Code, WorkPoint);
  1242. return Repository().FindTableBySql(sql.ToString());
  1243. }
  1244. // public DataTable GetICSMOPickMergeTemp(string ID,string Type)
  1245. // {
  1246. // string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  1247. // ID = string.IsNullOrWhiteSpace(ID) ? "''" : ID.TrimEnd(',');
  1248. // #region sql
  1249. // string sql = @"SELECT row_number() over (order by c.Code,c.InvCode,d.MTIME,d.LotNO) AS rowNo,
  1250. // c.Code,
  1251. // c.InvCode,
  1252. // c.InvName,
  1253. // c.InvStd,
  1254. // c.InvUnit,
  1255. // FLOOR(c.iQuantity) AS iQuantity,
  1256. // d.WarehouseCode,
  1257. // m.LotNO,
  1258. // (case when m.LotNo is null then 0 else FLOOR(ISNULL(d.Quantity, 0)) end) AS QTY,
  1259. // (case when m.LotNo is null then null else d.LocationCode end) AS LocationCode,
  1260. // CONVERT(varchar(100),d.MTIME, 23) MTIME,
  1261. // FLOOR(f.QTYTotal) QTYTotal INTO #temp
  1262. // FROM
  1263. // ({0}) c
  1264. // LEFT JOIN ICSWareHouseLotInfo d ON c.InvCode=d.INVCode AND c.WhCode=d.WarehouseCode AND d.WorkPoint='{1}' AND d.Quantity>0
  1265. // left join ICSInventoryLot m on d.LotNo=m.LotNo and d.WorkPoint=m.WorkPoint and c.ExtensionID=m.ExtensionID
  1266. // LEFT JOIN (SELECT INVCode,WarehouseCode,SUM(Quantity) AS QTYTotal FROM ICSWareHouseLotInfo WHERE WorkPoint='{1}' GROUP BY INVCode,WarehouseCode) f ON c.InvCode=f.INVCode AND c.WhCode=f.WarehouseCode
  1267. //DECLARE @ItemCode VARCHAR(50),
  1268. // @QTY DECIMAL(18,3),
  1269. // @ItemCodeCurrent VARCHAR(50),
  1270. // @Lotno VARCHAR(50),
  1271. // @QTYCurrent DECIMAL(18,3),
  1272. // @iQuantityCurrent DECIMAL(18,3),
  1273. // @CanDelete BIT,
  1274. // @Row INT,
  1275. // @rowCurrent INT
  1276. //SET @Row = @@rowcount
  1277. //SET @rowCurrent=1
  1278. //SET @CanDelete=0
  1279. //SET @ItemCode=''
  1280. //SET @Lotno = ''
  1281. //WHILE @rowCurrent<=@Row
  1282. // BEGIN
  1283. // SELECT @ItemCodeCurrent=InvCode,@QTYCurrent=QTY,@iQuantityCurrent=iQuantity,@Lotno = Lotno FROM #temp WHERE rowNo=@rowCurrent
  1284. //PRINT(@rowCurrent)
  1285. // IF @ItemCode<>@ItemCodeCurrent
  1286. // BEGIN
  1287. // SET @ItemCode=@ItemCodeCurrent
  1288. // SET @QTY=0
  1289. // SET @CanDelete=0
  1290. // END
  1291. // IF @CanDelete=1
  1292. // BEGIN
  1293. // DELETE FROM #temp WHERE rowNo=@rowCurrent
  1294. // SET @rowCurrent += 1
  1295. // CONTINUE
  1296. // END
  1297. // SET @QTY += @QTYCurrent
  1298. // IF @LotNo is null or @QTY>=@iQuantityCurrent
  1299. // BEGIN
  1300. // SET @CanDelete=1
  1301. // END
  1302. // SET @rowCurrent += 1
  1303. // END
  1304. //SELECT * FROM #temp
  1305. //DROP TABLE #temp
  1306. //";
  1307. // #endregion
  1308. // string sqls = "";
  1309. // if (Type=="1")
  1310. // {
  1311. // #region 工单备料sql
  1312. // sqls = @" SELECT
  1313. // c.MOCode as Code,
  1314. // a.InvCode,
  1315. // b.InvName,
  1316. // b.InvStd,
  1317. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  1318. // a.WhCode,
  1319. // b.InvUnit,
  1320. // a.ExtensionID
  1321. // FROM
  1322. // ICSMOPick a
  1323. // inner join ICSMO c on a.MODetailID=c.MODetailID and a.WorkPoint=c.WorkPoint
  1324. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1325. // WHERE c.MOCode in ({0}) AND a.WorkPoint = '{1}'
  1326. // GROUP BY c.MOCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID";
  1327. // #endregion
  1328. // }
  1329. // if (Type == "2")
  1330. // {
  1331. // return GetICSMOPickMergeByWorkorder(ID, WorkPoint);
  1332. // }
  1333. // if (Type=="3")
  1334. // {
  1335. // #region 工单材料出库SQL
  1336. // sqls = @" select
  1337. // a.IssueCode as Code,
  1338. // a.InvCode,
  1339. // b.InvName,
  1340. // b.InvStd,
  1341. // b.InvUnit,
  1342. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  1343. // a.WhCode,
  1344. // a.ExtensionID
  1345. // FROM
  1346. // ICSMOIssue a
  1347. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1348. // WHERE a.IssueCode in ({0}) AND a.WorkPoint = '{1}'
  1349. // GROUP BY a.IssueCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID";
  1350. // #endregion
  1351. // }
  1352. // if (Type=="4")
  1353. // {
  1354. // #region 委外备料SQL
  1355. // sqls = @" select
  1356. // c.OOCode as Code,
  1357. // a.InvCode,
  1358. // b.InvName,
  1359. // b.InvStd,
  1360. // b.InvUnit,
  1361. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  1362. // a.WhCode,
  1363. // a.ExtensionID
  1364. // FROM
  1365. // ICSOOPick a
  1366. // left join ICSOutsourcingOrder c on a.OODetailID=c.OODetailID and a.WorkPoint=c.WorkPoint
  1367. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1368. // WHERE c.OOCode in ({0}) AND a.WorkPoint = '{1}'
  1369. // GROUP BY c.OOCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode, a.ExtensionID";
  1370. // #endregion
  1371. // }
  1372. // if (Type=="5")
  1373. // {
  1374. // #region 委外领料SQL
  1375. // sqls = @" select
  1376. // a.ApplyCode as Code,
  1377. // a.InvCode,
  1378. // b.InvName,
  1379. // b.InvStd,
  1380. //b.InvUnit,
  1381. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  1382. // a.WhCode,
  1383. // a.ExtensionID
  1384. // FROM
  1385. // ICSOApply a
  1386. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1387. // WHERE a.ApplyCode in ({0}) AND a.WorkPoint = '{1}'
  1388. // GROUP BY a.ApplyCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID";
  1389. // #endregion
  1390. // }
  1391. // if (Type=="6")
  1392. // {
  1393. // #region 委外材料出库SQL
  1394. // sqls = @" select
  1395. // a.IssueCode as Code,
  1396. // a.InvCode,
  1397. // b.InvName,
  1398. // b.InvStd,
  1399. //b.InvUnit,
  1400. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  1401. // a.WhCode,
  1402. //a.ExtensionID
  1403. // FROM
  1404. // ICSOIssue a
  1405. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1406. // WHERE a.IssueCode in ({0}) AND a.WorkPoint = '{1}'
  1407. // GROUP BY a.IssueCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID";
  1408. // #endregion
  1409. // }
  1410. // if (Type=="7")
  1411. // {
  1412. // #region 销售发货SQL
  1413. // sqls = @" select
  1414. // a.SDNCode as Code,
  1415. // a.InvCode,
  1416. // b.InvName,
  1417. // b.InvStd,
  1418. //b.InvUnit,
  1419. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  1420. // a.WhCode,
  1421. //a.ExtensionID
  1422. // FROM
  1423. // ICSSDN a
  1424. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1425. // WHERE a.SDNCode in ({0}) AND a.WorkPoint = '{1}'
  1426. // GROUP BY a.SDNCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID";
  1427. // #endregion
  1428. // }
  1429. // if (Type=="8")
  1430. // {
  1431. // #region 其它出库SQL
  1432. // sqls = @" select
  1433. // a.OutCode as Code,
  1434. // a.InvCode,
  1435. // b.InvName,
  1436. // b.InvStd,
  1437. // b.InvUnit,
  1438. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  1439. // a.WhCode,
  1440. // a.ExtensionID
  1441. // FROM
  1442. // ICSOtherOut a
  1443. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1444. // WHERE a.OutCode in ({0}) AND a.WorkPoint = '{1}'
  1445. // GROUP BY a.OutCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID";
  1446. // #endregion
  1447. // }
  1448. // if (Type == "9")
  1449. // {
  1450. // #region 借用SQL
  1451. // sqls = @"select
  1452. // a.BrrowCode as Code,
  1453. // a.InvCode,
  1454. // b.InvName,
  1455. // b.InvStd,
  1456. //b.InvUnit,
  1457. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  1458. // a.WhCode,
  1459. //a.ExtensionID
  1460. // FROM
  1461. // ICSBrrow a
  1462. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1463. // WHERE a.BrrowCode in ({0}) AND a.WorkPoint = '{1}'
  1464. // GROUP BY a.BrrowCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID";
  1465. // #endregion
  1466. // }
  1467. // if (Type == "10")
  1468. // {
  1469. // #region 物料调拨
  1470. // sqls = @" select
  1471. // a.TransferNO as Code,
  1472. // a.InvCode,
  1473. // b.InvName,
  1474. // b.InvStd,
  1475. //b.InvUnit,
  1476. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  1477. // a.FromWarehouseCode as WhCode,
  1478. //a.ExtensionID
  1479. // FROM
  1480. // ICSTransfer a
  1481. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1482. // WHERE a.TransferNO in ({0}) AND a.WorkPoint = '{1}'
  1483. // GROUP BY a.TransferNO,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.FromWarehouseCode,a.ExtensionID";
  1484. // #endregion
  1485. // }
  1486. // if (Type == "11")
  1487. // {
  1488. // #region 两步调出
  1489. // sqls = @"select
  1490. // a.OutCode as Code,
  1491. // a.InvCode,
  1492. // b.InvName,
  1493. // b.InvStd,
  1494. //b.InvUnit,
  1495. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  1496. // a.WHCode ,
  1497. //a.ExtensionID
  1498. // from ICSOtherOut a
  1499. // INNER JOIN ICSTransfer tra ON a.TransferDetailID=tra.TransferDetailID AND a.WorkPoint=tra.WorkPoint
  1500. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1501. // WHERE a.OutCode in ({0}) AND a.WorkPoint = '{1}'
  1502. // GROUP BY a.OutCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WHCode,a.ExtensionID";
  1503. // #endregion
  1504. // }
  1505. // sqls = string.Format(sqls, ID,WorkPoint);
  1506. // sql = string.Format(sql, sqls, WorkPoint);
  1507. // DataTable table = Repository().FindDataSetBySql(sql).Tables[0];
  1508. // DataTable dtCloned = table.Clone();
  1509. // foreach (DataColumn col in dtCloned.Columns)
  1510. // {
  1511. // col.DataType = typeof(string);
  1512. // }
  1513. // foreach (DataRow row in table.Rows)
  1514. // {
  1515. // DataRow newrow = dtCloned.NewRow();
  1516. // foreach (DataColumn column in dtCloned.Columns)
  1517. // {
  1518. // newrow[column.ColumnName] = row[column.ColumnName].ToString();
  1519. // }
  1520. // dtCloned.Rows.Add(newrow);
  1521. // }
  1522. // if (Invmes.Rows.Count > 0)
  1523. // {
  1524. // dtCloned.Merge(Invmes, false);
  1525. // }
  1526. // return dtCloned;
  1527. // }
  1528. public DataTable GetICSMOPickMergeTemp(string ID, string Type)
  1529. {
  1530. string postUrlStr = System.Configuration.ConfigurationManager.AppSettings["HGDocpostUrlStr"].ToString();
  1531. string MUSER = NFine.Code.OperatorProvider.Provider.GetCurrent().UserCode;
  1532. string MUSERNAME = NFine.Code.OperatorProvider.Provider.GetCurrent().UserName;
  1533. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  1534. ID = string.IsNullOrWhiteSpace(ID) ? "''" : ID.TrimEnd(',');
  1535. string sqls = "";
  1536. #region sql
  1537. #endregion
  1538. //调拨单拣料增加逻辑,如果memo字段有条码信息,那么拣料的条码为备注条码,否则走正常逻辑
  1539. if (Type == "10")
  1540. {
  1541. string dataString = $@"select a.Memo,a.FromWarehouseCode,a.Quantity,a.TransferQuantity,a.InvCode,a.TransferNO,a.SAPSequence,a.Sequence FROM ICSTransfer a
  1542. WHERE a.TransferNO in ({ID}) AND a.WorkPoint = '{WorkPoint}'
  1543. AND ISNULL(a.Quantity, 0)>ISNULL(a.TransferQuantity, 0)
  1544. AND a.Memo is not null AND a.Memo!='' ";
  1545. var datasetModel = Repository().FindDataSetBySql(dataString);
  1546. DataTable table1 = null;
  1547. DataTable table = null;
  1548. StringBuilder updateString = new StringBuilder();
  1549. StringBuilder checklot = new StringBuilder();
  1550. string sqlString = String.Empty;
  1551. List<LotMessage> lotMessages = new List<LotMessage>();
  1552. if (datasetModel.Tables[0].Rows.Count != 0)
  1553. {
  1554. DataTable tableModel = datasetModel.Tables[0];
  1555. if (tableModel.Rows.Count > 0)
  1556. {
  1557. //循环验证条码信息是否与单据信息相符
  1558. for (int i = 0; i < tableModel.Rows.Count; i++)
  1559. {
  1560. LotMessage lotMessage = new LotMessage();
  1561. string transCode = tableModel.Rows[i]["TransferNO"].ToString();
  1562. string lotNo = tableModel.Rows[i]["Memo"].ToString();
  1563. string whCode = tableModel.Rows[i]["FromWarehouseCode"].ToString();
  1564. string sequence = tableModel.Rows[i]["Sequence"].ToString();
  1565. lotMessage.LotNo = lotNo;
  1566. lotMessage.Quantity = Convert.ToDecimal(tableModel.Rows[i]["Quantity"].ToString());
  1567. lotMessages.Add(lotMessage);
  1568. //验证信息
  1569. checklot.Append($@"IF NOT EXISTS(SELECT a.ID FROM ICSInventoryLot a WHERE a.LotNo='{lotNo}' AND a.WorkPoint='{WorkPoint}')
  1570. BEGIN
  1571. RAISERROR('{lotNo}',16,1);
  1572. RETURN
  1573. END;
  1574. IF NOT EXISTS(SELECT a.ID FROM ICSWareHouseLotInfo a WHERE a.LotNo='{tableModel.Rows[i]["Memo"]}' AND a.WorkPoint='{WorkPoint}' AND a.WarehouseCode='{whCode}')
  1575. BEGIN
  1576. RAISERROR('{lotNo}{transCode}{tableModel.Rows[i]["SAPSequence"]}',16,1);
  1577. RETURN
  1578. END;
  1579. IF NOT EXISTS(SELECT a.ID FROM ICSWareHouseLotInfo a WHERE a.LotNo='{lotNo}' AND a.WorkPoint='{WorkPoint}' AND a.WarehouseCode='{whCode}' AND a.Quantity>=A.LockQuantity+'{tableModel.Rows[i]["Quantity"]}')
  1580. BEGIN
  1581. RAISERROR('{lotNo}',16,1);
  1582. RETURN
  1583. END;
  1584. IF NOT EXISTS(SELECT a.ID FROM ICSInventoryLot a WHERE a.LotNo='{lotNo}' AND a.WorkPoint='{WorkPoint}' AND InvCode='{tableModel.Rows[i]["InvCode"]}')
  1585. BEGIN
  1586. RAISERROR('{lotNo}{transCode}{tableModel.Rows[i]["SAPSequence"]}',16,1);
  1587. RETURN
  1588. END;"
  1589. );
  1590. updateString.Append($@" INSERT INTO ICSWareHouseLotInfoLog(ID,Identification,TransCode,TransSequence,LotNo,InvCode,
  1591. FromWarehouseCode,FromLocationCode,ToWarehouseCode,ToLocationCode,Quantity,
  1592. Memo,Lock,TransType,BusinessCode,ERPUpload,ERPID,
  1593. ERPDetailID,ERPCode,ERPSequence,MUSER,MUSERName,
  1594. MTIME,WorkPoint,EATTRIBUTE1)
  1595. SELECT NEWID(),NEWID(),'{transCode}','{sequence}',a.LotNo ,a.InvCode ,
  1596. a.WarehouseCode,a.LocationCode,'','','{tableModel.Rows[i]["Quantity"]}',
  1597. '','1','15','47','0','',
  1598. '','','','{MUSER}' ,'{MUSERNAME}' ,
  1599. GETDATE() ,'{WorkPoint}' ,''
  1600. FROM ICSWareHouseLotInfo a
  1601. WHERE a.LotNo='{tableModel.Rows[i]["Memo"]}' AND a.WorkPoint='{WorkPoint}'
  1602. update ICSWareHouseLotInfo set LockQuantity=LockQuantity+'{tableModel.Rows[i]["Quantity"]}' where LotNo='{lotNo}' AND WorkPoint='{WorkPoint}';");
  1603. }
  1604. SqlHelper.CmdExecuteNonQueryLi(checklot.ToString());
  1605. sqlString = $@"SELECT
  1606. a.TransferNO AS Code,a.Sequence,a.InvCode,b.InvName,b.InvStd,b.InvUnit,
  1607. (SUM(ISNULL(a.Quantity, 0))-SUM(ISNULL(a.TransferQuantity, 0))) AS iQuantity,--
  1608. a.FromWarehouseCode As WarehouseCode,
  1609. a.Memo AS LotNO,
  1610. ISNULL(c.Quantity, 0) AS QTY,--
  1611. ISNULL(c.Quantity, 0) AS QTYLeft,
  1612. a.Quantity as SendQTY, --
  1613. c.LocationCode,
  1614. CONVERT(varchar(100),c.MTIME, 23) MTIME,
  1615. SUM(c.Quantity-c.LockQuantity) AS QTYTotal,
  1616. a.ExtensionID
  1617. from ICSTransfer a
  1618. Left JOIN ICSInventory b ON a.InvCode=b.InvCode AND a.WorkPoint=b.WorkPoint
  1619. LEFT JOIN ICSWareHouseLotInfo c ON c.LotNo=a.Memo AND a.FromWarehouseCode=c.WarehouseCode
  1620. WHERE a.TransferNO in({ID}) AND a.Memo is NOT NULL and a.Memo!=''
  1621. GROUP BY a.TransferNO,a.Sequence,a.InvCode,b.InvName,b.InvStd,b.InvUnit,
  1622. a.Quantity,a.FromWarehouseCode ,a.Memo,c.LocationCode,c.MTIME,c.Quantity,a.ExtensionID,c.LockQuantity; ";
  1623. }
  1624. //if (!String.IsNullOrEmpty(sqlString))
  1625. //{
  1626. // var dataSet1 = Repository().FindDataSetBySql(updateString.ToString()+ sqlString);
  1627. // if (dataSet1.Tables[0].Rows.Count != 0)
  1628. // {
  1629. // table1 = dataSet1.Tables[0];
  1630. // }
  1631. //}
  1632. }
  1633. string sql = $@"SELECT row_number() over ( order by c.Code,c.InvCode,d.MTIME,d.LotNO) AS rowNo,
  1634. c.Code,
  1635. c.Sequence,
  1636. c.InvCode,
  1637. c.InvName,
  1638. c.InvStd,
  1639. c.InvUnit,
  1640. c.iQuantity AS iQuantity,
  1641. c.WHCode AS WarehouseCode,
  1642. d.LotNO,
  1643. ISNULL(d.Quantity, 0) AS QTY,
  1644. ISNULL(d.Quantity, 0) AS QTYLeft,
  1645. CONVERT(decimal(18,6),0) AS SendQTY,
  1646. d.LocationCode AS LocationCode,
  1647. CONVERT(varchar(100),d.MTIME, 23) MTIME,
  1648. f.QTYTotal QTYTotal,c.ExtensionID
  1649. FROM
  1650. (select
  1651. a.TransferNO as Code,
  1652. a.Sequence,
  1653. a.InvCode,
  1654. b.InvName,
  1655. b.InvStd,
  1656. b.InvUnit,
  1657. (SUM(ISNULL(a.Quantity, 0))-SUM(ISNULL(a.TransferQuantity, 0))) AS iQuantity,
  1658. a.FromWarehouseCode as WhCode,
  1659. a.ExtensionID
  1660. FROM
  1661. ICSTransfer a
  1662. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  1663. WHERE a.TransferNO in ({ID}) AND a.WorkPoint = '{WorkPoint}' AND ISNULL(a.Quantity, 0)>ISNULL(a.TransferQuantity, 0)
  1664. and (a.Memo is null or a.Memo='' )
  1665. GROUP BY a.TransferNO,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.FromWarehouseCode,a.ExtensionID,a.Sequence) c
  1666. left join (select d.WarehouseCode,d.Quantity-d.LockQuantity as Quantity,d.INVCode, m.LotNo, d.MTIME,d.LocationCode,m.ExtensionID
  1667. from ICSWareHouseLotInfo d ,ICSInventoryLot m
  1668. where d.LotNo=m.LotNo and d.WorkPoint=m.WorkPoint
  1669. and d.WorkPoint='{WorkPoint}' AND d.Quantity-d.LockQuantity>0 AND d.Quantity>0
  1670. --AND SUBSTRING( SUBSTRING(d.LocationCode, CHARINDEX('-',d.LocationCode)+1, LEN(d.LocationCode)),0,CHARINDEX('-', SUBSTRING(d.LocationCode, CHARINDEX('-',d.LocationCode)+1, LEN(d.LocationCode)))) Not IN(SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  1671. --WHERE F_Define3='HGAreaConfig' AND F_Define1=d.WarehouseCode AND F_Define4=d.WorkPoint)
  1672. ) d
  1673. on c.InvCode=d.INVCode AND c.WhCode=d.WarehouseCode and d.ExtensionID=c.ExtensionID
  1674. LEFT JOIN (SELECT INVCode,WarehouseCode,SUM(Quantity-LockQuantity) AS QTYTotal FROM ICSWareHouseLotInfo WHERE WorkPoint='{WorkPoint}' GROUP BY INVCode,WarehouseCode) f ON c.InvCode=f.INVCode AND c.WhCode=f.WarehouseCode
  1675. order by c.Code,Convert(int,c.Sequence),d.MTIME,d.LotNO ";
  1676. var dataset = Repository().FindDataSetBySql(sql);
  1677. if (dataset.Tables[0].Rows.Count != 0)
  1678. {
  1679. table = dataset.Tables[0];
  1680. decimal qtyCount = 0;
  1681. bool remove = false;
  1682. List<int> removeList = new List<int>();
  1683. for (int i = 0; i < table.Rows.Count; i++)
  1684. {
  1685. if (lotMessages != null && lotMessages.Count > 0)
  1686. {
  1687. //排除指定条码的锁定库存数量
  1688. List<LotMessage> models = lotMessages.Where(e => e.LotNo == table.Rows[i]["LotNO"].ToString()).ToList();
  1689. if (models != null && models.Count > 0)
  1690. {
  1691. decimal quantity = models.Select(e => e.Quantity).ToList().Sum();
  1692. table.Rows[i]["QTYLeft"] = table.Rows[i]["QTYLeft"].ToString().ToDecimal() - quantity;
  1693. }
  1694. }
  1695. if (i != 0
  1696. && (!table.Rows[i]["InvCode"].ToString().Equals(table.Rows[i - 1]["InvCode"].ToString())
  1697. || !table.Rows[i]["Sequence"].ToString().Equals(table.Rows[i - 1]["Sequence"].ToString())
  1698. || !table.Rows[i]["Code"].ToString().Equals(table.Rows[i - 1]["Code"].ToString())
  1699. || !table.Rows[i]["ExtensionID"].ToString().Equals(table.Rows[i - 1]["ExtensionID"].ToString()))
  1700. )
  1701. {
  1702. qtyCount = 0;
  1703. remove = false;
  1704. }
  1705. if (table.Rows[i]["QTYLeft"].ToString().ToDecimal() == 0)
  1706. {
  1707. removeList.Add(i);
  1708. continue;
  1709. }
  1710. if (remove)
  1711. {
  1712. removeList.Add(i);
  1713. }
  1714. else
  1715. {
  1716. var lotQty = table.Rows[i]["QTYLeft"].ToString().ToDecimal();
  1717. var orderQty = table.Rows[i]["iQuantity"].ToString().ToDecimal();
  1718. qtyCount += lotQty;
  1719. foreach (DataRow dr in table.Rows)
  1720. {
  1721. if (dr["LotNO"].ToString() == table.Rows[i]["LotNO"].ToString())
  1722. {
  1723. if (qtyCount > orderQty)
  1724. {
  1725. dr["QTYLeft"] = Convert.ToDecimal(qtyCount) - Convert.ToDecimal(orderQty);
  1726. }
  1727. else
  1728. {
  1729. dr["QTYLeft"] = 0;
  1730. }
  1731. }
  1732. }
  1733. if (qtyCount >= orderQty)
  1734. {
  1735. table.Rows[i]["SendQTY"] = Convert.ToDecimal(lotQty) - (Convert.ToDecimal(qtyCount) - Convert.ToDecimal(orderQty));
  1736. remove = true;
  1737. }
  1738. else
  1739. {
  1740. table.Rows[i]["SendQTY"] = lotQty;
  1741. }
  1742. }
  1743. }
  1744. if (removeList.Count > 0)
  1745. {
  1746. removeList.Reverse();
  1747. foreach (var item in removeList)
  1748. {
  1749. table.Rows.RemoveAt(item);
  1750. }
  1751. }
  1752. try
  1753. {
  1754. #region 占料前增加验证,如果条码数量超出实际需要领料数量,直接报错
  1755. string chksql = "";
  1756. #region 物料调拨
  1757. chksql = @" select InvCode,FromWarehouseCode AS WHCode,SUM(Quantity) as Quantity from ICSTransfer
  1758. where TransferNO in ({0}) and WorkPoint='{1}' and (Memo is NULL or Memo='')
  1759. GROUP BY InvCode,FromWarehouseCode";
  1760. #endregion
  1761. chksql = string.Format(chksql, ID, WorkPoint);
  1762. var chkdata = Repository().FindDataSetBySql(chksql);
  1763. DataTable chktable = chkdata.Tables[0];
  1764. foreach (DataRow chkdr in chktable.Rows)
  1765. {
  1766. decimal ZLQty = 0;
  1767. for (int i = 0; i < table.Rows.Count; i++)
  1768. {
  1769. if (table.Rows[i]["WarehouseCode"].ToString() == chkdr["WHCode"].ToString()
  1770. && table.Rows[i]["InvCode"].ToString() == chkdr["InvCode"].ToString())
  1771. {
  1772. ZLQty += Convert.ToDecimal(table.Rows[i]["SendQTY"].ToString());
  1773. }
  1774. }
  1775. if (Convert.ToDecimal(chkdr["Quantity"]) < ZLQty)
  1776. {
  1777. throw new Exception("物料:" + chkdr["InvCode"].ToString() + "实际拣料数量大于单据需求数量,请尝试重新拣料。");
  1778. }
  1779. if (Convert.ToDecimal(chkdr["Quantity"]) > ZLQty && (Type == "2" || Type == "5" || Type == "12"))
  1780. {
  1781. chksql = @" select B.F_Define2 from ICSInventoryDetail A
  1782. INNER JOIN Sys_SRM_ItemsDetail B ON B.F_Define1=A.WHCode AND B.F_Define2=A.LocationCode AND B.F_Define4=A.WorkPoint
  1783. where INVCode='{0}' and WHCode='{1}' and WorkPoint='{2}'";
  1784. chksql = string.Format(chksql, chkdr["InvCode"].ToString(), chkdr["WHCode"].ToString(), WorkPoint);
  1785. var chkds = Repository().FindDataSetBySql(chksql);
  1786. DataTable chkdt = chkds.Tables[0];
  1787. if (chkdt.Rows.Count != 0)
  1788. {
  1789. throw new Exception("物料:" + chkdr["InvCode"].ToString() + "实际拣料数量小于单据需求数量,货柜单据必须整单拣料,请先核对库存。");
  1790. }
  1791. }
  1792. }
  1793. #endregion
  1794. if (table.Rows.Count != 0)
  1795. {
  1796. #region 拣料时增加条码出入库记录,修改库存锁定数量,以作占料处理
  1797. int Count = 1;
  1798. string BusinessCode = "10";
  1799. string TransType = "调拨申请单";
  1800. string Identification = Guid.NewGuid().ToString();
  1801. var pikTbLogTime = DateTime.Now;
  1802. string pikTbLogsql = string.Empty;
  1803. List<string> DocNoList = new List<string>();
  1804. if (Type == "2" || Type == "12" || Type == "5")
  1805. {
  1806. #region 货柜
  1807. string InspectJosn = "";
  1808. string InspectJosnHead = "";
  1809. string InspectJosnBody = "";
  1810. InspectJosn += "{";
  1811. InspectJosn += "\"IMP_ORDINI\":[";
  1812. InspectJosn += "货柜主表区域预留";
  1813. InspectJosn += "],";
  1814. InspectJosn += "\"IMP_ORDINI_RIGHE\":[";
  1815. InspectJosn += "货柜子表区域预留";
  1816. InspectJosn += "]";
  1817. InspectJosn += "}";
  1818. for (int i = 0; i < table.Rows.Count; i++)
  1819. {
  1820. string hgsql = @"select A.InvCode,A.LocationCode,B.F_Define3,C.LocationCode AS Area
  1821. from ICSWareHouseLotInfo A
  1822. INNER JOIN Sys_SRM_ItemsDetail B ON B.F_Define2=A.LocationCode AND F_Define4=A.WorkPoint AND F_ItemName='HG_Location'
  1823. INNER JOIN ICSInventoryDetail C ON C.INVCode=A.InvCode AND C.WHCode=A.WarehouseCode AND C.WorkPoint=A.WorkPoint
  1824. where A.LotNo='{0}' AND A.WorkPoint='{1}'";
  1825. hgsql = string.Format(hgsql, table.Rows[i]["LotNO"].ToString(), WorkPoint);
  1826. var hgds = Repository().FindDataSetBySql(hgsql);
  1827. if (hgds.Tables.Count == 0)
  1828. return null;
  1829. DataTable hgtable = hgds.Tables[0];
  1830. if (hgtable.Rows.Count > 0)
  1831. {
  1832. if (!DocNoList.Contains(table.Rows[i]["Code"].ToString()))
  1833. {
  1834. DocNoList.Add(table.Rows[i]["Code"].ToString());
  1835. }
  1836. InspectJosnBody += "{";
  1837. InspectJosnBody += "\"RIG_ORDINE\":\"" + table.Rows[i]["Code"].ToString() + "\",";
  1838. InspectJosnBody += "\"RIG_ARTICOLO\": \"" + hgtable.Rows[0]["InvCode"].ToString() + "\",";
  1839. InspectJosnBody += "\"RIG_SUB1\": \"\",";
  1840. InspectJosnBody += "\"RIG_SUB2\": \"\",";
  1841. InspectJosnBody += "\"RIG_ELERUOLI_GEST\": \"" + hgtable.Rows[0]["Area"].ToString() + "\",";
  1842. InspectJosnBody += "\"RIG_ELEBAIE\": \"" + hgtable.Rows[0]["F_Define3"].ToString() + "\",";
  1843. InspectJosnBody += "\"RIG_QTAR\": " + table.Rows[i]["SendQTY"].ToString() + ",";
  1844. if (i == 0)
  1845. {
  1846. InspectJosnBody += "\"RIG_HOSTINF\": \"" + table.Rows[i]["Sequence"].ToString() + "\"";
  1847. }
  1848. else
  1849. {
  1850. if (table.Rows[i]["Code"].ToString() == table.Rows[i - 1]["Code"].ToString() &&
  1851. table.Rows[i]["Sequence"].ToString() == table.Rows[i - 1]["Sequence"].ToString())
  1852. {
  1853. InspectJosnBody += "\"RIG_HOSTINF\": \"" + table.Rows[i]["Sequence"].ToString() + Count.ToString() + "\"";
  1854. Count++;
  1855. }
  1856. else
  1857. {
  1858. InspectJosnBody += "\"RIG_HOSTINF\": \"" + table.Rows[i]["Sequence"].ToString() + "\"";
  1859. Count = 1;
  1860. }
  1861. }
  1862. InspectJosnBody += "},";
  1863. }
  1864. }
  1865. InspectJosnBody = InspectJosnBody.TrimEnd(',');
  1866. foreach (string DocNo in DocNoList)
  1867. {
  1868. InspectJosnHead += "{";
  1869. InspectJosnHead += "\"ORD_ORDINE\":\"" + DocNo.TrimStart('\'').TrimEnd('\'') + "\",";
  1870. InspectJosnHead += "\"ORD_DES\":\"" + TransType + "\",";
  1871. InspectJosnHead += "\"ORD_TIPOOP\":\"P\",";
  1872. InspectJosnHead += "\"ORD_CLIENTE\":\"" + WorkPoint + "\"";
  1873. InspectJosnHead += "},";
  1874. }
  1875. InspectJosnHead = InspectJosnHead.TrimEnd(',');
  1876. if (InspectJosnBody != "")
  1877. {
  1878. InspectJosn = InspectJosn.Replace("货柜主表区域预留", InspectJosnHead);
  1879. InspectJosn = InspectJosn.Replace("货柜子表区域预留", InspectJosnBody);
  1880. if (Convert.ToBoolean(System.Configuration.ConfigurationManager.AppSettings["UploadERP"]))
  1881. {
  1882. string callresult = "";
  1883. #region 货柜接口调用前日志
  1884. object logID = Guid.NewGuid();
  1885. string logsql = @"insert into ICSWMS_HGLog
  1886. values
  1887. ('{0}',GETDATE(),'{1}','{2}','{3}','{4}','{5}')";
  1888. logsql = string.Format(logsql, logID, InspectJosn, "", WorkPoint, MUSER, MUSERNAME);
  1889. SqlHelper.CmdExecuteNonQueryLi(logsql);
  1890. #endregion
  1891. callresult = HTTPHelper.RestFulGet(InspectJosn, postUrlStr);
  1892. #region 货柜接口调用后日志
  1893. logsql = @"update ICSWMS_HGLog set ReturnResult='{0}'
  1894. where ID='{1}'";
  1895. logsql = string.Format(logsql, callresult, logID);
  1896. SqlHelper.CmdExecuteNonQueryLi(logsql);
  1897. #endregion
  1898. }
  1899. }
  1900. #endregion
  1901. }
  1902. foreach (DataRow PickLog in table.Rows)
  1903. {
  1904. pikTbLogsql += @"IF NOT EXISTS(SELECT a.ID FROM ICSWareHouseLotInfo a WHERE a.LotNo='{9}' AND a.WorkPoint='{8}' AND a.Quantity>=A.LockQuantity+'{3}')
  1905. BEGIN
  1906. RAISERROR('{9}', 16, 1);
  1907. RETURN
  1908. END;
  1909. IF NOT EXISTS(SELECT TransCode FROM ICSWareHouseLotInfoLog WHERE TransCode='{1}' AND TransSequence='{2}' AND LotNo='{9}' AND WorkPoint='{8}' AND TransType='15')
  1910. BEGIN
  1911. INSERT INTO ICSWareHouseLotInfoLog(ID,Identification,TransCode,TransSequence,LotNo,InvCode,
  1912. FromWarehouseCode,FromLocationCode,ToWarehouseCode,ToLocationCode,Quantity,
  1913. Memo,Lock,TransType,BusinessCode,ERPUpload,ERPID,
  1914. ERPDetailID,ERPCode,ERPSequence,MUSER,MUSERName,
  1915. MTIME,WorkPoint,EATTRIBUTE1)
  1916. SELECT NEWID(),'{0}','{1}','{2}',a.LotNo ,a.InvCode ,
  1917. a.WarehouseCode,a.LocationCode,'','','{3}',
  1918. '','1','15','{4}','0','',
  1919. '','','','{5}' ,'{6}' ,
  1920. '{7}' ,'{8}' ,''
  1921. FROM ICSWareHouseLotInfo a
  1922. WHERE a.LotNo='{9}' AND a.WorkPoint='{8}'
  1923. update ICSWareHouseLotInfo set LockQuantity=LockQuantity+'{3}' where LotNo='{9}' AND WorkPoint='{8}'
  1924. END
  1925. UPDATE ICSMOApply SET MUSER='{6}' WHERE ApplyCode='{1}' and Sequence='{2}' ; ";
  1926. pikTbLogsql = string.Format(pikTbLogsql, Identification, PickLog["Code"].ToString(), PickLog["Sequence"].ToString(), PickLog["SendQTY"].ToString()
  1927. , BusinessCode, MUSER, MUSERNAME, pikTbLogTime, WorkPoint, PickLog["LotNO"].ToString());
  1928. }
  1929. SqlHelper.CmdExecuteNonQueryLi(pikTbLogsql + updateString.ToString());
  1930. #endregion
  1931. }
  1932. //查询有条码的拣料信息
  1933. if (!String.IsNullOrEmpty(sqlString))
  1934. {
  1935. var dataSet1 = Repository().FindDataSetBySql(sqlString);
  1936. if (dataSet1.Tables[0].Rows.Count != 0)
  1937. {
  1938. table1 = dataSet1.Tables[0];
  1939. }
  1940. }
  1941. //if (table1 != null)
  1942. //{
  1943. // table.Merge(table1);
  1944. //}
  1945. //var result = ConvertCellToString(table);
  1946. //if (Invmes.Rows.Count > 0)
  1947. //{
  1948. // result.Merge(Invmes, false);
  1949. //}
  1950. //return result;
  1951. }
  1952. catch (Exception ex)
  1953. {
  1954. throw new Exception(ex.Message);
  1955. }
  1956. }
  1957. else
  1958. {
  1959. if (!String.IsNullOrEmpty(updateString.ToString()))
  1960. {
  1961. SqlHelper.CmdExecuteNonQueryLi(updateString.ToString());
  1962. }
  1963. //查询有条码的拣料信息
  1964. if (!String.IsNullOrEmpty(sqlString))
  1965. {
  1966. var dataSet1 = Repository().FindDataSetBySql(sqlString);
  1967. if (dataSet1.Tables[0].Rows.Count != 0)
  1968. {
  1969. table1 = dataSet1.Tables[0];
  1970. }
  1971. }
  1972. }
  1973. if (table1 != null && table != null)
  1974. {
  1975. table.Merge(table1);
  1976. }
  1977. else if (table == null && table1 != null)
  1978. {
  1979. table = table1;
  1980. }
  1981. else if (table1 == null && table == null)
  1982. {
  1983. return null;
  1984. }
  1985. var result = ConvertCellToString(table);
  1986. if (Invmes.Rows.Count > 0)
  1987. {
  1988. result.Merge(Invmes, false);
  1989. }
  1990. return result;
  1991. }
  1992. else
  1993. {
  1994. if (Type == "1")
  1995. {
  1996. #region 工单备料sql
  1997. sqls = @" SELECT
  1998. c.MOCode as Code,
  1999. c.Sequence+'~'+a.Sequence as Sequence,
  2000. a.InvCode,
  2001. b.InvName,
  2002. b.InvStd,
  2003. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2004. a.WhCode,
  2005. b.InvUnit,
  2006. a.ExtensionID
  2007. FROM
  2008. ICSMOPick a
  2009. inner join ICSMO c on a.MODetailID=c.MODetailID and a.WorkPoint=c.WorkPoint
  2010. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2011. WHERE c.MOCode in ({0}) AND a.WorkPoint = '{1}'
  2012. GROUP BY c.MOCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,c.Sequence+'~'+a.Sequence";
  2013. #endregion
  2014. }
  2015. if (Type == "2" || Type == "12")
  2016. {
  2017. sqls = @"select
  2018. a.ApplyCode as Code,a.Sequence, a.InvCode, b.InvName, b.InvStd, b.InvUnit, (SUM(ISNULL(a.Quantity, 0))-SUM(ISNULL(a.IssueQuantity, 0))) AS iQuantity, a.WhCode,a.ExtensionID
  2019. FROM
  2020. ICSMOApply a
  2021. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2022. WHERE a.ApplyCode in ({0}) AND a.WorkPoint = '{1}' AND ISNULL(a.Quantity, 0)>ISNULL(a.IssueQuantity, 0)
  2023. GROUP BY a.ApplyCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,a.Sequence";
  2024. }
  2025. if (Type == "3")
  2026. {
  2027. #region 工单材料出库SQL
  2028. sqls = @" select
  2029. a.IssueCode as Code,
  2030. a.Sequence,
  2031. a.InvCode,
  2032. b.InvName,
  2033. b.InvStd,
  2034. b.InvUnit,
  2035. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2036. a.WhCode,
  2037. a.ExtensionID
  2038. FROM
  2039. ICSMOIssue a
  2040. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2041. WHERE a.IssueCode in ({0}) AND a.WorkPoint = '{1}'
  2042. GROUP BY a.IssueCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,a.Sequence";
  2043. #endregion
  2044. }
  2045. if (Type == "4")
  2046. {
  2047. #region 委外备料SQL
  2048. sqls = @" select
  2049. c.OOCode as Code,
  2050. c.Sequence+'~'+a.Sequence as Sequence,
  2051. a.InvCode,
  2052. b.InvName,
  2053. b.InvStd,
  2054. b.InvUnit,
  2055. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2056. a.WhCode,
  2057. a.ExtensionID
  2058. FROM
  2059. ICSOOPick a
  2060. left join ICSOutsourcingOrder c on a.OODetailID=c.OODetailID and a.WorkPoint=c.WorkPoint
  2061. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2062. WHERE c.OOCode in ({0}) AND a.WorkPoint = '{1}'
  2063. GROUP BY c.OOCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode, a.ExtensionID,c.Sequence+'~'+a.Sequence";
  2064. #endregion
  2065. }
  2066. if (Type == "5")
  2067. {
  2068. #region 委外领料SQL
  2069. sqls = @"select
  2070. a.ApplyCode as Code,
  2071. a.Sequence,
  2072. a.InvCode,
  2073. b.InvName,
  2074. b.InvStd,
  2075. b.InvUnit,
  2076. (SUM(ISNULL(a.Quantity, 0))-SUM(ISNULL(a.IssueQuantity,0))) AS iQuantity,
  2077. a.WhCode,a.ExtensionID
  2078. FROM
  2079. ICSOApply a
  2080. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2081. WHERE a.ApplyCode in ({0}) AND a.WorkPoint = '{1}' AND ISNULL(a.Quantity, 0)>ISNULL(a.IssueQuantity, 0)
  2082. GROUP BY a.ApplyCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,a.Sequence";
  2083. #endregion
  2084. }
  2085. if (Type == "6")
  2086. {
  2087. #region 委外材料出库SQL
  2088. sqls = @" select
  2089. a.IssueCode as Code,
  2090. a.Sequence,
  2091. a.InvCode,
  2092. b.InvName,
  2093. b.InvStd,
  2094. b.InvUnit,
  2095. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2096. a.WhCode,
  2097. a.ExtensionID
  2098. FROM
  2099. ICSOIssue a
  2100. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2101. WHERE a.IssueCode in ({0}) AND a.WorkPoint = '{1}'
  2102. GROUP BY a.IssueCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,a.Sequence";
  2103. #endregion
  2104. }
  2105. if (Type == "7")
  2106. {
  2107. #region 销售发货SQL
  2108. sqls = @" select
  2109. a.SDNCode as Code,
  2110. a.Sequence,
  2111. a.InvCode,
  2112. b.InvName,
  2113. b.InvStd,
  2114. b.InvUnit,
  2115. (SUM(ISNULL(a.Quantity, 0))-SUM(ISNULL(a.SDNQuantity, 0))) AS iQuantity,
  2116. a.WhCode,
  2117. a.ExtensionID
  2118. FROM
  2119. ICSSDN a
  2120. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2121. WHERE a.SDNCode in ({0}) AND a.WorkPoint = '{1}' AND ISNULL(a.Quantity, 0)>ISNULL(a.SDNQuantity, 0)
  2122. GROUP BY a.SDNCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,a.Sequence";
  2123. #endregion
  2124. }
  2125. if (Type == "8")
  2126. {
  2127. #region 其它出库SQL
  2128. sqls = @" select
  2129. a.OutCode as Code,
  2130. a.Sequence,
  2131. a.InvCode,
  2132. b.InvName,
  2133. b.InvStd,
  2134. b.InvUnit,
  2135. (SUM(ISNULL(a.Quantity, 0))-SUM(ISNULL(a.OutQuantity, 0))) AS iQuantity,
  2136. a.WhCode,
  2137. a.ExtensionID
  2138. FROM
  2139. ICSOtherOut a
  2140. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2141. WHERE a.OutCode in ({0}) AND a.WorkPoint = '{1}' AND ISNULL(a.Quantity, 0)>ISNULL(a.OutQuantity, 0)
  2142. GROUP BY a.OutCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,a.Sequence";
  2143. #endregion
  2144. }
  2145. if (Type == "9")
  2146. {
  2147. #region 借用SQL
  2148. sqls = @"select
  2149. a.BrrowCode as Code,
  2150. a.Sequence,
  2151. a.InvCode,
  2152. b.InvName,
  2153. b.InvStd,
  2154. b.InvUnit,
  2155. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2156. a.WhCode,
  2157. a.ExtensionID
  2158. FROM
  2159. ICSBrrow a
  2160. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2161. WHERE a.BrrowCode in ({0}) AND a.WorkPoint = '{1}'
  2162. GROUP BY a.BrrowCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,a.Sequence";
  2163. #endregion
  2164. }
  2165. if (Type == "10")
  2166. {
  2167. #region 物料调拨
  2168. sqls = @"select
  2169. a.TransferNO as Code,
  2170. a.Sequence,
  2171. a.InvCode,
  2172. b.InvName,
  2173. b.InvStd,
  2174. b.InvUnit,
  2175. (SUM(ISNULL(a.Quantity, 0))-SUM(ISNULL(a.TransferQuantity, 0))) AS iQuantity,
  2176. a.FromWarehouseCode as WhCode,
  2177. a.ExtensionID
  2178. FROM
  2179. ICSTransfer a
  2180. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2181. WHERE a.TransferNO in ({0}) AND a.WorkPoint = '{1}' AND ISNULL(a.Quantity, 0)>ISNULL(a.TransferQuantity, 0)
  2182. and a.Memo is null
  2183. GROUP BY a.TransferNO,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.FromWarehouseCode,a.ExtensionID,a.Sequence";
  2184. #endregion
  2185. }
  2186. if (Type == "11")
  2187. {
  2188. #region 两步调出
  2189. sqls = @"select
  2190. a.OutCode as Code,
  2191. a.Sequence,
  2192. a.InvCode,
  2193. b.InvName,
  2194. b.InvStd,
  2195. b.InvUnit,
  2196. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2197. a.WHCode ,
  2198. a.ExtensionID
  2199. from ICSOtherOut a
  2200. INNER JOIN ICSTransfer tra ON a.TransferDetailID=tra.TransferDetailID AND a.WorkPoint=tra.WorkPoint
  2201. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2202. WHERE a.OutCode in ({0}) AND a.WorkPoint = '{1}'
  2203. GROUP BY a.OutCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WHCode,a.ExtensionID,a.Sequence";
  2204. #endregion
  2205. }
  2206. sqls = string.Format(sqls, ID, WorkPoint);
  2207. string sql = $@"SELECT row_number() over ( order by c.Code,c.InvCode,d.MTIME,d.LotNO) AS rowNo,
  2208. c.Code,
  2209. c.Sequence,
  2210. c.InvCode,
  2211. c.InvName,
  2212. c.InvStd,
  2213. c.InvUnit,
  2214. c.iQuantity AS iQuantity,
  2215. c.WHCode AS WarehouseCode,
  2216. d.LotNO,
  2217. ISNULL(d.Quantity, 0) AS QTY,
  2218. ISNULL(d.Quantity, 0) AS QTYLeft,
  2219. CONVERT(decimal(18,6),0) AS SendQTY,
  2220. d.LocationCode AS LocationCode,
  2221. CONVERT(varchar(100),d.MTIME, 23) MTIME,
  2222. f.QTYTotal QTYTotal,c.ExtensionID
  2223. FROM
  2224. ({sqls}) c
  2225. left join (select d.WarehouseCode,d.Quantity-d.LockQuantity as Quantity,d.INVCode, m.LotNo, d.MTIME,d.LocationCode,m.ExtensionID
  2226. from ICSWareHouseLotInfo d ,ICSInventoryLot m
  2227. where d.LotNo=m.LotNo and d.WorkPoint=m.WorkPoint
  2228. and d.WorkPoint='{WorkPoint}' AND d.Quantity-d.LockQuantity>0 AND d.Quantity>0
  2229. --AND SUBSTRING( SUBSTRING(d.LocationCode, CHARINDEX('-',d.LocationCode)+1, LEN(d.LocationCode)),0,CHARINDEX('-', SUBSTRING(d.LocationCode, CHARINDEX('-',d.LocationCode)+1, LEN(d.LocationCode)))) Not IN(SELECT F_Define2 FROM Sys_SRM_ItemsDetail
  2230. --WHERE F_Define3='HGAreaConfig' AND F_Define1=d.WarehouseCode AND F_Define4=d.WorkPoint)
  2231. ) d
  2232. on c.InvCode=d.INVCode AND c.WhCode=d.WarehouseCode and d.ExtensionID=c.ExtensionID
  2233. LEFT JOIN (SELECT INVCode,WarehouseCode,SUM(Quantity-LockQuantity) AS QTYTotal FROM ICSWareHouseLotInfo WHERE WorkPoint='{WorkPoint}' GROUP BY INVCode,WarehouseCode) f ON c.InvCode=f.INVCode AND c.WhCode=f.WarehouseCode
  2234. order by c.Code,Convert(int,c.Sequence),d.MTIME,d.LotNO ";
  2235. var dataset = Repository().FindDataSetBySql(sql);
  2236. if (dataset.Tables[0].Rows.Count == 0)
  2237. return null;
  2238. DataTable table = dataset.Tables[0];
  2239. decimal qtyCount = 0;
  2240. bool remove = false;
  2241. List<int> removeList = new List<int>();
  2242. for (int i = 0; i < table.Rows.Count; i++)
  2243. {
  2244. if (i != 0
  2245. && (!table.Rows[i]["InvCode"].ToString().Equals(table.Rows[i - 1]["InvCode"].ToString())
  2246. || !table.Rows[i]["Sequence"].ToString().Equals(table.Rows[i - 1]["Sequence"].ToString())
  2247. || !table.Rows[i]["Code"].ToString().Equals(table.Rows[i - 1]["Code"].ToString())
  2248. || !table.Rows[i]["ExtensionID"].ToString().Equals(table.Rows[i - 1]["ExtensionID"].ToString()))
  2249. )
  2250. {
  2251. qtyCount = 0;
  2252. remove = false;
  2253. }
  2254. if (table.Rows[i]["QTYLeft"].ToString().ToDecimal() == 0)
  2255. {
  2256. removeList.Add(i);
  2257. continue;
  2258. }
  2259. if (remove)
  2260. {
  2261. removeList.Add(i);
  2262. }
  2263. else
  2264. {
  2265. var lotQty = table.Rows[i]["QTYLeft"].ToString().ToDecimal();
  2266. var orderQty = table.Rows[i]["iQuantity"].ToString().ToDecimal();
  2267. qtyCount += lotQty;
  2268. foreach (DataRow dr in table.Rows)
  2269. {
  2270. if (dr["LotNO"].ToString() == table.Rows[i]["LotNO"].ToString())
  2271. {
  2272. if (qtyCount > orderQty)
  2273. {
  2274. dr["QTYLeft"] = Convert.ToDecimal(qtyCount) - Convert.ToDecimal(orderQty);
  2275. }
  2276. else
  2277. {
  2278. dr["QTYLeft"] = 0;
  2279. }
  2280. }
  2281. }
  2282. if (qtyCount >= orderQty)
  2283. {
  2284. table.Rows[i]["SendQTY"] = Convert.ToDecimal(lotQty) - (Convert.ToDecimal(qtyCount) - Convert.ToDecimal(orderQty));
  2285. remove = true;
  2286. }
  2287. else
  2288. {
  2289. table.Rows[i]["SendQTY"] = lotQty;
  2290. }
  2291. }
  2292. }
  2293. if (removeList.Count > 0)
  2294. {
  2295. removeList.Reverse();
  2296. foreach (var item in removeList)
  2297. {
  2298. table.Rows.RemoveAt(item);
  2299. }
  2300. }
  2301. try
  2302. {
  2303. #region 占料前增加验证,如果条码数量超出实际需要领料数量,直接报错
  2304. string chksql = "";
  2305. if (Type == "2" || Type == "12")
  2306. {
  2307. chksql = @" select InvCode,WHCode,SUM(Quantity) as Quantity from ICSMOApply
  2308. where ApplyCode in ({0}) and WorkPoint='{1}'
  2309. GROUP BY InvCode,WHCode";
  2310. }
  2311. if (Type == "5")
  2312. {
  2313. #region 委外领料SQL
  2314. chksql = @" select InvCode,WHCode,SUM(Quantity) as Quantity from ICSOApply
  2315. where ApplyCode in ({0}) and WorkPoint='{1}'
  2316. GROUP BY InvCode,WHCode";
  2317. #endregion
  2318. }
  2319. if (Type == "7")
  2320. {
  2321. #region 销售发货SQL
  2322. chksql = @" select InvCode,WHCode,SUM(Quantity) as Quantity from ICSSDN
  2323. where SDNCode in ({0}) and WorkPoint='{1}'
  2324. GROUP BY InvCode,WHCode";
  2325. #endregion
  2326. }
  2327. if (Type == "8")
  2328. {
  2329. #region 其它出库SQL
  2330. chksql = @" select InvCode,WHCode,SUM(Quantity) as Quantity from ICSOtherOut
  2331. where OutCode in ({0}) and WorkPoint='{1}'
  2332. GROUP BY InvCode,WHCode";
  2333. #endregion
  2334. }
  2335. if (Type == "10")
  2336. {
  2337. #region 物料调拨
  2338. chksql = @" select InvCode,FromWarehouseCode AS WHCode,SUM(Quantity) as Quantity from ICSTransfer
  2339. where TransferNO in ({0}) and WorkPoint='{1}'
  2340. GROUP BY InvCode,FromWarehouseCode";
  2341. #endregion
  2342. }
  2343. chksql = string.Format(chksql, ID, WorkPoint);
  2344. var chkdata = Repository().FindDataSetBySql(chksql);
  2345. DataTable chktable = chkdata.Tables[0];
  2346. foreach (DataRow chkdr in chktable.Rows)
  2347. {
  2348. decimal ZLQty = 0;
  2349. for (int i = 0; i < table.Rows.Count; i++)
  2350. {
  2351. if (table.Rows[i]["WarehouseCode"].ToString() == chkdr["WHCode"].ToString()
  2352. && table.Rows[i]["InvCode"].ToString() == chkdr["InvCode"].ToString())
  2353. {
  2354. ZLQty += Convert.ToDecimal(table.Rows[i]["SendQTY"].ToString());
  2355. }
  2356. }
  2357. if (Convert.ToDecimal(chkdr["Quantity"]) < ZLQty)
  2358. {
  2359. throw new Exception("物料:" + chkdr["InvCode"].ToString() + "实际拣料数量大于单据需求数量,请尝试重新拣料。");
  2360. }
  2361. if (Convert.ToDecimal(chkdr["Quantity"]) > ZLQty && (Type == "2" || Type == "5" || Type == "12"))
  2362. {
  2363. chksql = @" select B.F_Define2 from ICSInventoryDetail A
  2364. INNER JOIN Sys_SRM_ItemsDetail B ON B.F_Define1=A.WHCode AND B.F_Define2=A.LocationCode AND B.F_Define4=A.WorkPoint
  2365. where INVCode='{0}' and WHCode='{1}' and WorkPoint='{2}'";
  2366. chksql = string.Format(chksql, chkdr["InvCode"].ToString(), chkdr["WHCode"].ToString(), WorkPoint);
  2367. var chkds = Repository().FindDataSetBySql(chksql);
  2368. DataTable chkdt = chkds.Tables[0];
  2369. if (chkdt.Rows.Count != 0)
  2370. {
  2371. throw new Exception("物料:" + chkdr["InvCode"].ToString() + "实际拣料数量小于单据需求数量,货柜单据必须整单拣料,请先核对库存。");
  2372. }
  2373. }
  2374. }
  2375. #endregion
  2376. if (table.Rows.Count != 0)
  2377. {
  2378. #region 拣料时增加条码出入库记录,修改库存锁定数量,以作占料处理
  2379. string ccInspectJosn = "";
  2380. string ForkLiftUrl = System.Configuration.ConfigurationManager.AppSettings["ForkLiftUrl"];
  2381. string cclogsql = @"";
  2382. int Count = 1;
  2383. string BusinessCode = string.Empty;
  2384. string TransType = "";
  2385. if (Type == "2") { BusinessCode = "13"; TransType = "生产发料-领料申请单"; }
  2386. if (Type == "12") { BusinessCode = "14"; TransType = "生产发料-领料申请单"; }
  2387. if (Type == "5") { BusinessCode = "6"; TransType = "委外发料-委外领料申请单"; }
  2388. if (Type == "7") { BusinessCode = "19"; TransType = "销售发货-销售发货单"; }
  2389. if (Type == "8") { BusinessCode = "24"; TransType = "杂发"; }
  2390. if (Type == "10") { BusinessCode = "47"; TransType = "调拨申请单"; }
  2391. string Identification = Guid.NewGuid().ToString();
  2392. var pikTbLogTime = DateTime.Now;
  2393. string pikTbLogsql = string.Empty;
  2394. List<string> DocNoList = new List<string>();
  2395. if (Type == "2" || Type == "12" || Type == "5")
  2396. {
  2397. string ccsql = @"select B.F_Id from ICSInventoryDetail A
  2398. INNER JOIN Sys_SRM_ItemsDetail B ON B.F_Define1=A.WHCode AND B.F_Define2=A.LocationCode AND B.F_Define4=A.WorkPoint
  2399. where INVCode='{0}' and WHCode='{1}' and WorkPoint='{2}' AND B.F_ItemCode Like 'ForkLiftAreaConfig%'";
  2400. ccsql = string.Format(ccsql, table.Rows[0]["InvCode"].ToString(), table.Rows[0]["WarehouseCode"].ToString()
  2401. , WorkPoint);
  2402. var ccds = Repository().FindDataSetBySql(ccsql);
  2403. DataTable cctable = ccds.Tables[0];
  2404. if (cctable.Rows.Count != 0)
  2405. {
  2406. List<string> SourceBinList = new List<string>();
  2407. #region 窄巷道
  2408. foreach (DataRow dr in table.Rows)
  2409. {
  2410. if (!SourceBinList.Contains(dr["LocationCode"].ToString()))
  2411. {
  2412. SourceBinList.Add(dr["LocationCode"].ToString());
  2413. if (Convert.ToBoolean(System.Configuration.ConfigurationManager.AppSettings["UploadForkLift"]))
  2414. {
  2415. string Year = DateTime.Now.Year.ToString();
  2416. string Month = DateTime.Now.Month.ToString().PadLeft(2, '0');
  2417. string Day = DateTime.Now.Day.ToString().PadLeft(2, '0');
  2418. string Pre = "CC" + Year + Month + Day;
  2419. string serialsql = "EXEC Addins_GetSerialCode '{0}','{1}','{2}','{3}',{4}";
  2420. serialsql = string.Format(serialsql, "1701", "ICSForkLiftTaskLog", "TaskCode", Pre, 4);
  2421. string TaskCode = DbHelper.ExecuteTable(DbHelper.ConnectionString, CommandType.Text, serialsql, true, null).Rows[0][0].ToString();
  2422. string SerialNum = DateTime.Now.Hour.ToString().PadLeft(2, '0');
  2423. ccInspectJosn += "{";
  2424. ccInspectJosn += "\"ID\":\"" + TaskCode + "\",";//任务编号
  2425. ccInspectJosn += "\"TaskType\": \"PTWY\",";//任务类型
  2426. ccInspectJosn += "\"SourceBin\": \"" + dr["LocationCode"].ToString() + "\",";//起始点位
  2427. ccInspectJosn += "}";
  2428. #region 记录叉车的任务编号及相关信息
  2429. #endregion
  2430. cclogsql += @"INSERT INTO ICSForkLiftTaskLog
  2431. (ID,TaskCode,ContainerCode,TaskType,StartLocation,EndLocation,MTIME,WorkPoint)
  2432. select NEWID(),'{0}','','PICK','{1}','',GETDATE(),'1701'";
  2433. cclogsql = string.Format(cclogsql, TaskCode, dr["LocationCode"].ToString());
  2434. }
  2435. }
  2436. }
  2437. #endregion
  2438. }
  2439. else
  2440. {
  2441. #region 货柜
  2442. string InspectJosn = "";
  2443. string InspectJosnHead = "";
  2444. string InspectJosnBody = "";
  2445. InspectJosn += "{";
  2446. InspectJosn += "\"IMP_ORDINI\":[";
  2447. InspectJosn += "货柜主表区域预留";
  2448. InspectJosn += "],";
  2449. InspectJosn += "\"IMP_ORDINI_RIGHE\":[";
  2450. InspectJosn += "货柜子表区域预留";
  2451. InspectJosn += "]";
  2452. InspectJosn += "}";
  2453. for (int i = 0; i < table.Rows.Count; i++)
  2454. {
  2455. string hgsql = @"select A.InvCode,A.LocationCode,B.F_Define3,C.LocationCode AS Area
  2456. from ICSWareHouseLotInfo A
  2457. INNER JOIN Sys_SRM_ItemsDetail B ON B.F_Define2=A.LocationCode AND F_Define4=A.WorkPoint AND F_ItemName='HG_Location'
  2458. INNER JOIN ICSInventoryDetail C ON C.INVCode=A.InvCode AND C.WHCode=A.WarehouseCode AND C.WorkPoint=A.WorkPoint
  2459. where A.LotNo='{0}' AND A.WorkPoint='{1}'";
  2460. hgsql = string.Format(hgsql, table.Rows[i]["LotNO"].ToString(), WorkPoint);
  2461. var hgds = Repository().FindDataSetBySql(hgsql);
  2462. if (hgds.Tables.Count == 0)
  2463. return null;
  2464. DataTable hgtable = hgds.Tables[0];
  2465. if (hgtable.Rows.Count > 0)
  2466. {
  2467. if (!DocNoList.Contains(table.Rows[i]["Code"].ToString()))
  2468. {
  2469. DocNoList.Add(table.Rows[i]["Code"].ToString());
  2470. }
  2471. InspectJosnBody += "{";
  2472. InspectJosnBody += "\"RIG_ORDINE\":\"" + table.Rows[i]["Code"].ToString() + "\",";
  2473. InspectJosnBody += "\"RIG_ARTICOLO\": \"" + hgtable.Rows[0]["InvCode"].ToString() + "\",";
  2474. InspectJosnBody += "\"RIG_SUB1\": \"\",";
  2475. InspectJosnBody += "\"RIG_SUB2\": \"\",";
  2476. InspectJosnBody += "\"RIG_ELERUOLI_GEST\": \"" + hgtable.Rows[0]["Area"].ToString() + "\",";
  2477. InspectJosnBody += "\"RIG_ELEBAIE\": \"" + hgtable.Rows[0]["F_Define3"].ToString() + "\",";
  2478. InspectJosnBody += "\"RIG_QTAR\": " + table.Rows[i]["SendQTY"].ToString() + ",";
  2479. if (i == 0)
  2480. {
  2481. InspectJosnBody += "\"RIG_HOSTINF\": \"" + table.Rows[i]["Sequence"].ToString() + "\"";
  2482. }
  2483. else
  2484. {
  2485. if (table.Rows[i]["Code"].ToString() == table.Rows[i - 1]["Code"].ToString() &&
  2486. table.Rows[i]["Sequence"].ToString() == table.Rows[i - 1]["Sequence"].ToString())
  2487. {
  2488. InspectJosnBody += "\"RIG_HOSTINF\": \"" + table.Rows[i]["Sequence"].ToString() + Count.ToString() + "\"";
  2489. Count++;
  2490. }
  2491. else
  2492. {
  2493. InspectJosnBody += "\"RIG_HOSTINF\": \"" + table.Rows[i]["Sequence"].ToString() + "\"";
  2494. Count = 1;
  2495. }
  2496. }
  2497. InspectJosnBody += "},";
  2498. }
  2499. }
  2500. InspectJosnBody = InspectJosnBody.TrimEnd(',');
  2501. foreach (string DocNo in DocNoList)
  2502. {
  2503. InspectJosnHead += "{";
  2504. InspectJosnHead += "\"ORD_ORDINE\":\"" + DocNo.TrimStart('\'').TrimEnd('\'') + "\",";
  2505. InspectJosnHead += "\"ORD_DES\":\"" + TransType + "\",";
  2506. InspectJosnHead += "\"ORD_TIPOOP\":\"P\",";
  2507. InspectJosnHead += "\"ORD_CLIENTE\":\"" + WorkPoint + "\"";
  2508. InspectJosnHead += "},";
  2509. }
  2510. InspectJosnHead = InspectJosnHead.TrimEnd(',');
  2511. if (InspectJosnBody != "")
  2512. {
  2513. InspectJosn = InspectJosn.Replace("货柜主表区域预留", InspectJosnHead);
  2514. InspectJosn = InspectJosn.Replace("货柜子表区域预留", InspectJosnBody);
  2515. if (Convert.ToBoolean(System.Configuration.ConfigurationManager.AppSettings["UploadERP"]))
  2516. {
  2517. string callresult = "";
  2518. #region 货柜接口调用前日志
  2519. object logID = Guid.NewGuid();
  2520. string logsql = @"insert into ICSWMS_HGLog
  2521. values
  2522. ('{0}',GETDATE(),'{1}','{2}','{3}','{4}','{5}')";
  2523. logsql = string.Format(logsql, logID, InspectJosn, "", WorkPoint, MUSER, MUSERNAME);
  2524. SqlHelper.CmdExecuteNonQueryLi(logsql);
  2525. #endregion
  2526. callresult = HTTPHelper.RestFulGet(InspectJosn, postUrlStr);
  2527. #region 货柜接口调用后日志
  2528. logsql = @"update ICSWMS_HGLog set ReturnResult='{0}'
  2529. where ID='{1}'";
  2530. logsql = string.Format(logsql, callresult, logID);
  2531. SqlHelper.CmdExecuteNonQueryLi(logsql);
  2532. #endregion
  2533. }
  2534. }
  2535. #endregion
  2536. }
  2537. }
  2538. foreach (DataRow PickLog in table.Rows)
  2539. {
  2540. pikTbLogsql += @" IF NOT EXISTS(SELECT TransCode FROM ICSWareHouseLotInfoLog WHERE TransCode='{1}' AND TransSequence='{2}' AND LotNo='{9}' AND WorkPoint='{8}' AND TransType='15')
  2541. BEGIN
  2542. INSERT INTO ICSWareHouseLotInfoLog(ID,Identification,TransCode,TransSequence,LotNo,InvCode,
  2543. FromWarehouseCode,FromLocationCode,ToWarehouseCode,ToLocationCode,Quantity,
  2544. Memo,Lock,TransType,BusinessCode,ERPUpload,ERPID,
  2545. ERPDetailID,ERPCode,ERPSequence,MUSER,MUSERName,
  2546. MTIME,WorkPoint,EATTRIBUTE1)
  2547. SELECT NEWID(),'{0}','{1}','{2}',a.LotNo ,a.InvCode ,
  2548. a.WarehouseCode,a.LocationCode,'','','{3}',
  2549. '','1','15','{4}','0','',
  2550. '','','','{5}' ,'{6}' ,
  2551. '{7}' ,'{8}' ,''
  2552. FROM ICSWareHouseLotInfo a
  2553. WHERE a.LotNo='{9}' AND a.WorkPoint='{8}'
  2554. update ICSWareHouseLotInfo set LockQuantity=LockQuantity+'{3}' where LotNo='{9}' AND WorkPoint='{8}'
  2555. END
  2556. UPDATE ICSMOApply SET MUSER='{6}' WHERE ApplyCode='{1}' and Sequence='{2}' ; ";
  2557. pikTbLogsql = string.Format(pikTbLogsql, Identification, PickLog["Code"].ToString(), PickLog["Sequence"].ToString(), PickLog["SendQTY"].ToString()
  2558. , BusinessCode, MUSER, MUSERNAME, pikTbLogTime, WorkPoint, PickLog["LotNO"].ToString());
  2559. }
  2560. CmdExecuteNonQueryWithAPI(pikTbLogsql, cclogsql, ccInspectJosn, ForkLiftUrl);
  2561. #endregion
  2562. }
  2563. var result = ConvertCellToString(table);
  2564. if (Invmes.Rows.Count > 0)
  2565. {
  2566. result.Merge(Invmes, false);
  2567. }
  2568. return result;
  2569. }
  2570. catch (Exception ex)
  2571. {
  2572. throw new Exception(ex.Message);
  2573. }
  2574. }
  2575. }
  2576. /// <summary>
  2577. /// 工单领料推荐
  2578. /// </summary>
  2579. /// <param name="Id"></param>
  2580. /// <param name="workPoint"></param>
  2581. /// <returns></returns>
  2582. public DataTable GetICSMOPickMergeByWorkorder(string Id, string workPoint)
  2583. {
  2584. string sql = $@"SELECT row_number() over (partition by c.Code,c.InvCode order by c.Code,c.InvCode,d.MTIME) AS rowNo,
  2585. c.Code,
  2586. c.InvCode,
  2587. c.InvName,
  2588. c.InvStd,
  2589. c.InvUnit,
  2590. FLOOR(c.iQuantity) AS iQuantity,
  2591. d.WarehouseCode,
  2592. d.LotNO,
  2593. FLOOR(ISNULL(d.Quantity, 0)) AS QTY,
  2594. d.LocationCode LocationCode,
  2595. CONVERT(varchar(100),d.MTIME, 23) MTIME,
  2596. FLOOR(f.QTYTotal) QTYTotal
  2597. FROM
  2598. (select
  2599. a.ApplyCode as Code, a.InvCode, b.InvName, b.InvStd, b.InvUnit, SUM(ISNULL(a.Quantity, 0)) AS iQuantity, a.WhCode,a.ExtensionID
  2600. FROM
  2601. ICSMOApply a
  2602. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2603. WHERE a.ApplyCode in ({Id}) AND a.WorkPoint = '{workPoint}'
  2604. GROUP BY a.ApplyCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID) c
  2605. left join (select d.WarehouseCode,d.Quantity,d.INVCode, m.LotNo, d.MTIME,d.LocationCode,m.ExtensionID from ICSWareHouseLotInfo d ,ICSInventoryLot m
  2606. where d.LotNo=m.LotNo and d.WorkPoint=m.WorkPoint
  2607. and d.WorkPoint='{workPoint}' AND d.Quantity>0 ) d on c.InvCode=d.INVCode AND c.WhCode=d.WarehouseCode and d.ExtensionID=c.ExtensionID
  2608. LEFT JOIN (SELECT INVCode,WarehouseCode,SUM(Quantity) AS QTYTotal FROM ICSWareHouseLotInfo WHERE WorkPoint='1701' GROUP BY INVCode,WarehouseCode) f ON c.InvCode=f.INVCode AND c.WhCode=f.WarehouseCode
  2609. order by c.Code,c.InvCode,d.MTIME";
  2610. var dataset = Repository().FindDataSetBySql(sql);
  2611. if (dataset.Tables.Count == 0)
  2612. return null;
  2613. DataTable table = dataset.Tables[0];
  2614. decimal qtyCount = 0;
  2615. bool remove = false;
  2616. List<int> removeList = new List<int>();
  2617. for (int i = 0; i < table.Rows.Count; i++)
  2618. {
  2619. if (i != 0
  2620. && !table.Rows[i]["InvCode"].ToString().Equals(table.Rows[i - 1]["InvCode"].ToString()))
  2621. {
  2622. qtyCount = 0;
  2623. remove = false;
  2624. }
  2625. if (remove)
  2626. {
  2627. removeList.Add(i);
  2628. }
  2629. else
  2630. {
  2631. var lotQty = table.Rows[i]["QTY"].ToString().ToDecimal();
  2632. var orderQty = table.Rows[i]["iQuantity"].ToString().ToDecimal();
  2633. qtyCount += lotQty;
  2634. if (qtyCount >= orderQty)
  2635. {
  2636. remove = true;
  2637. }
  2638. }
  2639. }
  2640. if (removeList.Count > 0)
  2641. {
  2642. removeList.Reverse();
  2643. foreach (var item in removeList)
  2644. {
  2645. table.Rows.RemoveAt(item);
  2646. }
  2647. }
  2648. var result = ConvertCellToString(table);
  2649. if (Invmes.Rows.Count > 0)
  2650. {
  2651. result.Merge(Invmes, false);
  2652. }
  2653. return result;
  2654. }
  2655. public DataTable ConvertCellToString(DataTable data)
  2656. {
  2657. DataTable dtCloned = data.Clone();
  2658. foreach (DataColumn col in dtCloned.Columns)
  2659. {
  2660. col.DataType = typeof(string);
  2661. }
  2662. foreach (DataRow row in data.Rows)
  2663. {
  2664. DataRow newrow = dtCloned.NewRow();
  2665. foreach (DataColumn column in dtCloned.Columns)
  2666. {
  2667. newrow[column.ColumnName] = row[column.ColumnName].ToString();
  2668. }
  2669. dtCloned.Rows.Add(newrow);
  2670. }
  2671. return dtCloned;
  2672. }
  2673. // public DataTable GetICSMOPickMergeTemp2(string ID, string Type)
  2674. // {
  2675. // string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  2676. // #region sql
  2677. // string sql = @"SELECT row_number() over (order by c.Code,c.InvCode,d.MTIME,d.LotNO) AS rowNo,
  2678. // c.MergeID,
  2679. // c.Code,
  2680. // c.InvCode,
  2681. // c.InvName,
  2682. // c.InvStd,
  2683. //c.InvUnit,
  2684. // FLOOR(c.iQuantity) AS iQuantity,
  2685. // d.WarehouseCode,
  2686. // d.LocationCode,
  2687. // d.LotNO,
  2688. // FLOOR(ISNULL(d.Quantity, 0)) AS QTY,
  2689. // CONVERT(varchar(100),d.MTIME, 23) MTIME,
  2690. // FLOOR(f.QTYTotal) QTYTotal INTO #temp
  2691. // FROM
  2692. // ({0}) c
  2693. // LEFT JOIN ICSWareHouseLotInfo d ON c.InvCode=d.INVCode AND c.WhCode=d.WarehouseCode AND d.WorkPoint='{1}' AND d.Quantity>0
  2694. // left join ICSInventoryLot m on d.LotNo=m.LotNo and d.WorkPoint=m.WorkPoint and c.ExtensionID=m.ExtensionID
  2695. // LEFT JOIN (SELECT INVCode,WarehouseCode,SUM(Quantity) AS QTYTotal FROM ICSWareHouseLotInfo WHERE WorkPoint='{1}' GROUP BY INVCode,WarehouseCode) f ON c.InvCode=f.INVCode AND c.WhCode=f.WarehouseCode
  2696. //DECLARE @ItemCode VARCHAR(50),
  2697. // @QTY DECIMAL(18,3),
  2698. // @ItemCodeCurrent VARCHAR(50),
  2699. // @QTYCurrent DECIMAL(18,3),
  2700. // @iQuantityCurrent DECIMAL(18,3),
  2701. // @CanDelete BIT,
  2702. // @Row INT,
  2703. // @rowCurrent INT
  2704. //SET @Row = @@rowcount
  2705. //SET @rowCurrent=1
  2706. //SET @CanDelete=0
  2707. //SET @ItemCode=''
  2708. //WHILE @rowCurrent<=@Row
  2709. // BEGIN
  2710. // SELECT @ItemCodeCurrent=InvCode,@QTYCurrent=QTY,@iQuantityCurrent=iQuantity FROM #temp WHERE rowNo=@rowCurrent
  2711. //PRINT(@rowCurrent)
  2712. // IF @ItemCode<>@ItemCodeCurrent
  2713. // BEGIN
  2714. // SET @ItemCode=@ItemCodeCurrent
  2715. // SET @QTY=0
  2716. // SET @CanDelete=0
  2717. // END
  2718. // IF @CanDelete=1
  2719. // BEGIN
  2720. // DELETE FROM #temp WHERE rowNo=@rowCurrent
  2721. // SET @rowCurrent += 1
  2722. // CONTINUE
  2723. // END
  2724. // SET @QTY += @QTYCurrent
  2725. // IF @QTY>=@iQuantityCurrent
  2726. // BEGIN
  2727. // SET @CanDelete=1
  2728. // END
  2729. // SET @rowCurrent += 1
  2730. // END
  2731. //SELECT * FROM #temp
  2732. //DROP TABLE #temp
  2733. //";
  2734. // #endregion
  2735. // string sqls = "";
  2736. // if (Type == "1")
  2737. // {
  2738. // #region 工单备料sql
  2739. // sqls = @" select
  2740. // x.MergeID,
  2741. // c.MOCode as Code,
  2742. // a.InvCode,
  2743. // b.InvName,
  2744. // b.InvStd,
  2745. //b.InvUnit,
  2746. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2747. // a.WhCode,
  2748. //a.ExtensionID
  2749. // FROM
  2750. // ICSMOPick a
  2751. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2752. // inner join ICSMO c on a.MODetailID=c.MODetailID and a.WorkPoint=c.WorkPoint
  2753. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2754. // WHERE c.MOCode in ({0}) AND a.WorkPoint = '{1}'
  2755. // GROUP BY c.MOCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,x.MergeID,a.ExtensionID";
  2756. // #endregion
  2757. // }
  2758. // if (Type == "2")
  2759. // {
  2760. // #region 工单领料SQL
  2761. // sqls = @" select
  2762. // x.MergeID,
  2763. // a.ApplyCode as Code,
  2764. // a.InvCode,
  2765. // b.InvName,
  2766. // b.InvStd,
  2767. //b.InvUnit,
  2768. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2769. // a.WhCode,
  2770. // a.ExtensionID
  2771. // FROM
  2772. // ICSMOApply a
  2773. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2774. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2775. // WHERE a.ApplyCode in ({0}) AND a.WorkPoint = '{1}'
  2776. // GROUP BY a.ApplyCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,x.MergeID,a.ExtensionID";
  2777. // #endregion
  2778. // }
  2779. // if (Type == "3")
  2780. // {
  2781. // #region 工单材料出库SQL
  2782. // sqls = @" select
  2783. // x.MergeID,
  2784. // a.IssueCode as Code,
  2785. // a.InvCode,
  2786. // b.InvName,
  2787. // b.InvStd,
  2788. //b.InvUnit,
  2789. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2790. // a.WhCode,
  2791. //a.ExtensionID
  2792. // FROM
  2793. // ICSMOIssue a
  2794. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2795. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2796. // WHERE a.IssueCode in ({0}) AND a.WorkPoint = '{1}'
  2797. // GROUP BY a.IssueCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  2798. // #endregion
  2799. // }
  2800. // if (Type == "4")
  2801. // {
  2802. // #region 委外备料SQL
  2803. // sqls = @" select
  2804. // x.MergeID,
  2805. // c.OOCode as Code,
  2806. // a.InvCode,
  2807. // b.InvName,
  2808. // b.InvStd,
  2809. //b.InvUnit,
  2810. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2811. // a.WhCode,
  2812. //a.ExtensionID
  2813. // FROM
  2814. // ICSOOPick a
  2815. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2816. // left join ICSOutsourcingOrder c on a.OODetailID=c.OODetailID and a.WorkPoint=c.WorkPoint
  2817. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2818. // WHERE c.OOCode in ({0}) AND a.WorkPoint = '{1}'
  2819. // GROUP BY c.OOCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID, x.MergeID";
  2820. // #endregion
  2821. // }
  2822. // if (Type == "5")
  2823. // {
  2824. // #region 委外领料SQL
  2825. // sqls = @" select
  2826. // x.MergeID,
  2827. // a.ApplyCode as Code,
  2828. // a.InvCode,
  2829. // b.InvName,
  2830. // b.InvStd,
  2831. //b.InvUnit,
  2832. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2833. // a.WhCode,
  2834. //a.ExtensionID
  2835. // FROM
  2836. // ICSOApply a
  2837. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2838. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2839. // WHERE a.ApplyCode in ({0}) AND a.WorkPoint = '{1}'
  2840. // GROUP BY a.ApplyCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  2841. // #endregion
  2842. // }
  2843. // if (Type == "6")
  2844. // {
  2845. // #region 委外材料出库SQL
  2846. // sqls = @" select
  2847. // x.MergeID,
  2848. // a.IssueCode as Code,
  2849. // a.InvCode,
  2850. // b.InvName,
  2851. // b.InvStd,
  2852. //b.InvUnit,
  2853. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2854. // a.WhCode,
  2855. //a.ExtensionID
  2856. // FROM
  2857. // ICSOIssue a
  2858. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2859. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2860. // WHERE a.IssueCode in ({0}) AND a.WorkPoint = '{1}'
  2861. // GROUP BY a.IssueCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  2862. // #endregion
  2863. // }
  2864. // if (Type == "7")
  2865. // {
  2866. // #region 销售发货SQL
  2867. // sqls = @" select
  2868. // x.MergeID,
  2869. // a.SDNCode as Code,
  2870. // a.InvCode,
  2871. // b.InvName,
  2872. // b.InvStd,
  2873. //b.InvUnit,
  2874. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2875. // a.WhCode,
  2876. //a.ExtensionID
  2877. // FROM
  2878. // ICSSDN a
  2879. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2880. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2881. // WHERE a.SDNCode in ({0}) AND a.WorkPoint = '{1}'
  2882. // GROUP BY a.SDNCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  2883. // #endregion
  2884. // }
  2885. // if (Type == "8")
  2886. // {
  2887. // #region 其它出库SQL
  2888. // sqls = @" select
  2889. // x.MergeID,
  2890. // a.OutCode as Code,
  2891. // a.InvCode,
  2892. // b.InvName,
  2893. // b.InvStd,
  2894. //b.InvUnit,
  2895. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2896. // a.WhCode,
  2897. //a.ExtensionID
  2898. // FROM
  2899. // ICSOtherOut a
  2900. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2901. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2902. // WHERE a.OutCode in ({0}) AND a.WorkPoint = '{1}'
  2903. // GROUP BY a.OutCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  2904. // #endregion
  2905. // }
  2906. // if (Type == "9")
  2907. // {
  2908. // #region 借用SQL
  2909. // sqls = @" select
  2910. // x.MergeID,
  2911. // a.BrrowCode as Code,
  2912. // a.InvCode,
  2913. // b.InvName,
  2914. // b.InvStd,
  2915. //b.InvUnit,
  2916. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2917. // a.WhCode,
  2918. //a.ExtensionID
  2919. // FROM
  2920. // ICSBrrow a
  2921. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2922. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2923. // WHERE a.BrrowCode in ({0}) AND a.WorkPoint = '{1}'
  2924. // GROUP BY a.BrrowCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  2925. // #endregion
  2926. // }
  2927. // if (Type == "10")
  2928. // {
  2929. // #region 物料调拨
  2930. // sqls = @" select
  2931. // x.MergeID,
  2932. // a.TransferNO as Code,
  2933. // a.InvCode,
  2934. // b.InvName,
  2935. // b.InvStd,
  2936. //b.InvUnit,
  2937. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2938. // a.FromWarehouseCode as WhCode,
  2939. //a.ExtensionID
  2940. // FROM
  2941. // ICSTransfer a
  2942. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2943. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2944. // WHERE a.TransferNO in ({0}) AND a.WorkPoint = '{1}'
  2945. // GROUP BY a.TransferNO,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.FromWarehouseCode,a.ExtensionID,x.MergeID";
  2946. // #endregion
  2947. // }
  2948. // if (Type == "11")
  2949. // {
  2950. // #region 两步调出
  2951. // sqls = @"select
  2952. // x.MergeID,
  2953. // a.OutCode as Code,
  2954. // a.InvCode,
  2955. // b.InvName,
  2956. // b.InvStd,
  2957. // b.InvUnit,
  2958. // SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  2959. // a.WHCode as WhCode,
  2960. // a.ExtensionID
  2961. // FROM
  2962. // ICSOtherOut a
  2963. // INNER JOIN ICSTransfer tra ON a.TransferDetailID=tra.TransferDetailID AND a.WorkPoint=tra.WorkPoint
  2964. // inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  2965. // LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  2966. // WHERE a.OutCode in ({0}) AND a.WorkPoint = '{1}'
  2967. // GROUP BY a.OutCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WHCode,a.ExtensionID,x.MergeID";
  2968. // #endregion
  2969. // }
  2970. // sqls = string.Format(sqls, string.IsNullOrWhiteSpace(ID) ? "''" : ID.TrimEnd(','), WorkPoint);
  2971. // sql = string.Format(sql, sqls, WorkPoint);
  2972. // DataTable table = Repository().FindDataSetBySql(sql).Tables[0];
  2973. // DataTable dtCloned = table.Clone();
  2974. // foreach (DataColumn col in dtCloned.Columns)
  2975. // {
  2976. // col.DataType = typeof(string);
  2977. // }
  2978. // foreach (DataRow row in table.Rows)
  2979. // {
  2980. // DataRow newrow = dtCloned.NewRow();
  2981. // foreach (DataColumn column in dtCloned.Columns)
  2982. // {
  2983. // newrow[column.ColumnName] = row[column.ColumnName].ToString();
  2984. // }
  2985. // dtCloned.Rows.Add(newrow);
  2986. // }
  2987. // if (Invmes.Rows.Count > 0)
  2988. // {
  2989. // dtCloned.Merge(Invmes, false);
  2990. // }
  2991. // return dtCloned;
  2992. // }
  2993. public DataTable GetICSMOPickMergeTemp2(string ID, string Type)
  2994. {
  2995. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  2996. string sqls = "";
  2997. if (Type == "1")
  2998. {
  2999. #region 工单备料sql
  3000. sqls = @" select
  3001. x.MergeID,
  3002. c.MOCode as Code,
  3003. a.InvCode,
  3004. b.InvName,
  3005. b.InvStd,
  3006. b.InvUnit,
  3007. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3008. a.WhCode,
  3009. a.ExtensionID
  3010. FROM
  3011. ICSMOPick a
  3012. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3013. inner join ICSMO c on a.MODetailID=c.MODetailID and a.WorkPoint=c.WorkPoint
  3014. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3015. WHERE c.MOCode in ({0}) AND a.WorkPoint = '{1}'
  3016. GROUP BY c.MOCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,x.MergeID,a.ExtensionID";
  3017. #endregion
  3018. }
  3019. if (Type == "2" || Type == "12")
  3020. {
  3021. #region 工单领料SQL
  3022. sqls = @" select
  3023. x.MergeID,
  3024. a.ApplyCode as Code,
  3025. a.InvCode,
  3026. b.InvName,
  3027. b.InvStd,
  3028. b.InvUnit,
  3029. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3030. a.WhCode,
  3031. a.ExtensionID
  3032. FROM
  3033. ICSMOApply a
  3034. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3035. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3036. WHERE a.ApplyCode in ({0}) AND a.WorkPoint = '{1}'
  3037. GROUP BY a.ApplyCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,x.MergeID,a.ExtensionID";
  3038. #endregion
  3039. }
  3040. if (Type == "3")
  3041. {
  3042. #region 工单材料出库SQL
  3043. sqls = @" select
  3044. x.MergeID,
  3045. a.IssueCode as Code,
  3046. a.InvCode,
  3047. b.InvName,
  3048. b.InvStd,
  3049. b.InvUnit,
  3050. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3051. a.WhCode,
  3052. a.ExtensionID
  3053. FROM
  3054. ICSMOIssue a
  3055. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3056. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3057. WHERE a.IssueCode in ({0}) AND a.WorkPoint = '{1}'
  3058. GROUP BY a.IssueCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  3059. #endregion
  3060. }
  3061. if (Type == "4")
  3062. {
  3063. #region 委外备料SQL
  3064. sqls = @" select
  3065. x.MergeID,
  3066. c.OOCode as Code,
  3067. a.InvCode,
  3068. b.InvName,
  3069. b.InvStd,
  3070. b.InvUnit,
  3071. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3072. a.WhCode,
  3073. a.ExtensionID
  3074. FROM
  3075. ICSOOPick a
  3076. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3077. left join ICSOutsourcingOrder c on a.OODetailID=c.OODetailID and a.WorkPoint=c.WorkPoint
  3078. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3079. WHERE c.OOCode in ({0}) AND a.WorkPoint = '{1}'
  3080. GROUP BY c.OOCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID, x.MergeID";
  3081. #endregion
  3082. }
  3083. if (Type == "5")
  3084. {
  3085. #region 委外领料SQL
  3086. sqls = @" select
  3087. x.MergeID,
  3088. a.ApplyCode as Code,
  3089. a.InvCode,
  3090. b.InvName,
  3091. b.InvStd,
  3092. b.InvUnit,
  3093. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3094. a.WhCode,
  3095. a.ExtensionID
  3096. FROM
  3097. ICSOApply a
  3098. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3099. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3100. WHERE a.ApplyCode in ({0}) AND a.WorkPoint = '{1}'
  3101. GROUP BY a.ApplyCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  3102. #endregion
  3103. }
  3104. if (Type == "6")
  3105. {
  3106. #region 委外材料出库SQL
  3107. sqls = @" select
  3108. x.MergeID,
  3109. a.IssueCode as Code,
  3110. a.InvCode,
  3111. b.InvName,
  3112. b.InvStd,
  3113. b.InvUnit,
  3114. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3115. a.WhCode,
  3116. a.ExtensionID
  3117. FROM
  3118. ICSOIssue a
  3119. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3120. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3121. WHERE a.IssueCode in ({0}) AND a.WorkPoint = '{1}'
  3122. GROUP BY a.IssueCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  3123. #endregion
  3124. }
  3125. if (Type == "7")
  3126. {
  3127. #region 销售发货SQL
  3128. sqls = @" select
  3129. x.MergeID,
  3130. a.SDNCode as Code,
  3131. a.InvCode,
  3132. b.InvName,
  3133. b.InvStd,
  3134. b.InvUnit,
  3135. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3136. a.WhCode,
  3137. a.ExtensionID
  3138. FROM
  3139. ICSSDN a
  3140. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3141. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3142. WHERE a.SDNCode in ({0}) AND a.WorkPoint = '{1}' AND a.Type='1'
  3143. GROUP BY a.SDNCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  3144. #endregion
  3145. }
  3146. if (Type == "8")
  3147. {
  3148. #region 其它出库SQL
  3149. sqls = @" select
  3150. x.MergeID,
  3151. a.OutCode as Code,
  3152. a.InvCode,
  3153. b.InvName,
  3154. b.InvStd,
  3155. b.InvUnit,
  3156. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3157. a.WhCode,
  3158. a.ExtensionID
  3159. FROM
  3160. ICSOtherOut a
  3161. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3162. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3163. WHERE a.OutCode in ({0}) AND a.WorkPoint = '{1}'
  3164. GROUP BY a.OutCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  3165. #endregion
  3166. }
  3167. if (Type == "9")
  3168. {
  3169. #region 借用SQL
  3170. sqls = @" select
  3171. x.MergeID,
  3172. a.BrrowCode as Code,
  3173. a.InvCode,
  3174. b.InvName,
  3175. b.InvStd,
  3176. b.InvUnit,
  3177. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3178. a.WhCode,
  3179. a.ExtensionID
  3180. FROM
  3181. ICSBrrow a
  3182. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3183. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3184. WHERE a.BrrowCode in ({0}) AND a.WorkPoint = '{1}'
  3185. GROUP BY a.BrrowCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WhCode,a.ExtensionID,x.MergeID";
  3186. #endregion
  3187. }
  3188. if (Type == "10")
  3189. {
  3190. #region 物料调拨
  3191. sqls = @" select
  3192. x.MergeID,
  3193. a.TransferNO as Code,
  3194. a.InvCode,
  3195. b.InvName,
  3196. b.InvStd,
  3197. b.InvUnit,
  3198. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3199. a.FromWarehouseCode as WhCode,
  3200. a.ExtensionID
  3201. FROM
  3202. ICSTransfer a
  3203. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3204. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3205. WHERE a.TransferNO in ({0}) AND a.WorkPoint = '{1}'
  3206. GROUP BY a.TransferNO,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.FromWarehouseCode,a.ExtensionID,x.MergeID";
  3207. #endregion
  3208. }
  3209. if (Type == "11")
  3210. {
  3211. #region 两步调出
  3212. sqls = @" select
  3213. x.MergeID,
  3214. a.OutCode as Code,
  3215. a.InvCode,
  3216. b.InvName,
  3217. b.InvStd,
  3218. b.InvUnit,
  3219. SUM(ISNULL(a.Quantity, 0)) AS iQuantity,
  3220. a.WHCode as WhCode,
  3221. a.ExtensionID
  3222. FROM
  3223. ICSOtherOut a
  3224. INNER JOIN ICSTransfer tra ON a.TransferDetailID=tra.TransferDetailID AND a.WorkPoint=tra.WorkPoint
  3225. inner join ICSMOPickMerge x on a.ID=x.SourceID and a.WorkPoint=x.WorkPoint
  3226. LEFT JOIN ICSINVENTORY b ON a.InvCode = b.InvCode AND a.WorkPoint=b.WorkPoint
  3227. WHERE a.OutCode in ({0}) AND a.WorkPoint = '{1}'
  3228. GROUP BY a.OutCode,a.InvCode,b.InvName,b.InvStd,b.InvUnit,a.WHCode,a.ExtensionID,x.MergeID";
  3229. #endregion
  3230. }
  3231. sqls = string.Format(sqls, string.IsNullOrWhiteSpace(ID) ? "''" : ID.TrimEnd(','), WorkPoint);
  3232. #region sql
  3233. string sql = $@"SELECT row_number() over (order by c.Code,c.InvCode,d.MTIME,d.LotNO) AS rowNo,
  3234. c.MergeID,
  3235. c.Code,
  3236. c.InvCode,
  3237. c.InvName,
  3238. c.InvStd,
  3239. c.InvUnit,
  3240. FLOOR(c.iQuantity) AS iQuantity,
  3241. d.WarehouseCode,
  3242. d.LocationCode,
  3243. d.LotNO,
  3244. FLOOR(ISNULL(d.Quantity, 0)) AS QTY,
  3245. CONVERT(varchar(100),d.MTIME, 23) MTIME,
  3246. FLOOR(f.QTYTotal) QTYTotal
  3247. FROM
  3248. ({sqls}) c
  3249. left join (select d.WarehouseCode,d.Quantity,d.INVCode, m.LotNo, d.MTIME,d.LocationCode,m.ExtensionID
  3250. from ICSWareHouseLotInfo d ,ICSInventoryLot m
  3251. where d.LotNo=m.LotNo and d.WorkPoint=m.WorkPoint
  3252. and d.WorkPoint='{WorkPoint}' AND d.Quantity>0 ) d
  3253. on c.InvCode=d.INVCode AND c.WhCode=d.WarehouseCode and d.ExtensionID=c.ExtensionID
  3254. LEFT JOIN (SELECT INVCode,WarehouseCode,SUM(Quantity) AS QTYTotal FROM ICSWareHouseLotInfo WHERE WorkPoint='{WorkPoint}' GROUP BY INVCode,WarehouseCode) f ON c.InvCode=f.INVCode AND c.WhCode=f.WarehouseCode
  3255. order by c.Code,c.InvCode,d.MTIME ";
  3256. #endregion
  3257. var dataset = Repository().FindDataSetBySql(sql);
  3258. if (dataset.Tables.Count == 0)
  3259. return null;
  3260. DataTable table = dataset.Tables[0];
  3261. decimal qtyCount = 0;
  3262. bool remove = false;
  3263. List<int> removeList = new List<int>();
  3264. for (int i = 0; i < table.Rows.Count; i++)
  3265. {
  3266. if (i != 0
  3267. && (!table.Rows[i]["InvCode"].ToString().Equals(table.Rows[i - 1]["InvCode"].ToString())
  3268. || !table.Rows[i]["Code"].ToString().Equals(table.Rows[i - 1]["Code"].ToString()))
  3269. )
  3270. {
  3271. qtyCount = 0;
  3272. remove = false;
  3273. }
  3274. if (remove)
  3275. {
  3276. removeList.Add(i);
  3277. }
  3278. else
  3279. {
  3280. var lotQty = table.Rows[i]["QTY"].ToString().ToDecimal();
  3281. var orderQty = table.Rows[i]["iQuantity"].ToString().ToDecimal();
  3282. qtyCount += lotQty;
  3283. if (qtyCount >= orderQty)
  3284. {
  3285. remove = true;
  3286. }
  3287. }
  3288. }
  3289. if (removeList.Count > 0)
  3290. {
  3291. removeList.Reverse();
  3292. foreach (var item in removeList)
  3293. {
  3294. table.Rows.RemoveAt(item);
  3295. }
  3296. }
  3297. var result = ConvertCellToString(table);
  3298. if (Invmes.Rows.Count > 0)
  3299. {
  3300. result.Merge(Invmes, false);
  3301. }
  3302. return result;
  3303. }
  3304. public string MergeMaterial(string keyValue, string Type)
  3305. {
  3306. string MUSER = NFine.Code.OperatorProvider.Provider.GetCurrent().UserCode;
  3307. string MUSERNAME = NFine.Code.OperatorProvider.Provider.GetCurrent().UserName;
  3308. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  3309. string msg = "";
  3310. string sql = string.Empty;
  3311. string dataList = string.Empty;
  3312. List<string> arry = keyValue.Split(new char[] { ',' }, StringSplitOptions.RemoveEmptyEntries).ToList();
  3313. if (arry.Count > 0)
  3314. {
  3315. StringBuilder stringBuilder = new StringBuilder();
  3316. foreach (var i in arry)
  3317. {
  3318. stringBuilder.Append($@"'{i}',");
  3319. }
  3320. dataList = stringBuilder.ToString(0, stringBuilder.Length - 1);
  3321. }
  3322. Int64 Merge_ID = 0;
  3323. DateTime time = DateTime.Now;
  3324. string Tday = time.ToString("yyyyMMdd");
  3325. string sqls = string.Format(@"SELECT MAX(A.MergeID) AS SourceID FROM ICSMOPickMerge A WHERE A.MergeID LIKE '{0}%' AND LEN(a.MergeID) = 13", Tday);
  3326. DataSet ds = SqlHelper.GetDataSetBySql(sqls);
  3327. DataTable dts = ds.Tables[0];
  3328. if (dts != null && dts.Rows.Count > 0)
  3329. {
  3330. string lot = dts.Rows[0]["SourceID"].ToString();
  3331. if (!string.IsNullOrWhiteSpace(lot))
  3332. Merge_ID = Convert.ToInt64(lot.Substring(lot.Length - 5));
  3333. }
  3334. string MergeID = Tday + (Merge_ID + 1).ToString().PadLeft(5, '0');
  3335. string order = string.Empty;
  3336. string orderCode = string.Empty;
  3337. string quantity = string.Empty;
  3338. string sqlString1 = string.Empty;
  3339. string sqlString2 = string.Empty;
  3340. if (Type == "1")//工单备料
  3341. {
  3342. sql += @"INSERT INTO dbo.ICSMOPickMerge
  3343. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint)
  3344. select NEWID(),'{0}',b.ID ,'{1}','{2}','{3}',GETDATE(),'{4}'
  3345. from ICSMO a inner join ICSMOPick b on b.MODetailID=a.MODetailID and b.WorkPoint=a.WorkPoint
  3346. where a.MOCode in ({5})
  3347. ";
  3348. }
  3349. if (Type == "2")//工单发料
  3350. {
  3351. order = "ICSMOApply";
  3352. orderCode = "b.ApplyCode";
  3353. quantity = "b.IssueQuantity";
  3354. sql += @"INSERT INTO dbo.ICSMOPickMerge
  3355. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint,EATTRIBUTE1)
  3356. select NEWID(),'{0}',a.ID ,'{1}','{2}','{3}',GETDATE(),'{4}',a.ApplyCode
  3357. from ICSMOApply a
  3358. where a.ApplyCode in ({5})";
  3359. }
  3360. if (Type == "3")//材料出库
  3361. {
  3362. sql += @"INSERT INTO dbo.ICSMOPickMerge
  3363. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint)
  3364. select NEWID(),'{0}',a.ID ,'{1}','{2}','{3}',GETDATE(),'{4}'
  3365. from ICSMOIssue a
  3366. where a.IssueCode in ({5}) ";
  3367. }
  3368. if (Type == "4")//委外备料
  3369. {
  3370. sql += @"INSERT INTO dbo.ICSMOPickMerge
  3371. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint)
  3372. select NEWID(),'{0}',b.ID ,'{1}','{2}','{3}',GETDATE(),'{4}'
  3373. from ICSOutsourcingOrder a inner join ICSOOPick b on a.OODetailID=b.OODetailID and b.WorkPoint=a.WorkPoint
  3374. where a.OOCode in ({5})";
  3375. }
  3376. if (Type == "5")//委外领料
  3377. {
  3378. order = "ICSOApply";
  3379. orderCode = "b.ApplyCode";
  3380. quantity = "b.IssueQuantity";
  3381. sql += @"INSERT INTO dbo.ICSMOPickMerge
  3382. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint,EATTRIBUTE1)
  3383. select NEWID(),'{0}',a.ID ,'{1}','{2}','{3}',GETDATE(),'{4}',a.ApplyCode
  3384. from ICSOApply a
  3385. where a.ApplyCode in ({5})";
  3386. }
  3387. if (Type == "6")//委外材料出库
  3388. {
  3389. sql += @"INSERT INTO dbo.ICSMOPickMerge
  3390. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint)
  3391. select NEWID(),'{0}',a.ID ,'{1}','{2}','{3}',GETDATE(),'{4}'
  3392. from ICSOIssue a
  3393. where a.IssueCode in ({5})";
  3394. }
  3395. if (Type == "7")//销售发货
  3396. {
  3397. order = "ICSSDN";
  3398. orderCode = "b.SDNCode";
  3399. quantity = "b.SDNQuantity";
  3400. sql += @"INSERT INTO dbo.ICSMOPickMerge
  3401. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint,EATTRIBUTE1)
  3402. select NEWID(),'{0}',a.ID ,'{1}','{2}','{3}',GETDATE(),'{4}',a.SDNCode
  3403. from ICSSDN a
  3404. where a.SDNCode in ({5}) AND a.Type='1' ";
  3405. }
  3406. if (Type == "8")//其它出库
  3407. {
  3408. order = "ICSOtherOut";
  3409. orderCode = "b.OutCode";
  3410. quantity = "b.OutQuantity";
  3411. sql += @"INSERT INTO dbo.ICSMOPickMerge
  3412. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint,EATTRIBUTE1)
  3413. select NEWID(),'{0}',a.ID ,'{1}','{2}','{3}',GETDATE(),'{4}',a.OutCode
  3414. from ICSOtherOut a
  3415. where a.OutCode in ({5})";
  3416. }
  3417. if (Type == "9")//借用单
  3418. {
  3419. sql += @"INSERT INTO dbo.ICSMOPickMerge
  3420. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint)
  3421. select NEWID(),'{0}',a.ID ,'{1}','{2}','{3}',GETDATE(),'{4}'
  3422. from ICSBrrow a
  3423. where a.BrrowCode in ({5})";
  3424. }
  3425. if (Type == "10")//物料调拨
  3426. {
  3427. order = "ICSTransfer";
  3428. orderCode = "b.TransferNO";
  3429. quantity = "b.TransferQuantity";
  3430. sql += @"INSERT INTO dbo.ICSMOPickMerge
  3431. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint,EATTRIBUTE1)
  3432. select NEWID(),'{0}',a.ID ,'{1}','{2}','{3}',GETDATE(),'{4}',a.TransferNO
  3433. from ICSTransfer a
  3434. where a.TransferNO in ({5})
  3435. ";
  3436. }
  3437. if (Type == "11")//两步调出
  3438. {
  3439. sql += @" INSERT INTO dbo.ICSMOPickMerge
  3440. ( ID ,MergeID ,SourceID ,Type,MUSER, MUSERName,MTIME,WorkPoint)
  3441. select NEWID(),'{0}',a.ID ,'{1}','{2}','{3}',GETDATE(),'{4}'
  3442. from ICSOtherOut a
  3443. INNER JOIN ICSTransfer tra ON a.TransferDetailID=tra.TransferDetailID AND a.WorkPoint=tra.WorkPoint
  3444. where a.OutCode in ({5})
  3445. ";
  3446. }
  3447. sql = string.Format(sql, MergeID, Type, MUSER, MUSERNAME, WorkPoint, dataList);
  3448. sqlString1 += $@" SELECT a.ID FROM ICSMOPickMerge a WHERE a.SourceID IN (SELECT b.ID FROM {order} b WHERE {orderCode} IN({dataList}) )";
  3449. sqlString2 += $@" SELECT b.ID FROM {order} b WHERE {orderCode} IN({dataList}) AND {quantity}>0";
  3450. DataSet ds1 = SqlHelper.GetDataSetBySql(sqlString1);
  3451. DataSet ds2 = SqlHelper.GetDataSetBySql(sqlString2);
  3452. DataTable dts1 = ds1.Tables[0];
  3453. DataTable dts2 = ds2.Tables[0];
  3454. if ((dts1 != null && dts1.Rows.Count > 0))
  3455. {
  3456. }
  3457. else if (dts2 != null && dts2.Rows.Count > 0)
  3458. {
  3459. msg = "当前选择单据号存在已出库的单据号,合并 失败";
  3460. }
  3461. else
  3462. {
  3463. try
  3464. {
  3465. if (SqlHelper.CmdExecuteNonQueryLi(sql) == 0)
  3466. {
  3467. msg = "新增失败";
  3468. }
  3469. }
  3470. catch (Exception ex)
  3471. {
  3472. throw new Exception(ex.Message);
  3473. }
  3474. }
  3475. return msg;
  3476. }
  3477. public string CancelMergeMaterial(string keyValue, string Type)
  3478. {
  3479. string msg = "";
  3480. string sql = string.Empty;
  3481. keyValue = keyValue.TrimEnd(',');
  3482. List<string> arry = keyValue.Split(',').ToList();
  3483. string dataList = string.Empty;
  3484. if (arry.Count > 0)
  3485. {
  3486. foreach (var i in arry)
  3487. {
  3488. dataList += $@"'{i}',";
  3489. }
  3490. if (dataList.Any())
  3491. {
  3492. dataList = dataList.TrimEnd(',');
  3493. }
  3494. }
  3495. string sqls = $@" SELECT SourceID FROM ICSMOPickMerge WHERE EATTRIBUTE1 IN({dataList}) ";
  3496. DataSet ds = SqlHelper.GetDataSetBySql(sqls);
  3497. DataTable dts = ds.Tables[0];
  3498. if (dts == null || dts.Rows.Count <= 0)
  3499. {
  3500. msg = "当前单据未合并拣料,取消合并拣料失败";
  3501. return msg;
  3502. }
  3503. string sqlStrring = string.Empty;
  3504. if (Type == "2")//工单发料
  3505. {
  3506. sqlStrring = $@"select ID from ICSMOApply a where a.ID in ({sqls}) and a.IssueQuantity=0 ";
  3507. }
  3508. if (Type == "5")//委外领料
  3509. {
  3510. sqlStrring = $@"select ID from ICSOApply a where a.ID in ({sqls}) and a.IssueQuantity=0 ";
  3511. }
  3512. if (Type == "7")//销售发货
  3513. {
  3514. sqlStrring = $@"select ID from ICSSDN a where a.ID in ({sqls}) and a.SDNQuantity=0 AND a.Type='1' ";
  3515. }
  3516. if (Type == "8")//其它出库
  3517. {
  3518. sqlStrring = $@"select ID
  3519. from ICSOtherOut a
  3520. where a.ID in ({sqls}) and a.OutQuantity=0";
  3521. }
  3522. if (Type == "10")//物料调拨
  3523. {
  3524. sqlStrring = $@"select ID from ICSTransfer a where a.ID in ({sqls}) and a.TransferQuantity=0 ";
  3525. }
  3526. DataSet dsdata = SqlHelper.GetDataSetBySql(sqlStrring);
  3527. DataTable dtdsdatas = dsdata.Tables[0];
  3528. if (dtdsdatas == null || dtdsdatas.Rows.Count <= 0)
  3529. {
  3530. msg = "当前物料已经出库,取消合并失败";
  3531. return msg;
  3532. }
  3533. sql = $@"DELETE FROM ICSMOPickMerge WHERE SourceID IN({sqls})";
  3534. try
  3535. {
  3536. if (SqlHelper.CmdExecuteNonQueryLi(sql) > 0)
  3537. {
  3538. }
  3539. else
  3540. {
  3541. msg = "取消合并失败";
  3542. }
  3543. }
  3544. catch (Exception ex)
  3545. {
  3546. throw new Exception(ex.Message);
  3547. }
  3548. return msg;
  3549. }
  3550. public string CheckQty(string objArr)
  3551. {
  3552. objArr = objArr.TrimEnd(',');
  3553. string sql = @"select * from ICSMOPickMerge a
  3554. left join ICSMOPick b on a.SourceID=b.ID and a.WorkPoint=b.WorkPoint
  3555. left join ICSMO c on b.MODetailID=c.MODetailID and b.WorkPoint=c.WorkPoint
  3556. where MOCode in ({0})";
  3557. sql = string.Format(sql, objArr);
  3558. DataTable dt = SqlHelper.GetDataTableBySql(sql);
  3559. if (dt != null && dt.Rows.Count > 0)
  3560. {
  3561. return "1";
  3562. }
  3563. return "0";
  3564. }
  3565. //删除占料
  3566. public string DelPickLog(string objCode)
  3567. {
  3568. //站点信息
  3569. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  3570. string msg = "";
  3571. objCode = objCode.Substring(1, objCode.Length - 2);
  3572. string sql = string.Empty;
  3573. // sql += string.Format(@"update b set b.LockQuantity=convert(decimal(18,6),b.LockQuantity)-convert(decimal(18,6),a.Quantity )
  3574. //from dbo.ICSWareHouseLotInfoLog a
  3575. //left join dbo.ICSWareHouseLotInfo b on a.LotNo=b.LotNo and a.WorkPoint=b.WorkPoint
  3576. // where a.TransCode in ({0}) and a.TransType='15' and a.WorkPoint='{1}'", objCode.TrimEnd(','), WorkPoint);
  3577. sql += string.Format(@" update b set b.LockQuantity=convert(decimal(18,6),b.LockQuantity)-convert(decimal(18,6),c.Quantity )
  3578. from dbo.ICSWareHouseLotInfo b
  3579. inner join (select sum(Quantity) as Quantity, LotNo from ICSWareHouseLotInfolog where TransCode in ({0})and TransType='15' and WorkPoint='{1}' group by LotNo) c
  3580. on c.LotNo =b.LotNo ", objCode.TrimEnd(','), WorkPoint);
  3581. sql += string.Format(@" delete dbo.ICSWareHouseLotInfoLog where TransCode in({0}) and TransType='15' and WorkPoint='{1}'", objCode.TrimEnd(','), WorkPoint);
  3582. try
  3583. {
  3584. if (SqlHelper.CmdExecuteNonQueryLi(sql) > 0)
  3585. {
  3586. }
  3587. }
  3588. catch (Exception ex)
  3589. {
  3590. throw new Exception(ex.Message);
  3591. }
  3592. return msg;
  3593. }
  3594. public int SeachPickLog(string objCode)
  3595. {
  3596. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  3597. objCode = objCode.TrimEnd(',');
  3598. string[] parameters = objCode.Split(',');
  3599. int parameterCount = parameters.Length;
  3600. string sql = @" select distinct a.TransCode from dbo.ICSWareHouseLotInfoLog a
  3601. left join dbo.ICSWareHouseLotInfo b on a.LotNo=b.LotNo and a.WorkPoint=b.WorkPoint
  3602. where a.TransCode in ({0}) and a.TransType='15' and a.WorkPoint='{1}'";
  3603. sql = string.Format(sql, objCode, WorkPoint);
  3604. DataTable dt = SqlHelper.GetDataTableBySql(sql);
  3605. int count = dt.Rows.Count;
  3606. return count;
  3607. }
  3608. //添加打印次数
  3609. public int PrintCount(string objCode, string type)
  3610. {
  3611. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  3612. string MUser = NFine.Code.OperatorProvider.Provider.GetCurrent().UserCode;
  3613. string MUserName = NFine.Code.OperatorProvider.Provider.GetCurrent().UserName;
  3614. var date = DateTime.Now;
  3615. objCode = objCode.TrimEnd(',');
  3616. string[] parameters = objCode.Split(',');
  3617. StringBuilder sb = new StringBuilder();
  3618. foreach (var data in parameters)
  3619. {
  3620. sb.Append($@"IF EXISTS (SELECT ID FROM ICSPrintCount WHERE TransCode={data} )
  3621. BEGIN
  3622. UPDATE ICSPrintCount SET PrintCount=PrintCount+1 WHERE TransCode={data}
  3623. END
  3624. ELSE
  3625. BEGIN
  3626. INSERT INTO ICSPrintCount VALUES(NEWID(),{data},1,'{type}','{WorkPoint}','{MUser}','{MUserName}','{date}')
  3627. END
  3628. ;"
  3629. );
  3630. }
  3631. if (sb.IsEmpty())
  3632. {
  3633. return 0;
  3634. }
  3635. int count = SqlHelper.ExecuteNonQuery(sb.ToString());
  3636. return count;
  3637. }
  3638. public DataTable GetPickLogInfo(string ID)
  3639. {
  3640. string WorkPoint = NFine.Code.OperatorProvider.Provider.GetCurrent().Location;
  3641. DataTable dt = new DataTable();
  3642. List<DbParameter> parameter = new List<DbParameter>();
  3643. string sql = @"
  3644. select '' as MergeID,a.TransCode as Code,a.TransSequence as Sequence,a.InvCode as InvCode, b.InvName as InvName,b.InvStd as InvStd,b.InvUnit as InvSInvUnittd,a.Quantity as iQuantity,
  3645. a.FromWarehouseCode as WarehouseCode,a.FromLocationCode as LocationCode,a.LotNO,a.MTIME,c.Quantity as QTY
  3646. from dbo.ICSWareHouseLotInfoLog a
  3647. left join dbo.ICSInventory b on a.InvCode=b.InvCode and a.WorkPoint=b.WorkPoint
  3648. left join dbo.ICSWareHouseLotInfo c on a.LotNo=c.LotNo and a.WorkPoint=c.WorkPoint
  3649. where a.TransCode in ({0}) and a.TransType='15' and a.WorkPoint='{1}'";
  3650. sql = string.Format(sql, ID.TrimEnd(','), WorkPoint);
  3651. return Repository().FindTableBySql(sql.ToString());
  3652. }
  3653. public class LotMessage
  3654. {
  3655. public string LotNo { get; set; }
  3656. public decimal Quantity { get; set; }
  3657. }
  3658. //事务中执行SQL及调用接口
  3659. public static int CmdExecuteNonQueryWithAPI(string sql, string ccsql, string InputJson, string PostUrl, params SqlParameter[] spArr)
  3660. {
  3661. using (SqlConnection conn = SqlHelper.GetDataCenterConn())
  3662. {
  3663. conn.Open();
  3664. SqlTransaction sqlTran = conn.BeginTransaction();
  3665. SqlCommand cmd = new SqlCommand();
  3666. cmd.Transaction = sqlTran;
  3667. cmd.Connection = conn;
  3668. try
  3669. {
  3670. if (ccsql == "")
  3671. {
  3672. cmd.CommandText = sql;
  3673. int RES = cmd.ExecuteNonQuery();
  3674. cmd.Transaction.Commit();
  3675. return RES;
  3676. }
  3677. else
  3678. {
  3679. cmd.CommandText = sql;
  3680. int RES = cmd.ExecuteNonQuery();
  3681. cmd.CommandText = ccsql;
  3682. RES = cmd.ExecuteNonQuery();
  3683. #region 叉车接口调用(写进事务中,报错可以回滚,保证数据正确)
  3684. string rest = HTTPHelper.HttpPost("WMS调用叉车接口出库", PostUrl, InputJson);
  3685. ForkLiftResult result = JsonConvert.DeserializeObject<ForkLiftResult>(rest);
  3686. if (result.Ret == 1)
  3687. {
  3688. cmd.Transaction.Commit();
  3689. return RES;
  3690. }
  3691. else
  3692. {
  3693. throw new Exception(result.RetMsg);
  3694. }
  3695. #endregion
  3696. }
  3697. }
  3698. catch (Exception ex)
  3699. {
  3700. cmd.Transaction.Rollback();
  3701. throw new Exception(ex.Message);
  3702. }
  3703. finally
  3704. {
  3705. if (conn.State != ConnectionState.Closed)
  3706. {
  3707. conn.Close();
  3708. conn.Dispose();
  3709. }
  3710. }
  3711. return 0;
  3712. }
  3713. }
  3714. }
  3715. }