纽威

373 lines
21 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
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
  1. using ICSSoft.Common;
  2. using ICSSoft.Entity;
  3. using System;
  4. using System.Collections.Generic;
  5. using System.Data;
  6. using System.Data.SqlClient;
  7. using System.Linq;
  8. using System.Text;
  9. using System.Threading.Tasks;
  10. namespace ICSSoft.DataProject
  11. {
  12. public class DisassemblyDoc
  13. {
  14. private static log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
  15. private static string connString = System.Configuration.ConfigurationManager.AppSettings["ERPConnStr"];
  16. private static string ERPDB = System.Configuration.ConfigurationManager.AppSettings["ERPDB"];
  17. private static string Type = System.Configuration.ConfigurationManager.AppSettings["Type"];
  18. private static string CRNALL = System.Configuration.ConfigurationManager.AppSettings["DisaRCRDNAME"];
  19. /// <summary>
  20. /// 审核拆卸单
  21. /// </summary>
  22. /// <param name="Bills"></param>
  23. /// <returns></returns>
  24. public bool Dismrecord01(List<ICSDisassemblyDoc> Bills)
  25. {
  26. bool ResultFlag = false;
  27. string connS = "";
  28. SqlConnection conn = new SqlConnection();
  29. SqlCommand cmd = new SqlCommand();
  30. if (Bills.Count <= 0)
  31. {
  32. throw new Exception("传送数据为空!");
  33. }
  34. LogInfo(Bills);
  35. foreach (ICSDisassemblyDoc head in Bills)
  36. {
  37. try
  38. {
  39. connS = string.Format(connString, head.WorkPoint);
  40. conn = new System.Data.SqlClient.SqlConnection(connS);
  41. conn.Open();
  42. SqlTransaction sqlTran = conn.BeginTransaction();
  43. cmd = new SqlCommand();
  44. cmd.Transaction = sqlTran;
  45. cmd.Connection = conn;
  46. if (DBHelper.IsInventoryConsolidation(cmd, head.WorkPoint))
  47. {
  48. }
  49. else
  50. {
  51. throw new Exception("U8正在整理现存量,请稍后再试");
  52. }
  53. string[] ss = head.WorkPoint.Split('_');
  54. ERPDB = ss[1];
  55. string sql = "";
  56. ICSUserInfo userInfo = new ICSUserInfo();
  57. userInfo = DBHelper.GetPersonInfo(head.User, cmd);
  58. string cHandler = string.Empty;
  59. string cIWhCode = string.Empty;
  60. #region 检验单号是否存在
  61. sql = "select * from AssemVouch where ID='" + head.ID + "'";
  62. DataTable dt = DBHelper.SQlReturnData(sql, cmd);
  63. if (dt != null && dt.Rows.Count > 0)
  64. {
  65. cHandler = dt.Rows[0]["cVerifyPerson"].ToString();
  66. //cIWhCode = head.cWhCode;
  67. if (!string.IsNullOrEmpty(cHandler))
  68. {
  69. throw new Exception("单据ID:" + head.ID + "不是开立状态!");
  70. }
  71. }
  72. else
  73. {
  74. throw new Exception("单据ID:" + head.ID + "在U8中不存在!");
  75. }
  76. #endregion
  77. #region 审核拆卸单
  78. sql = @"UPDATE dbo.AssemVouch SET cVerifyPerson='" + userInfo.UserName + @"' ,
  79. dVerifyDate=CONVERT(VARCHAR(50),GETDATE(),112),dnverifytime=GETDATE() WHERE ID='" + head.ID + "'";
  80. DBHelper.CmdExecuteNonQuery(sql, cmd, "审核拆卸单失败!");
  81. #endregion
  82. #region 其他出库单表头
  83. string[] dd = CRNALL.Split('~');
  84. string crdname = dd[0];
  85. string carname = dd[1];
  86. string crdname1 = dd[2];
  87. string carname1 = dd[3];
  88. string surface = dd[4];
  89. string cRDcode = DBHelper.GetRDCode(crdname, cmd);
  90. string cRDcode1 = DBHelper.GetRDCode(crdname1, cmd);
  91. string cardnewcode = DBHelper.GetCardNumber(carname, cmd);
  92. string cardnewcode1 = DBHelper.GetCardNumber(carname1, cmd);
  93. //取得out库单的默认显示模版
  94. string DEF_ID09 = DBHelper.GetDefaultTemplate(cardnewcode1, cmd);
  95. //取得采购入库单单据 表头ID,表体DID
  96. VouchKey key09 = new VouchKey();
  97. var nums = Bills.Count;
  98. Dictionary<string, int> dics = DBHelper.GetAllCode("" + ERPDB + "", surface, "" + nums + "", head.WorkPoint);
  99. int iFatherIds = Convert.ToInt32(dics["iFatherId"].ToString());
  100. int iChildIds = Convert.ToInt32(dics["iChildId"].ToString());
  101. DateTime dates = DateTime.Now;
  102. string iBaseCodeLens = DBHelper.GetAllRDCode(cardnewcode1, "" + dates + "", "admin", head.WorkPoint);
  103. sql = @"INSERT INTO dbo.RdRecord09
  104. (ID,bRdFlag,cVouchType,cBusType,cSource,cBusCode,cWhCode,dDate,cCode,cRdCode,
  105. cHandler,cMemo,bTransFlag,cMaker,dVeriDate,bpufirst,biafirst,VT_ID,bIsSTQc,bOMFirst,
  106. bFromPreYear,bIsComplement,iDiscountTaxType,ireturncount,
  107. iverifystate,iswfcontrolled,dnmaketime,dnverifytime,bredvouch,cSourceLs,cDepCode)
  108. SELECT @ID,'0','09','','',a.cAVCode,b.cWhCode,CONVERT(NVARCHAR(15),GETDATE(),23),@cCode,@cRdCode,
  109. @cHandler,@cMemo,'0',@cMaker,CONVERT(NVARCHAR(15),GETDATE(),23),'0','0',
  110. '85','0','0','0','0','0','0','0','0',GETDATE(),GETDATE(),'0',null,cDepCode
  111. from dbo.AssemVouch a
  112. inner join AssemVouchs b on a.id=b.id
  113. WHERE a.ID='" + head.ID + "' and bAVType='' ";
  114. cmd.Parameters.Clear();
  115. cmd.Parameters.Add(new SqlParameter("@ID", iFatherIds));
  116. cmd.Parameters.Add(new SqlParameter("@cCode", iBaseCodeLens));
  117. cmd.Parameters.Add(new SqlParameter("@cHandler", userInfo.UserName));
  118. cmd.Parameters.Add(new SqlParameter("@cMemo", ""));
  119. cmd.Parameters.Add(new SqlParameter("@cMaker", userInfo.UserName));
  120. cmd.Parameters.Add(new SqlParameter("@VT_ID", DEF_ID09));
  121. cmd.Parameters.Add(new SqlParameter("@cRdCode", cRDcode1));
  122. cmd.CommandText = sql;
  123. try
  124. {
  125. cmd.ExecuteNonQuery();
  126. }
  127. catch (Exception ex)
  128. {
  129. log.Error("生成其他出库单失败!拆卸单ID:" + head.ID + ";异常:" + ex.Message + ";SQL:\r\n" + sql);
  130. throw new Exception("程序异常,请联系开发人员!");
  131. }
  132. #endregion
  133. #region 3.5 其他出库单表体
  134. #region 检验单号是否存在
  135. sql = "select iAVQuantity,* from AssemVouchs where ID='" + head.ID + "' and bAVType='套件'";
  136. DataTable dsh = DBHelper.SQlReturnData(sql, cmd);
  137. if (dsh != null && dsh.Rows.Count > 0)
  138. {
  139. cIWhCode = dsh.Rows[0]["cWhCode"].ToString();
  140. }
  141. else
  142. {
  143. throw new Exception("单据ID:" + head.ID + "在U8中不存在!");
  144. }
  145. //判断物料批号与现存量表批号是否一致、数量不能超过现存量物料数量
  146. sql = @"SELECT cBatch,iQuantity from CurrentStock WHERE cInvCode='" + dsh.Rows[0]["cInvCode"].ToString() + "'AND cBatch='" + dsh.Rows[0]["cAVBatch"].ToString() + @"'AND cFree1='" + dsh.Rows[0]["cFree1"].ToString() + @"' AND cFree2='" + dsh.Rows[0]["cFree2"].ToString() + @"' AND cFree3='" + dsh.Rows[0]["cFree3"].ToString() + @"' AND cFree4='" + dsh.Rows[0]["cFree4"].ToString() + @"' AND cFree5='" + dsh.Rows[0]["cFree5"].ToString() + @"' AND cFree6='" + dsh.Rows[0]["cFree6"].ToString() + @"' AND cFree7='" + dsh.Rows[0]["cFree7"].ToString() + @"' AND cFree8='" + dsh.Rows[0]["cFree8"].ToString() + @"' AND cFree9='" + dsh.Rows[0]["cFree9"].ToString() + @"' AND cFree10='" + dsh.Rows[0]["cFree10"].ToString() + @"' and cWhCode='" + dsh.Rows[0]["cWhCode"].ToString() + "'";
  147. //sql = @"SELECT cBatch,iQuantity from CurrentStock WHERE cInvCode='" + dsh.Rows[0]["cInvCode"].ToString() + "'AND cBatch=''and cWhCode='" + dsh.Rows[0]["cWhCode"].ToString() + "'";
  148. DataTable dtItem = DBHelper.SQlReturnData(sql, cmd);
  149. if (dtItem != null && dtItem.Rows.Count > 0)
  150. {
  151. if (Convert.ToDecimal(dtItem.Rows[0]["iQuantity"].ToString()) < Convert.ToInt32(dsh.Rows[0]["iAVQuantity"].ToString()))
  152. {
  153. throw new Exception("物料条码的数量大于U8现存量物料数量,物料:" + dsh.Rows[0]["cInvCode"].ToString());
  154. }
  155. }
  156. else
  157. {
  158. throw new Exception("物料:" + dsh.Rows[0]["cInvCode"].ToString() + "在现存量表中不存在!");
  159. }
  160. #endregion
  161. #region 3.5.1 表体
  162. sql = @"INSERT INTO dbo.rdrecords09
  163. (AutoID,ID,cInvCode,iQuantity,iSOutQuantity,iSOutNum,iFlag,iTrIds,iNQuantity,
  164. cMassUnit,bLPUseFree,iRSRowNO,iOriTrackID,bCosting,bVMIUsed,iExpiratDateCalcu,iordertype,irowno,cbaccounter,cBatch,iPUnitCost,iPPrice,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10)
  165. SELECT @AutoID,@ID,@iItemcode,@iQuantity,'0','0','0',a.autoID,iAVQuantity,
  166. '0','0','0','0','1','0','0','0',a.irowno,null,cAVBatch,iAVPCost,iAVPPrice,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10
  167. from AssemVouchs a
  168. where ID=" + head.ID + @" and bAVType='' ;";
  169. cmd.Parameters.Clear();
  170. cmd.Parameters.Add(new SqlParameter("@AutoID", iChildIds));
  171. cmd.Parameters.Add(new SqlParameter("@ID", iFatherIds));
  172. cmd.Parameters.Add(new SqlParameter("@iItemcode", dsh.Rows[0]["cInvCode"].ToString()));
  173. cmd.Parameters.Add(new SqlParameter("@iQuantity", dsh.Rows[0]["iAVQuantity"].ToString()));
  174. //cmd.Parameters.Add(new SqlParameter("@iTrIds", head.AutoID));
  175. //cmd.Parameters.Add(new SqlParameter("@irowno", Rd09irowno));
  176. cmd.CommandText = sql;
  177. try
  178. {
  179. cmd.ExecuteNonQuery();
  180. }
  181. catch (Exception ex)
  182. {
  183. log.Error("生成其他出库单表体失败!拆卸单ID:" + head.ID + ";异常:" + ex.Message + ";SQL:\r\n" + sql);
  184. throw new Exception("程序异常,请联系开发人员!");
  185. }
  186. sql = @"INSERT INTO dbo.rdrecords09sub
  187. ( AutoID , ID ,iBG_Ctrl , iBGSTSum )
  188. values('" + iChildIds + "','" + iFatherIds + "',0,0)";
  189. cmd.CommandText = sql;
  190. cmd.ExecuteNonQuery();
  191. #endregion
  192. if (head.UpdateStock)
  193. {
  194. //更新现存量
  195. key09.cBustypeUN = "拆卸出库";
  196. key09.cVouchTypeUN = "09";
  197. key09.TableName = "IA_ST_UnAccountVouch09";
  198. //DBHelper.UpdateCurrentStock(cmd, dsh.Rows[0]["cInvCode"].ToString(), cIWhCode, "", -Convert.ToDecimal(dsh.Rows[0]["iAVQuantity"].ToString()), key09);
  199. DBHelper.UpdateCurrentStockNEW(cmd, dsh.Rows[0]["cInvCode"].ToString(), cIWhCode, dsh.Rows[0]["cAVBatch"].ToString(), -Convert.ToDecimal(dsh.Rows[0]["iAVQuantity"].ToString()), dsh.Rows[0]["cFree1"].ToString(), dsh.Rows[0]["cFree2"].ToString(), dsh.Rows[0]["cFree3"].ToString(), dsh.Rows[0]["cFree4"].ToString(), dsh.Rows[0]["cFree5"].ToString(), dsh.Rows[0]["cFree6"].ToString(), dsh.Rows[0]["cFree7"].ToString(), dsh.Rows[0]["cFree8"].ToString(), dsh.Rows[0]["cFree9"].ToString(), dsh.Rows[0]["cFree10"].ToString(), key09);
  200. }
  201. //DBHelper.UpdateIDandDID("rd", ErpName, head.list.Count(), cmd);
  202. #endregion
  203. sql = "select cWhCode from dbo.AssemVouchs where ID='" + head.ID + "' and bAVType='散件' group by cWhCode;";
  204. DataTable dtChecks = DBHelper.SQlReturnData(sql, cmd);
  205. int iChildId = 0;
  206. int iFatherId = 0;
  207. VouchKey key08 = new VouchKey();
  208. for (int i = 0; i < dtChecks.Rows.Count; i++)
  209. {
  210. #region 其他入库单表头
  211. //取得out库单的默认显示模版
  212. string DEF_ID08 = DBHelper.GetDefaultTemplate(cardnewcode, cmd);
  213. //取得采购入库单单据 表头ID,表体DID
  214. var num = Bills.Count;
  215. Dictionary<string, int> dic = DBHelper.GetAllCode("" + ERPDB + "", surface, "" + num + "", head.WorkPoint);
  216. iFatherId = Convert.ToInt32(dic["iFatherId"].ToString());
  217. iChildId = Convert.ToInt32(dic["iChildId"].ToString());
  218. DateTime date = DateTime.Now;
  219. string iBaseCodeLen = DBHelper.GetAllRDCode(cardnewcode, "" + date + "", "admin", head.WorkPoint);
  220. sql = @"INSERT INTO dbo.RdRecord08
  221. (ID,bRdFlag,cVouchType,cBusType,cSource,cBusCode,cWhCode,dDate,cCode,cRdCode,
  222. cHandler,cMemo,bTransFlag,cMaker,dVeriDate,bpufirst,biafirst,VT_ID,bIsSTQc,bOMFirst,
  223. bFromPreYear,bIsComplement,iDiscountTaxType,ireturncount,
  224. iverifystate,iswfcontrolled,dnmaketime,dnverifytime,bredvouch,cSourceLs,cDepCode)
  225. SELECT @ID,'1','08','','',a.cAVCode,@cWhCode,CONVERT(NVARCHAR(15),GETDATE(),23),@cCode,@cRdCode,
  226. @cHandler,@cMemo,'0',@cMaker,CONVERT(NVARCHAR(15),GETDATE(),23),'0','0',
  227. @VT_ID,'0','0','0','0','0','0','0','0',GETDATE(),GETDATE(),'0',null,cDepCode
  228. from dbo.AssemVouch a
  229. WHERE id='" + head.ID + "' ";
  230. cmd.Parameters.Clear();
  231. cmd.Parameters.Add(new SqlParameter("@ID", iFatherId));
  232. //cmd.Parameters.Add(new SqlParameter("@cBusCode", head.cCode));
  233. cmd.Parameters.Add(new SqlParameter("@cWhCode", dtChecks.Rows[0]["cWhCode"].ToString()));
  234. cmd.Parameters.Add(new SqlParameter("@cCode", iBaseCodeLen));
  235. cmd.Parameters.Add(new SqlParameter("@cHandler", userInfo.UserName));
  236. cmd.Parameters.Add(new SqlParameter("@cMemo", ""));
  237. cmd.Parameters.Add(new SqlParameter("@cMaker", userInfo.UserName));
  238. cmd.Parameters.Add(new SqlParameter("@VT_ID", DEF_ID08));
  239. cmd.Parameters.Add(new SqlParameter("@cRdCode", cRDcode));
  240. cmd.CommandText = sql;
  241. try
  242. {
  243. cmd.ExecuteNonQuery();
  244. }
  245. catch (Exception ex)
  246. {
  247. log.Error("生成其他入库单表头失败!拆卸ID:" + head.ID + ";异常:" + ex.Message + ";SQL:\r\n" + sql);
  248. throw new Exception("程序异常,请联系开发人员!");
  249. }
  250. #endregion
  251. sql = "select * from AssemVouchs where ID='" + head.ID + "' and bAVType='散件' and cWhCode='" + dtChecks.Rows[i]["cWhCode"].ToString() + "' ";
  252. DataTable ds = DBHelper.SQlReturnData(sql, cmd);
  253. for (int j = 0; j < ds.Rows.Count; j++)
  254. {
  255. #region 其他入库单表体
  256. if (ds != null && ds.Rows.Count > 0)
  257. {
  258. cIWhCode = ds.Rows[j]["cWhCode"].ToString();
  259. }
  260. else
  261. {
  262. throw new Exception("单据号:" + head.ID + "在U8中不存在!");
  263. }
  264. sql = @"INSERT INTO dbo.rdrecords08
  265. (AutoID,ID,cInvCode,iQuantity,iSOutQuantity,iSOutNum,iFlag,iTrIds,iNQuantity,
  266. cMassUnit,bLPUseFree,iRSRowNO,iOriTrackID,bCosting,bVMIUsed,iExpiratDateCalcu,iordertype,irowno,cbaccounter,cBatch,iPUnitCost,iPPrice,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10)
  267. SELECT @AutoID,@ID,cInvCode,a.iAVQuantity,'0','0','0',a.AutoID,iAVQuantity,
  268. '0','0','0','0','1','0','0','0',a.irowno,null,cAVBatch,iAVPCost,iAVPPrice,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10 from AssemVouchs a
  269. where a.autoID=" + ds.Rows[j]["autoID"].ToString() + @" ;";
  270. cmd.Parameters.Clear();
  271. cmd.Parameters.Add(new SqlParameter("@AutoID", iChildId));
  272. cmd.Parameters.Add(new SqlParameter("@ID", iFatherId));
  273. //cmd.Parameters.Add(new SqlParameter("@iQuantity", body.iQuantity));
  274. //cmd.Parameters.Add(new SqlParameter("@iTrIds", body.AutoID));
  275. //cmd.Parameters.Add(new SqlParameter("@irowno", Rd08irowno));
  276. cmd.CommandText = sql;
  277. try
  278. {
  279. cmd.ExecuteNonQuery();
  280. }
  281. catch (Exception ex)
  282. {
  283. log.Error("生成其他出库单表体失败!拆卸单单号:" + head.ID + ";异常:" + ex.Message + ";SQL:\r\n" + sql);
  284. throw new Exception("程序异常,请联系开发人员!");
  285. }
  286. if (head.UpdateStock)
  287. {
  288. //更新现存量
  289. key08.cBustypeUN = "拆卸入库";
  290. key08.cVouchTypeUN = "08";
  291. key08.TableName = "IA_ST_UnAccountVouch08";
  292. DBHelper.UpdateCurrentStockNEW(cmd, ds.Rows[j]["cInvCode"].ToString(), cIWhCode, ds.Rows[j]["cAVBatch"].ToString(), Convert.ToDecimal(ds.Rows[j]["iAVQuantity"].ToString()), ds.Rows[j]["cFree1"].ToString(), ds.Rows[j]["cFree2"].ToString(), ds.Rows[j]["cFree3"].ToString(), ds.Rows[j]["cFree4"].ToString(), ds.Rows[j]["cFree5"].ToString(), ds.Rows[j]["cFree6"].ToString(), ds.Rows[j]["cFree7"].ToString(), ds.Rows[j]["cFree8"].ToString(), ds.Rows[j]["cFree9"].ToString(), ds.Rows[j]["cFree10"].ToString(), key08);
  293. //DBHelper.UpdateCurrentStock(cmd, ds.Rows[j]["cInvCode"].ToString(), cIWhCode, "", Convert.ToDecimal(ds.Rows[j]["iAVQuantity"].ToString()), key08);
  294. }
  295. #endregion
  296. iChildId--;
  297. }
  298. }
  299. cmd.Transaction.Commit();
  300. }
  301. catch (Exception ex)
  302. {
  303. cmd.Transaction.Rollback();
  304. log.Error(ex.Message);
  305. throw new Exception(ex.Message);
  306. }
  307. finally
  308. {
  309. if (conn.State == ConnectionState.Open)
  310. {
  311. conn.Close();
  312. }
  313. conn.Dispose();
  314. }
  315. }
  316. ResultFlag = true;
  317. return ResultFlag;
  318. }
  319. /// <summary>
  320. /// 记录日志
  321. /// </summary>
  322. /// <param name="Bills"></param>
  323. private void LogInfo(List<ICSDisassemblyDoc> Bills)
  324. {
  325. string HeadList = string.Empty;
  326. string BodyList = string.Empty;
  327. foreach (ICSDisassemblyDoc head in Bills)
  328. {
  329. HeadList += "\r\n 表头主键ID:" + head.ID + ",用户:" + head.User + ",站点:" + head.WorkPoint + "";
  330. }
  331. log.Info(HeadList);
  332. log.Info(BodyList);
  333. }
  334. }
  335. }