|
|
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 SalesShipmentDocNegative { 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"]; string bustype = string.Empty; /// <summary>
///获取销售出库单红字
/// </summary>
/// <param name="infos"></param>
/// <returns></returns>
public string Get(List<ICSSalesShipmentDocNegative> infos) {
List<ICSSalesShipmentDocNegative> szJson = new List<ICSSalesShipmentDocNegative>(); DataTable dt = null; string json = ""; if (infos.Count <= 0) { throw new Exception("传送数据为空！"); } string res = string.Empty; SqlConnection conn = new System.Data.SqlClient.SqlConnection(connString); conn.Open(); SqlTransaction sqlTran = conn.BeginTransaction(); SqlCommand cmd = new SqlCommand(); cmd.Transaction = sqlTran; cmd.Connection = conn; try { string sql = string.Empty; foreach (ICSSalesShipmentDocNegative info in infos) { if (info.MTime < new DateTime(2000, 01, 01)) throw new Exception("请输入正确的操作时间：" + info.MTime); sql = @"select a.ID,a.cCode,a.cCusCode,c.cCusName,a.cWhCode,d.cWhName,e.cordercode ,a.cMaker ,a.dnmaketime ,a.cHandler ,a.dnverifytime ,
b.AutoID,b.iRSRowNO ,b.cInvCode ,b.iQuantity ,b.iNum,e.AutoID from rdrecord32 a inner join rdrecords32 b on a.ID=b.ID left join DispatchLists e on a.cDLCode=e.DLID left join Customer c on a.cCusCode=c.cCusCode left join Warehouse d on a.cWhCode=d.cWhCode WHERE 1=1 and b.iquantity<0 ";
if (!string.IsNullOrWhiteSpace(info.SDNNEGCode)) { 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.SDNNEGCode, info.MTime, info.User); dt = DBHelper.SQlReturnData(sql, cmd); if (dt.Rows.Count <= 0 || dt == null) throw new Exception("红字销售出库单号：" + info.SDNNEGCode + "，无信息！"); json = JsonConvert.SerializeObject(dt); } cmd.Transaction.Commit(); return json; } 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(); } } /// <summary>
/// 创建销售出库单红字
/// </summary>
/// <param name="Bills"></param>
/// <returns></returns>
public string CreateSalesShipmentDocNegative(List<ICSSalesShipmentDocNegative> Bills) { string sql = ""; string msg = ""; DataTable dt = null; int iFatherId = 0; int iChildId = 0; string iFatherIdTwo = ""; int num = 0; //bool ResultFlag = false;
SqlConnection conn = new System.Data.SqlClient.SqlConnection(connString); conn.Open(); SqlTransaction sqlTran = conn.BeginTransaction(); SqlCommand cmd = new SqlCommand(); cmd.Transaction = sqlTran; cmd.Connection = conn; VouchKey key = new VouchKey(); try { if (Bills.Count <= 0) { throw new Exception("传送数据为空！"); } LogInfo(Bills); foreach (ICSSalesShipmentDocNegative head in Bills) { #region 检查 发货单状态
sql = @"SELECT a.DLID,a.cBusType,c.cRdCode,a.cSTCode,b.AutoID,b.irowno,a.cPersonCode,a.cCusCode,b.iDLsID,
a.cMemo,a.cShipAddress,a.cDepCode,cCusInvName,b.cBatch,a.caddcode,a.cCloser,a.cVerifier FROM dbo.DispatchList a INNER JOIN dbo.DispatchLists b ON a.DLID=b.DLID LEFT JOIN dbo.SaleType c ON c.cSTCode=a.cSTCode WHERE a.cDLCode ='" + head.SDNRTCode + "'";
cmd.CommandText = sql; DataTable dtDisCheck = DBHelper.SQlReturnData(sql, cmd); if (dtDisCheck != null && dtDisCheck.Rows.Count > 0) { foreach (DataRow item in dtDisCheck.Rows) { if (!string.IsNullOrEmpty(item["cCloser"].ToString())) { log.Info("DLID：" + head.ID); throw new Exception("ERP发货单已关闭，无法发货！发货单号：" + head.SDNNEGCode); } } bustype = dtDisCheck.Rows[0]["cBusType"].ToString(); } else { throw new Exception("销售发货单单号：" + head.ID + "在ERP内不存在！"); } #endregion
#region 检验发货单数量
foreach (ICSSalesShipmentDocNegatives body in head.details) { sql = "SELECT isnull(fOutQuantity,0) as fOutQuantity,ABS(iQuantity) as iQuantity FROM dbo.DispatchLists WHERE AutoID='" + body.SDNRTDetailID + "'"; DataTable dtfOutQty = DBHelper.SQlReturnData(sql, cmd); if (dtfOutQty != null && dtfOutQty.Rows.Count > 0) { decimal fOutQty = Convert.ToDecimal(dtfOutQty.Rows[0]["fOutQuantity"]); decimal iQuantity = Convert.ToDecimal(dtfOutQty.Rows[0]["iQuantity"]); if (fOutQty + body.Quantity > iQuantity) { throw new Exception("可出库数量超过发货单表体出库数量！"); } } else { throw new Exception("发货单表体不存在！"); } }
#endregion
#region 红字销售出库单表头
num = head.details.Count(); DateTime time = DateTime.Now; Dictionary<string, int> dic = DBHelper.GetAllCode("" + ERPDB + "", "ShipmentDoc", "" + num + ""); iFatherId = Convert.ToInt32(dic["iFatherId"].ToString()); iChildId = Convert.ToInt32(dic["iChildId"].ToString()); DateTime date = DateTime.Now; string iBaseCodeLen = DBHelper.GetAllRDCode("0303", "" + time + "", "admin");
sql = @"INSERT INTO dbo.rdrecord32
( ID ,bRdFlag ,cVouchType ,cBusType ,cSource ,cBusCode ,cWhCode , dDate ,cCode ,cRdCode ,cDepCode ,cPersonCode ,cSTCode ,cCusCode , cDLCode ,cHandler ,cMemo ,bTransFlag ,cMaker ,cDefine1 ,cDefine2 , cDefine3 ,cDefine4 ,cDefine5 ,cDefine6 ,cDefine7 ,cDefine8 ,cDefine9 , cDefine10 ,dVeriDate ,bpufirst ,biafirst ,VT_ID ,bIsSTQc ,cDefine11 , cDefine12 ,cDefine13 ,cDefine14 ,cDefine15 ,cDefine16 ,cShipAddress , caddcode ,bOMFirst ,bFromPreYear ,bIsComplement ,iDiscountTaxType , ireturncount ,iverifystate ,iswfcontrolled ,dnmaketime ,dnverifytime , iPrintCount ,cinvoicecompany) SELECT @ID,0,32,a.cBusType,'发货单',a.cDLCode,@cWhCode, CONVERT(NVARCHAR(15),GETDATE(),23),@cCode,'21',a.cDepCode,a.cPersonCode,a.cSTCode,a.cCusCode, a.DLID,@cHandler,a.cMemo,0,@cMaker,a.cDefine1,a.cDefine2, a.cDefine3,a.cDefine4,a.cDefine5,a.cDefine6,a.cDefine7,a.cDefine8,a.cDefine9, a.cDefine10,CONVERT(NVARCHAR(15),GETDATE(),23),0,0,@VT_ID,0,a.cDefine11, a.cDefine12,a.cDefine13,a.cDefine14,a.cDefine15,a.cDefine16,a.cShipAddress, a.caddcode,null,0,0,0, 0,0,0,GETDATE(),GETDATE(), 0,a.cinvoicecompany FROM dbo.DispatchList a WHERE a.cDLCode ='" + head.SDNRTCode + "'";
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("@cDepCode", "")); 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("@dDate", data.dMate));
cmd.CommandText = sql; try { int count = cmd.ExecuteNonQuery(); if (count <= 0) { log.Error("生成红字销售出库单表头失败，受影响行数<=0；"); throw new Exception("生成红字销售出库单表头失败，受影响行数<=0；"); } } catch (Exception ex) { log.Error("生成红字销售出库单表头失败！销售出库单号：" + head.SDNNEGCode + "；异常：" + ex.Message + "；SQL：\r\n" + sql, ex); throw new Exception("生成红字销售出库单表头失败！销售出库单号：" + head.SDNNEGCode + "；异常：" + ex.Message + "；SQL：\r\n" + sql, ex); } #endregion
#region 红字销售出库单表体
foreach (ICSSalesShipmentDocNegatives body in head.details) { //iChildId -= 1;
////if (head.IsReturn == "1")
////{
//body.Quantity = -body.Quantity;
//}
//else
//{
//判断物料批号与现存量表批号是否一致、数量不能超过现存量物料数量
//sql = @"SELECT cBatch,iQuantity from CurrentStock WHERE cInvCode='" + body.InvCode + "'AND cBatch='" + "" + "'and cWhCode='" + head.WHCode + "'";
//DataTable dtItem = DBHelper.SQlReturnData(sql, cmd);
//if (dtItem != null && dtItem.Rows.Count > 0)
//{
// //if (!dtItem.Rows[0]["cBatch"].ToString().Equals(body.cBatch))
// //{
// // throw new Exception("物料条码的批号与U8现存量物料批号不一致,物料:" + body.cInvCode);
// //}
// if (Convert.ToDecimal(dtItem.Rows[0]["iQuantity"].ToString()) < body.Quantity)
// {
// throw new Exception("物料条码的数量大于U8现存量物料数量,物料:" + body.InvCode);
// }
//}
//else
//{
// throw new Exception("物料:" + body.InvCode + "在现存量表中不存在!");
//}
//}
sql = @"INSERT INTO dbo.rdrecords32
( AutoID ,ID ,cInvCode ,iQuantity ,cBatch ,iFlag , cDefine22 ,cDefine23 ,cDefine24 ,cDefine25 ,cDefine26 , cDefine27 ,cItem_class ,cItemCode ,iDLsID ,iNQuantity , cDefine28 ,cDefine29 ,cDefine30 ,cDefine31 ,cDefine32 , cDefine33 ,cDefine34 ,cDefine35 ,cDefine36 ,cDefine37 , bLPUseFree ,iRSRowNO ,iOriTrackID ,ccusinvcode,ccusinvname,bCosting ,bVMIUsed , cbdlcode ,iExpiratDateCalcu ,iorderdid ,iordertype , iordercode ,iorderseq ,ipesodid ,ipesotype ,cpesocode , ipesoseq ,isodid ,isotype ,csocode ,isoseq ,irowno , bIAcreatebill ,bsaleoutcreatebill ,isaleoutid ,bneedbill,iposflag ) SELECT @AutoID,@ID,@cInvCode,@iQuantity,@cBatch,0, a.cDefine22,a.cDefine23,a.cDefine24,a.cDefine25,a.cDefine26, a.cDefine27,a.cItem_class,a.cItemCode,a.AutoID,a.iQuantity, a.cDefine28,a.cDefine29,a.cDefine30,a.cDefine31,a.cDefine32, a.cDefine33,a.cDefine34,a.cDefine35,a.cDefine36,a.cDefine37, 0,0,0,a.cCusInvCode,a.cCusInvName,1,0, b.cDLCode,0,a.iSOsID,1, d.cSOCode,c.iRowNo,a.iSOsID,1,d.cSOCode, 1,a.iSOsID,1,d.cSOCode,c.iRowNo,@irowno, 1,1,@AutoID,1,null FROM dbo.DispatchLists a INNER JOIN dbo.DispatchList b ON a.DLID=b.DLID LEFT JOIN dbo.SO_SODetails c ON a.iSOsID=c.iSOsID LEFT JOIN dbo.SO_SOMain d ON c.ID=d.ID WHERE a.AutoID='" + body.SDNRTDetailID + "'";
cmd.Parameters.Clear(); cmd.Parameters.Add(new SqlParameter("@AutoID", iChildId)); cmd.Parameters.Add(new SqlParameter("@ID", iFatherId)); cmd.Parameters.Add(new SqlParameter("@cInvCode", body.InvCode)); cmd.Parameters.Add(new SqlParameter("@iQuantity", -body.Quantity)); cmd.Parameters.Add(new SqlParameter("@cBatch", "")); cmd.Parameters.Add(new SqlParameter("@irowno", body.Sequence)); cmd.CommandText = sql; try { int count = cmd.ExecuteNonQuery(); if (count <= 0) { log.Error("生成红字销售出库单表体失败，受影响行数<=0；"); throw new Exception("生成红字销售出库单表体失败，受影响行数<=0；"); } } catch (Exception ex) { log.Error("生成红字销售出库单表体失败！销售出库单号：" + head.SDNNEGCode + "；异常：" + ex.Message + "；SQL：\r\n" + sql, ex); throw new Exception("生成红字销售出库单表体失败！销售出库单号：" + head.SDNNEGCode + "；异常：" + ex.Message + "；SQL：\r\n" + sql, ex); }
#region 更新现存量 现存量表待出库数量增加
key.cBustypeUN = bustype; key.cVouchTypeUN = "32"; key.TableName = "IA_ST_UnAccountVouch32"; DBHelper.UpdateCurrentStock(cmd, body.InvCode, head.WHCode, "", body.Quantity, key); #endregion
log.Debug(sql); #region 回写销售订单累计发货数量,回写销售发货单累计出库数量
sql = @"UPDATE a SET a.foutquantity=ISNULL(a.foutquantity,0)+" + -body.Quantity + @"
FROM dbo.SO_SODetails a LEFT JOIN dbo.DispatchLists b ON a.iSOsID=b.iSOsID WHERE b.AutoID='" + body.SDNRTDetailID + "'";
DBHelper.CmdExecuteNonQuery(sql, cmd, "回写销售订单累计发货数量失败！");
sql = "Update DispatchLists set fOutQuantity=isnull(fOutQuantity,0)+" + -body.Quantity + " where AutoID='" + body.SDNRTDetailID + "' "; DBHelper.CmdExecuteNonQuery(sql, cmd, "回写销售发货单累计出库数量失败！"); iChildId--; #endregion
} #endregion
iFatherIdTwo += "'" + iFatherId + "',"; } #region 查询
sql = @"
select distinct a.ID as ID, a.ID as IDs,a.cCode as SDNNEGCode,a.cCusCode as CusCode, c.cCusName as CusName,a.cWhCode as WHCode,d.cWhName as WHName,e.cordercode , a.cMaker as CreateUser ,a.dnmaketime as CreateDateTime ,a.cHandler as Checker , a.dnverifytime as CheckDateTime from rdrecord32 a left join DispatchLists e on a.cDLCode=e.DLID left join Customer c on a.cCusCode=c.cCusCode left join Warehouse d on a.cWhCode=d.cWhCode WHERE 1=1 and a.ID in({0})
select distinct a.ID as IDs,b.AutoID as DetailID,b.irowno as Sequence,b.cInvCode as InvCode ,b.iQuantity as Quantity , b.iNum as Amount,b.iDLsID as SDNRTDetailID from rdrecord32 a inner join rdrecords32 b on a.ID=b.ID left join Customer c on a.cCusCode=c.cCusCode left join Warehouse d on a.cWhCode=d.cWhCode WHERE 1=1 and a.ID in({0})";
sql = string.Format(sql, iFatherIdTwo.TrimEnd(',')); DataSet ds = DBHelper.SQlReturnDataSet(sql, cmd); string RelationName = "details"; DataRelation dr = new DataRelation(RelationName, ds.Tables[0].Columns["IDs"], ds.Tables[1].Columns["IDs"]); ds.Relations.Add(dr);
#endregion
msg = DBHelper.DataSetToJson(ds, RelationName); cmd.Transaction.Commit(); //ResultFlag = true;
return msg; } 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(); } } /// <summary>
/// 删除销售出库单红字
/// </summary>
/// <param name="infos"></param>
/// <returns></returns>
public string Delete(List<ICSSalesShipmentDocNegative> infos) { List<ICSSalesShipmentDocNegative> szJson = new List<ICSSalesShipmentDocNegative>(); if (infos.Count <= 0) { throw new Exception("传送数据为空！"); } string res = string.Empty; SqlConnection conn = new System.Data.SqlClient.SqlConnection(connString); conn.Open(); SqlTransaction sqlTran = conn.BeginTransaction(); SqlCommand cmd = new SqlCommand(); cmd.Transaction = sqlTran; cmd.Connection = conn; try { string sql = string.Empty; foreach (ICSSalesShipmentDocNegative info in infos) { if (info.MTime < new DateTime(2000, 01, 01)) throw new Exception("请输入正确的操作时间：" + info.MTime); sql = @"delete rdrecord11 where rdrecord32.ID='" + info.ID + "'"; sql += @"delete rdrecords11 where rdrecords32.ID='" + info.ID + "'"; //UPDATE dbo.rdrecord11 a SET cHandler='" + info.User + @"' ,
// dVeriDate=CONVERT(VARCHAR(50),GETDATE(),112),dnverifytime=GETDATE()
// WHERE a.ID='" + info.ID + "'";
DBHelper.CmdExecuteNonQuery(sql, cmd, "删除红字销售出单失败！"); } cmd.Transaction.Commit(); return res; } 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(); } } /// <summary>
/// 审核销售出库单
/// </summary>
/// <param name="infos"></param>
/// <returns></returns>
public string Approve(List<ICSSalesShipmentDocNegative> infos) { List<ICSSalesShipmentDocNegative> szJson = new List<ICSSalesShipmentDocNegative>(); DataTable dt = null; string json = ""; if (infos.Count <= 0) { throw new Exception("传送数据为空！"); } string res = string.Empty; SqlConnection conn = new System.Data.SqlClient.SqlConnection(connString); conn.Open(); SqlTransaction sqlTran = conn.BeginTransaction(); SqlCommand cmd = new SqlCommand(); cmd.Transaction = sqlTran; cmd.Connection = conn; try { string sql = string.Empty; foreach (ICSSalesShipmentDocNegative info in infos) { if (info.MTime < new DateTime(2000, 01, 01)) throw new Exception("请输入正确的操作时间：" + info.MTime); sql = @"UPDATE rdrecord32 SET cHandler ='" + info.User + @"' ,
dnverifytime=CONVERT(VARCHAR(50),GETDATE(),112),dVeriDate=GETDATE() WHERE ID='{0}'";
sql = string.Format(sql, info.ID); DBHelper.CmdExecuteNonQuery(sql, cmd, "审核红字销售出单失败！"); } cmd.Transaction.Commit(); return json; } 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(); } } /// <summary>
///
/// 记录日志
/// </summary>
/// <param name="Bills"></param>
private void LogInfo(List<ICSSalesShipmentDocNegative> Bills) { string HeadList = string.Empty; string BodyList = string.Empty; foreach (ICSSalesShipmentDocNegative head in Bills) { HeadList += "\r\n 表头主键ID：" + head.ID + "，仓库：" + head.WHCode + "，用户：" + head.User; foreach (ICSSalesShipmentDocNegatives body in head.details) { BodyList += "\r\n 表体主键ID： " + body.SDNRTDetailID + "，数量：" + body.Quantity; } } log.Info(HeadList); log.Info(BodyList); } }}
|
