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 OutsourcingIssueDoc
{
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"];
private static string CRNALL = System.Configuration.ConfigurationManager.AppSettings["OutIssCRDNAME"];
public string Get(List<ICSOutsourcingIssueDoc> infos)
{
List<ICSOutsourcingIssueDoc> szJson = new List<ICSOutsourcingIssueDoc>();
DataTable dt = null;
string json = "";
DataTable dtNew = null;
string connS = "";
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 as ID,a.ID as IDs,a.cCode as IssueCode,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='委外发料'
select a.ID as IDs,iMPoIds 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='委外发料'";
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 + "，无信息！");
if (dtNew == null)
dtNew = dt;
else
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 CreateOutsourcingIssueDoc(List<ICSOutsourcingIssueDoc> Bills)
{
string msg = "";
string sql = string.Empty;
DataTable dtNew1 = null;
DataTable dtNew2 = null;
string connS = "";
int num = 0;
//取得out库单的默认显示模版
//取得采购入库单单据 表头ID，表体DID
VouchKey key = new VouchKey();
SqlConnection conn = new System.Data.SqlClient.SqlConnection(connString);
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 (DBHelper.IsInventoryConsolidation(cmd, head.WorkPoint))
{
}
else
{
throw new Exception("U8正在整理现存量，请稍后再试");
}
num = head.details.Count();
string[] dd = CRNALL.Split('~');
string crdname = dd[0];
string carname = dd[1];
string surface = dd[2];
string cardnewcode = DBHelper.GetCardNumber(carname, cmd);
string cRDcode = DBHelper.GetRDCode(crdname, cmd);
Dictionary<string, int> dic = DBHelper.GetAllCode("" + ERPDB + "", surface, "" + num + "", head.WorkPoint);
int iFatherId = Convert.ToInt32(dic["iFatherId"].ToString());
int iChildId = Convert.ToInt32(dic["iChildId"].ToString());
DateTime date = DateTime.Now;
string iBaseCodeLen = DBHelper.GetAllRDCode(cardnewcode, "" + date + "", "admin", head.WorkPoint);
string DEF_ID = DBHelper.GetDefaultTemplate(cardnewcode, cmd);
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 委外材料出库单表头
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,@cRDcode,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(),0,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", DEF_ID));
cmd.Parameters.Add(new SqlParameter("@cRDcode", cRDcode));
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 = "";
int irowno = 0;
foreach (ICSOutsourcingIssueDocs body in head.details)
{
irowno++;
//if (head.IsReturn == "1")
//{
// body.iQuantity = -body.iQuantity;
// iNQuantity = "-a.iQuantity";
//}
//else
//{
iNQuantity = "a.iQuantity";
//}
//if (head.IsReturn == "0")
//{
// //判断物料批号与现存量表批号是否一致、数量不能超过现存量物料数量
// sql = @"SELECT cBatch,iQuantity from CurrentStock WHERE cInvCode='" + body.cInvCode + "'AND cBatch='" + body.cBatch + "'and cWhCode='" + head.cWhCode + "'";
// DataTable dtItem = U8Helper.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.iQuantity)
// {
// throw new Exception("物料条码的数量大于U8现存量物料数量,物料:" + body.cInvCode);
// }
// }
// else
// {
// throw new Exception("物料:" + body.cInvCode + "在现存量表中不存在!");
// }
//}
sql = @"INSERT INTO dbo.rdrecords11
( AutoID,ID ,cInvCode,iQuantity ,cBatch ,iNum,
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)
SELECT distinct
@AutoID,@ID,@InvCode,@iQuantity,@cBatch,@iNum,
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
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("@iNum", body.Amount));
//cmd.Parameters.Add(new SqlParameter("@cCode", iBaseCodeLen));
cmd.Parameters.Add(new SqlParameter("@InvCode", body.InvCode));
cmd.Parameters.Add(new SqlParameter("@cBatch", body.BatchCode));
cmd.Parameters.Add(new SqlParameter("@irowno", irowno));
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 + ",fsendapplyqty=isnull(fsendapplyqty,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 IssueCode,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);
if (dtNew1 == null)
dtNew1 = ds.Tables[0];
else
dtNew1.Merge(ds.Tables[0]);
if (dtNew2 == null)
dtNew2 = ds.Tables[1];
else
dtNew2.Merge(ds.Tables[1]);
#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";
DataSet dz = new DataSet();
dtNew1.TableName = "Table0";
dtNew2.TableName = "Table1";
dz.Tables.Add(dtNew1.Copy());
dz.Tables.Add(dtNew2.Copy());
DataRelation dh = new DataRelation(RelationName, dz.Tables[0].Columns["IDs"], dz.Tables[1].Columns["IDs"]);
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("传送数据为空！");
}
string res = string.Empty;
string connS = "";
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);
}
}
}