|
|
using ICSSoft.Common;using ICSSoft.Entity;using Newtonsoft.Json;using System;using System.Collections.Generic;using System.Data;using System.Data.SqlClient;using System.Linq;using System.Text;using System.Threading.Tasks;
namespace ICSSoft.DataProject{ /// <summary>
/// 委外退料
/// </summary>
public class OutsourcingIssueDoNegative { private static log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType); private static string connString = System.Configuration.ConfigurationManager.AppSettings["ERPConnStr"]; private static string ERPDB = System.Configuration.ConfigurationManager.AppSettings["ERPDB"]; private static string Type = System.Configuration.ConfigurationManager.AppSettings["Type"]; public string Get(List<ICSOutsourcingIssueDoc> infos) { List<ICSOutsourcingIssueDoc> szJson = new List<ICSOutsourcingIssueDoc>(); DataTable dt = null; DataTable dtNew = null; string connS = ""; string json = ""; if (infos.Count <= 0) { throw new Exception("传送数据为空！"); } string res = string.Empty; SqlConnection conn = new SqlConnection(); SqlCommand cmd = new SqlCommand(); string sql = string.Empty; foreach (ICSOutsourcingIssueDoc info in infos) { try { connS = string.Format(connString, info.WorkPoint); conn = new System.Data.SqlClient.SqlConnection(connS); conn.Open(); SqlTransaction sqlTran = conn.BeginTransaction(); cmd = new SqlCommand(); cmd.Transaction = sqlTran; cmd.Connection = conn; if (info.MTime < new DateTime(2000, 01, 01)) throw new Exception("请输入正确的操作时间：" + info.MTime); sql = @" select a.ID,iMPoIds,iordercode,a.cCode,a.cDepCode,c.cDepName,a.cWhCode,
d.cWhName,a.cSource,a.cMaker,dnmaketime,cHandler,dnverifytime,cSourceCodeLs, b.AutoID ,b.irowno,b.cInvCode,b.iQuantity,e.MoDetailsID,b.iNum,e.csocode from rdrecord11 a left join rdrecords11 b on a.ID=b.ID left join Department c on a.cDepCode=c.cDepCode left join Warehouse d on a.cWhCode=d.cWhCode left join OM_MODetails e on b.iOMoDID=e.MoDetailsID where a.cBusType='委外发料'and b.iQuantity<0";
if (!string.IsNullOrWhiteSpace(info.IssueCode)) { sql += " and a.cCode='{0}'"; } if (!string.IsNullOrWhiteSpace(info.MTime.ToString())) { sql += " and ISNULL(a.dnmodifytime,ISNULL(a.dnverifytime, ISNULL(a.dnmodifytime, a.dnmaketime)))>='{1}'"; } if (!string.IsNullOrWhiteSpace(info.User)) { sql += "and a.CMAKER='{2}'"; } sql = string.Format(sql, info.IssueCode, info.MTime, info.User); dt = DBHelper.SQlReturnData(sql, cmd);
if (dt.Rows.Count <= 0 || dt == null) throw new Exception("委外发料单：" + info.IssueCode + "，无信息！"); dtNew.Merge(dt); cmd.Transaction.Commit(); } catch (Exception ex) { cmd.Transaction.Rollback(); log.Error(ex.Message); throw new Exception(ex.Message); } finally { if (conn.State == ConnectionState.Open) { conn.Close(); } conn.Dispose(); } }
json = JsonConvert.SerializeObject(dtNew); return json;
} public string CreateOutsourcingIssueDoNegative(List<ICSOutsourcingIssueDoc> Bills) { string msg = ""; string sql = string.Empty; DataTable dt = null; DataTable dtNew1 = null; DataTable dtNew2 = null; string connS = ""; int num = 0;
//取得out库单的默认显示模版
//取得采购入库单单据 表头ID，表体DID
VouchKey key = new VouchKey(); SqlConnection conn = new SqlConnection(); SqlCommand cmd = new SqlCommand(); if (Bills.Count <= 0) { throw new Exception("传送数据为空！"); } LogInfo(Bills);
foreach (ICSOutsourcingIssueDoc head in Bills) { try { string iFatherIdTwo = ""; connS = string.Format(connString, head.WorkPoint); conn = new System.Data.SqlClient.SqlConnection(connS); conn.Open(); SqlTransaction sqlTran = conn.BeginTransaction(); cmd = new SqlCommand(); cmd.Transaction = sqlTran; cmd.Connection = conn;
string[] ss = head.WorkPoint.Split('_'); ERPDB = ss[1];
if (head.details.Count <= 0) { throw new Exception("表体信息不存在！"); } #region 判断委外订单是否已关闭
sql = @"SELECT distinct isnull(b.cbCloser,'') as CloseUser
from dbo.OM_MOMaterials a INNER JOIN OM_MODetails b ON a.MoDetailsID = b.MoDetailsID where a.MOMaterialsID='" + head.details[0].SourceDetailID + "'";
DataTable dtClose = DBHelper.SQlReturnData(sql, cmd); if (dtClose != null && dtClose.Rows.Count > 0) { if (!string.IsNullOrEmpty(dtClose.Rows[0][0].ToString())) { throw new Exception("该委外订单行已关闭，无法领料！"); } } #endregion
#region 判断物料是否超额领取
foreach (ICSOutsourcingIssueDocs body in head.details) { sql = @"SELECT isnull(b.fOutExcess,0) as fOutExcess,isnull(a.iSendQTY,0) as IssQty,a.iQuantity
FROM dbo.OM_MOMaterials a LEFT JOIN dbo.Inventory b ON a.cInvCode=b.cInvCode WHERE a.MOMaterialsID='" + body.SourceDetailID + "'";
DataTable dtQty = DBHelper.SQlReturnData(sql, cmd); if (dtQty != null && dtQty.Rows.Count > 0) { //可超领比率
decimal fOutExcess = Convert.ToDecimal(dtQty.Rows[0]["fOutExcess"]); //已领数量
decimal IssQty = Convert.ToDecimal(dtQty.Rows[0]["IssQty"]); //应领数量
decimal Qty = Convert.ToDecimal(dtQty.Rows[0]["iQuantity"]); //当前可总领数量
decimal TotalQty = Qty + fOutExcess * Qty; //if (head.IsReturn != "1")
//{
//if (IssQty + body.Quantity > TotalQty)
//{
// throw new Exception("物料领取超过当前可领用最大数，AllocateId：" + body.SourceDetailID);
//}
//}
//else
//{
if (IssQty < body.Quantity) { throw new Exception("物料退料超过当前已领用最大数，AllocateId：" + body.SourceDetailID); } //}
} else { throw new Exception("委外订单行子件不存在！AllocateId：" + body.SourceDetailID); } }
#endregion
#region 委外退料表头
num = head.details.Count(); //取得out库单的默认显示模版
Dictionary<string, int> dic = DBHelper.GetAllCode("" + ERPDB + "", "rd", "" + num + ""); int iFatherId = Convert.ToInt32(dic["iFatherId"].ToString()); int iChildId = Convert.ToInt32(dic["iChildId"].ToString()); DateTime date = DateTime.Now; string iBaseCodeLen = DBHelper.GetAllRDCode("26", "" + date + "", "admin"); sql = @"
INSERT INTO dbo.rdrecord11 ( ID ,bRdFlag ,cVouchType ,cBusType ,cSource , cWhCode ,dDate ,cCode ,cRdCode ,cDepCode, cPersonCode,cHandler ,bTransFlag ,cMaker ,dVeriDate , bpufirst ,biafirst ,VT_ID ,bIsSTQc ,cPsPcode , cMPoCode ,iproorderid ,bFromPreYear ,bIsLsQuery ,bIsComplement , iDiscountTaxType ,ireturncount ,iverifystate ,iswfcontrolled ,dnmaketime , dnverifytime ,bredvouch ,iPrintCount,cVenCode,iMQuantity)
SELECT distinct @ID,0,'11','委外发料','委外订单', @cWhCode,CONVERT(NVARCHAR(15),GETDATE(),23),@cCode,'22',c.cDepCode, c.cPersonCode,@cHandler,0,@cMaker,CONVERT(NVARCHAR(15),GETDATE(),23), 0,0,@VT_ID,0,b.cInvCode, c.cCode,a.MoId,0,0,0, 0,0,0,0,GETDATE(), GETDATE(),@bredvouch,0,c.cVenCode,b.iQuantity from dbo.OM_MOMaterials a INNER JOIN dbo.OM_MODetails b ON a.MoDetailsID = b.MoDetailsID LEFT JOIN dbo.OM_MOMain c ON b.MOID = c.MOID WHERE a.MOMaterialsID='" + head.details[0].SourceDetailID + "'";
cmd.Parameters.Clear(); cmd.Parameters.Add(new SqlParameter("@ID", iFatherId)); cmd.Parameters.Add(new SqlParameter("@cWhCode", head.WHCode)); cmd.Parameters.Add(new SqlParameter("@cCode", iBaseCodeLen)); cmd.Parameters.Add(new SqlParameter("@cHandler", head.User)); cmd.Parameters.Add(new SqlParameter("@cMaker", head.User)); cmd.Parameters.Add(new SqlParameter("@VT_ID", iChildId)); cmd.Parameters.Add(new SqlParameter("@bredvouch", "0")); cmd.CommandText = sql; try { int count = cmd.ExecuteNonQuery(); if (count <= 0) { log.Error("生成材料出库单表头失败，受影响行数<=0；"); throw new Exception("生成材料出库单表头失败，受影响行数<=0；"); } } catch (Exception ex) { log.Error("生成材料出库单表头失败！SQL：\r\n" + sql, ex); throw new Exception("生成材料出库单表头失败！SQL：\r\n" + sql, ex); }
#endregion
#region 委外退料表体
string iNQuantity = ""; foreach (ICSOutsourcingIssueDocs body in head.details) { body.Quantity = -body.Quantity; iNQuantity = "-a.iQuantity"; sql = @"INSERT INTO dbo.rdrecords11
( AutoID,ID ,cInvCode,iQuantity ,cBatch , iFlag ,cItemCode ,cName ,iNQuantity ,iMPoIds , bLPUseFree ,iOriTrackID ,bCosting ,bVMIUsed ,cmocode , invcode ,imoseq ,iopseq ,iExpiratDateCalcu ,iorderdid , iordertype ,isotype ,ipesodid ,ipesotype ,cpesocode , ipesoseq ,irowno ,bcanreplace ,iposflag,iOMoDID, iOMoMID,comcode,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10)
SELECT distinct @AutoID,@ID,a.cInvCode,@iQuantity,@cBatch, 0,null,null,@iQuantity,NULL, 0,0,1,0,NULL, b.cInvCode,NULL,NULL,0,0, 0,0,a.MOMaterialsID,'6',c.cCode, NULL, @irowno,0,NULL,b.MODetailsID, a.MOMaterialsID,c.cCode,@cFree1,@cFree2,@cFree3,@cFree4,@cFree5,@cFree6,@cFree7,@cFree8,@cFree9,@cFree10 FROM dbo.OM_MOMaterials a INNER JOIN dbo.OM_MODetails b ON a.MoDetailsID=b.MODetailsID INNER JOIN dbo.OM_MOMain c ON b.MOID=c.MOID WHERE a.MOMaterialsID='" + body.SourceDetailID + "'";
cmd.Parameters.Clear(); cmd.Parameters.Add(new SqlParameter("@AutoID", iChildId)); cmd.Parameters.Add(new SqlParameter("@ID", iFatherId)); cmd.Parameters.Add(new SqlParameter("@iQuantity", body.Quantity)); //cmd.Parameters.Add(new SqlParameter("@cCode", iBaseCodeLen));
cmd.Parameters.Add(new SqlParameter("@cBatch", body.BatchCode)); cmd.Parameters.Add(new SqlParameter("@irowno", body.Sequence)); cmd.Parameters.Add(new SqlParameter("@iNQuantity", iNQuantity)); cmd.Parameters.Add(new SqlParameter("@cFree1", body.cFree1)); cmd.Parameters.Add(new SqlParameter("@cFree2", body.cFree2)); cmd.Parameters.Add(new SqlParameter("@cFree3", body.cFree3)); cmd.Parameters.Add(new SqlParameter("@cFree4", body.cFree4)); cmd.Parameters.Add(new SqlParameter("@cFree5", body.cFree5)); cmd.Parameters.Add(new SqlParameter("@cFree6", body.cFree6)); cmd.Parameters.Add(new SqlParameter("@cFree7", body.cFree7)); cmd.Parameters.Add(new SqlParameter("@cFree8", body.cFree8)); cmd.Parameters.Add(new SqlParameter("@cFree9", body.cFree9)); cmd.Parameters.Add(new SqlParameter("@cFree10", body.cFree10)); cmd.CommandText = sql; try { int count = cmd.ExecuteNonQuery(); if (count <= 0) { log.Error("生产退料单表体失败，受影响行数<=0；"); throw new Exception("生产退料单表体失败，受影响行数<=0；"); } } catch (Exception ex) { log.Error("生产退料单表体失败" + sql, ex); throw new Exception("生产退料单表体失败 " + sql, ex); }
if (head.UpdateStock) { //更新现存量
key.cBustypeUN = "委外发料"; key.cVouchTypeUN = "11"; key.TableName = "IA_ST_UnAccountVouch11"; //DBHelper.UpdateCurrentStock(cmd, body.InvCode, head.WHCode, "", -body.Quantity, key);
DBHelper.UpdateCurrentStockNEW(cmd, body.InvCode, head.WHCode, body.BatchCode, -body.Quantity, body.cFree1, body.cFree2, body.cFree3, body.cFree4, body.cFree5, body.cFree6, body.cFree7, body.cFree8, body.cFree9, body.cFree10, key); }
#region 回写工单子件已领数量
sql = "update OM_MOMaterials set iSendQTY=isnull(iSendQTY,0)+" + body.Quantity + " where MOMaterialsID='" + body.SourceDetailID + "' "; DBHelper.CmdExecuteNonQuery(sql, cmd, "回写委外订单子件已领数量失败！"); #endregion
iFatherIdTwo += "'" + iFatherId + "',"; iChildId--; }
#endregion
#region 查询
sql = @"select a.ID as ID,a.ID as IDs,a.cCode as IssueNEGCode,a.cDepCode,c.cDepName,a.cWhCode,
d.cWhName,a.cSource,cMPoCode,a.cMaker,dnmaketime,cHandler,dnverifytime from rdrecord11 a left join Department c on a.cDepCode=c.cDepCode left join Warehouse d on a.cWhCode=d.cWhCode where a.cBusType='委外发料' and a.ID in ({0})
select a.ID as IDs,iOMoMID as SourceDetailID,b.irowno as Sequence ,iordercode,b.cInvCode,b.iQuantity,b.iNum,b.AutoID as DetailID from rdrecord11 a left join rdrecords11 b on a.ID=b.ID left join Department c on a.cDepCode=c.cDepCode left join Warehouse d on a.cWhCode=d.cWhCode left join OM_MODetails e on b.iOMoDID=e.MoDetailsID where a.cBusType='委外发料' and a.ID in ({0})";
sql = string.Format(sql, iFatherIdTwo.TrimEnd(',')); DataSet ds = DBHelper.SQlReturnDataSet(sql, cmd); dtNew1.Merge(ds.Tables[0]); dtNew2.Merge(ds.Tables[1]); // sql = @" select a.ID as ID,iMPoIds,iordercode,a.cCode,a.cDepCode,c.cDepName,a.cWhCode,
// d.cWhName,a.cSource,a.cMaker,dnmaketime,cHandler,dnverifytime,cSourceCodeLs,
// b.AutoID ,b.irowno,b.cInvCode,b.iQuantity,e.MoDetailsID,b.iNum,e.csocode
// from rdrecord11 a
// left join rdrecords11 b on a.ID=b.ID
// left join Department c on a.cDepCode=c.cDepCode
// left join Warehouse d on a.cWhCode=d.cWhCode
// left join OM_MODetails e on b.iOMoDID=e.MoDetailsID
// where a.cBusType='委外发料'and b.iQuantity<0 and a.ID in ({0})";
// sql = string.Format(sql, iFatherIdTwo.TrimEnd(','));
// dt = DBHelper.SQlReturnData(sql, cmd);
#endregion
cmd.Transaction.Commit(); } catch (Exception ex) { cmd.Transaction.Rollback(); log.Error(ex.Message); throw new Exception(ex.Message); } finally { if (conn.State == ConnectionState.Open) { conn.Close(); } conn.Dispose(); }
} string RelationName = "details"; DataRelation dh = new DataRelation(RelationName, dtNew1.Columns["IDs"], dtNew2.Columns["IDs"]); DataSet dz = new DataSet(); dz.Relations.Add(dh); msg = DBHelper.DataSetToJson(dz, RelationName); return msg; } public string Approve(List<ICSOutsourcingIssueDoc> infos) { List<ICSOutsourcingIssueDoc> szJson = new List<ICSOutsourcingIssueDoc>(); string connS = ""; string json = ""; if (infos.Count <= 0) { throw new Exception("传送数据为空！"); } string res = string.Empty; SqlConnection conn = new SqlConnection(); SqlCommand cmd = new SqlCommand(); string sql = string.Empty; foreach (ICSOutsourcingIssueDoc info in infos) { try { connS = string.Format(connString, info.WorkPoint); conn = new System.Data.SqlClient.SqlConnection(connS); conn.Open(); SqlTransaction sqlTran = conn.BeginTransaction(); cmd = new SqlCommand(); cmd.Transaction = sqlTran; cmd.Connection = conn; if (info.MTime < new DateTime(2000, 01, 01)) throw new Exception("请输入正确的操作时间：" + info.MTime); sql = @"UPDATE dbo.rdrecord11 SET cHandler ='" + info.User + @"' ,
dnmodifytime =CONVERT(VARCHAR(50),GETDATE(),112),dModifyDate =GETDATE() WHERE ID='{0}'";
sql = string.Format(sql, info.ID); DBHelper.CmdExecuteNonQuery(sql, cmd, "未查询到对应数据！"); cmd.Transaction.Commit(); } catch (Exception ex) { cmd.Transaction.Rollback(); log.Error(ex.Message); throw new Exception(ex.Message); } finally { if (conn.State == ConnectionState.Open) { conn.Close(); } conn.Dispose(); } }
return json;
} /// <summary>
/// 删除请购单
/// </summary>
/// <param name="infos"></param>
/// <returns></returns>
public string Delete(List<ICSOutsourcingIssueDoc> infos) { List<ICSOutsourcingIssueDoc> szJson = new List<ICSOutsourcingIssueDoc>(); if (infos.Count <= 0) { throw new Exception("传送数据为空！"); } DataTable dtNew = null; string connS = ""; string res = string.Empty; SqlConnection conn = new SqlConnection(); SqlCommand cmd = new SqlCommand(); string sql = string.Empty; foreach (ICSOutsourcingIssueDoc info in infos) { try { connS = string.Format(connString, info.WorkPoint); conn = new System.Data.SqlClient.SqlConnection(connS); conn.Open(); SqlTransaction sqlTran = conn.BeginTransaction(); cmd = new SqlCommand(); cmd.Transaction = sqlTran; cmd.Connection = conn; if (info.MTime < new DateTime(2000, 01, 01)) throw new Exception("请输入正确的操作时间：" + info.MTime); sql = @" DELETE dbo.rdrecord11 WHERE ID='{0}'"; sql = string.Format(sql, info.ID); DBHelper.CmdExecuteNonQuery(sql, cmd, "未查询到对应数据！"); cmd.Transaction.Commit(); } catch (Exception ex) { cmd.Transaction.Rollback(); log.Error(ex.Message); throw new Exception(ex.Message); } finally { if (conn.State == ConnectionState.Open) { conn.Close(); } conn.Dispose(); } }
return res;
} /// <summary>
///
/// 记录日志
/// </summary>
/// <param name="Bills"></param>
private void LogInfo(List<ICSOutsourcingIssueDoc> Bills) { string HeadList = string.Empty; string BodyList = string.Empty; foreach (ICSOutsourcingIssueDoc head in Bills) { HeadList += "\r\n 表头主键ID：" + head.ID + "，仓库：" + head.WHCode + "，用户：" + head.User + "，站点：" + head.WorkPoint; foreach (ICSOutsourcingIssueDocs body in head.details) { BodyList += "\r\n 表体主键ID： " + body.SourceDetailID + "，数量：" + body.Quantity; } } log.Info(HeadList); log.Info(BodyList); } }}
|
