/// <summary>
/// 修改
/// </summary>
/// <param name="p_BE">要修改的实体</param>
/// <param name="sqlTrans">事务类</param>
public void RUpdate(BaseEntity p_BE, BaseEntity[] p_BE2, ArrayList list, IDBTransAccess sqlTrans)
{
try
{
//RCheckMDQty(p_BE, p_BE2, list);//校验码单明细和单据明细数量是否一致
IOForm entity = (IOForm)p_BE;
this.RUpdate(p_BE, sqlTrans);
IOFormDtsRule ruledts = new IOFormDtsRule();
ruledts.RSave((IOForm)p_BE, (IOFormDts[])p_BE2, sqlTrans);//保存从表
//删除数据库中此单据类型的码单信息2011-07-12
IOFormDtsPackRule dtsprule = new IOFormDtsPackRule();//保存码单明细
dtsprule.RSave(entity, (IOFormDts[])p_BE2, list, sqlTrans);
}
catch (BaseException)
{
throw;
}
catch (Exception E)
{
throw new BaseException(E.Message);
}
}
/// <summary>
/// 新增(传入事务处理)
/// </summary>
/// <param name="p_BE">要新增的实体</param>
/// <param name="sqlTrans">事务类</param>
public void RAdd(int p_ID, string p_IDStr, IDBTransAccess sqlTrans)
{
try
{
string sql = "SELECT SectionID,JarNum,Batch FROM WH_PackBox WHERE ID IN (" + p_IDStr + ")";
sql += " GROUP BY SectionID,JarNum,Batch";
DataTable dt = sqlTrans.Fill(sql);
int MaxSeq = GetMaxSeq(p_ID);
decimal Qty = 0;
IOFormDtsRule rule = new IOFormDtsRule();
for (int i = 0; i < dt.Rows.Count; i++)
{
if (i == 0)//第一行更新
{
sql = "SELECT * FROM WH_PackBox WHERE ID IN (" + p_IDStr + ")";
sql += " AND SectionID=" + SysString.ToDBString(SysConvert.ToString(dt.Rows[i]["SectionID"]));
sql += " AND JarNum=" + SysString.ToDBString(SysConvert.ToString(dt.Rows[i]["JarNum"]));
sql += " AND Batch=" + SysString.ToDBString(SysConvert.ToString(dt.Rows[i]["Batch"]));
DataTable dtsql = sqlTrans.Fill(sql);
IOFormDts entitydts = new IOFormDts(sqlTrans);
entitydts.ID = p_ID;
entitydts.SelectByID();
entitydts.SectionID = SysConvert.ToString(dt.Rows[i]["SectionID"]);
entitydts.JarNum = SysConvert.ToString(dt.Rows[i]["JarNum"]);
entitydts.Batch = SysConvert.ToString(dt.Rows[i]["Batch"]);
entitydts.Qty = SysConvert.ToDecimal(dtsql.Compute("SUM(Qty)", ""));
entitydts.PieceQty = dtsql.Rows.Count;
entitydts.PackFlag = 1;
entitydts.Amount = entitydts.Qty * entitydts.SinglePrice;
rule.RUpdate(entitydts, sqlTrans);
IOFormDtsPackRule prule = new IOFormDtsPackRule();
sql = "DELETE WH_IOFormDtsPack WHERE MainID=" + SysString.ToDBString(entitydts.MainID);
sql += " AND Seq=" + SysString.ToDBString(entitydts.Seq);
sqlTrans.ExecuteNonQuery(sql);
for (int j = 0; j < dtsql.Rows.Count; j++)
{
IOFormDtsPack pentity = new IOFormDtsPack(sqlTrans);
pentity.MainID = entitydts.MainID;
pentity.Seq = entitydts.Seq;
pentity.SubSeq = j + 1;
pentity.BoxNo = SysConvert.ToString(dtsql.Rows[j]["BoxNo"]);
pentity.Qty = SysConvert.ToDecimal(dtsql.Rows[j]["Qty"]);
pentity.DID = entitydts.ID;
prule.RAdd(pentity, sqlTrans);
}
}
else
{
sql = "SELECT * FROM WH_PackBox WHERE ID IN (" + p_IDStr + ")";
sql += " AND SectionID=" + SysString.ToDBString(SysConvert.ToString(dt.Rows[i]["SectionID"]));
sql += " AND JarNum=" + SysString.ToDBString(SysConvert.ToString(dt.Rows[i]["JarNum"]));
sql += " AND Batch=" + SysString.ToDBString(SysConvert.ToString(dt.Rows[i]["Batch"]));
DataTable dtsql = sqlTrans.Fill(sql);
IOFormDts entitydts = new IOFormDts(sqlTrans);
entitydts.ID = p_ID;
entitydts.SelectByID();
entitydts.Seq = MaxSeq + i;
entitydts.SectionID = SysConvert.ToString(dt.Rows[i]["SectionID"]);
entitydts.JarNum = SysConvert.ToString(dt.Rows[i]["JarNum"]);
entitydts.Batch = SysConvert.ToString(dt.Rows[i]["Batch"]);
entitydts.Qty = SysConvert.ToDecimal(dtsql.Compute("SUM(Qty)", ""));
entitydts.PieceQty = dtsql.Rows.Count;
entitydts.PackFlag = 1;
entitydts.Amount = entitydts.Qty * entitydts.SinglePrice;
sql = "SELECT ID FROM WH_IOFormDts WHERE MainID=" + SysString.ToDBString(entitydts.MainID);
sql += " AND Seq=" + SysString.ToDBString(entitydts.Seq);
if (sqlTrans.Fill(sql).Rows.Count > 0)
{
throw new BaseException("不能增行，该行已存在");
}
rule.RAdd(entitydts, sqlTrans);
IOFormDtsPackRule prule = new IOFormDtsPackRule();
sql = "DELETE WH_IOFormDtsPack WHERE MainID=" + SysString.ToDBString(entitydts.MainID);
sql += " AND Seq=" + SysString.ToDBString(entitydts.Seq);
sqlTrans.ExecuteNonQuery(sql);
for (int j = 0; j < dtsql.Rows.Count; j++)
{
IOFormDtsPack pentity = new IOFormDtsPack(sqlTrans);
pentity.MainID = entitydts.MainID;
pentity.Seq = entitydts.Seq;
pentity.SubSeq = j + 1;
pentity.BoxNo = SysConvert.ToString(dtsql.Rows[j]["BoxNo"]);
pentity.Qty = SysConvert.ToDecimal(dtsql.Rows[j]["Qty"]);
pentity.DID = entitydts.ID;
prule.RAdd(pentity, sqlTrans);
}
}
}
}
catch (BaseException)
{
throw;
}
catch (Exception E)
{
throw new BaseException(E.Message);
}
}
/// <summary>
/// 保存(传入事务处理)
/// </summary>
/// <param name="p_BE">要新增的实体</param>
/// <param name="sqlTrans">事务类</param>
public void RSave(int p_ID, int p_MainID, int p_Seq, BaseEntity[] p_BE, bool p_UpdateFlag, IDBTransAccess sqlTrans)
{
try
{
string sql = "";
if (p_UpdateFlag) //修改状态下首先清除被删除的码单明细
{
string idStr = string.Empty; //ID字符串
idStr = "0";
for (int i = 0; i < p_BE.Length; i++)
{
IOFormDtsPack entity = (IOFormDtsPack)p_BE[i];
if (entity.ID != 0)//有ID
{
if (idStr != string.Empty)
{
idStr += ",";
}
idStr += entity.ID.ToString();
}
}
if (idStr != string.Empty)
{
sql = "DELETE FROM WH_PackBox WHERE BoxNo IN (SELECT BoxNo FROM WH_IOFormDtsPack WHERE DID=" + SysString.ToDBString(p_ID) + " AND ID NOT IN(" + idStr + ") )";
sqlTrans.ExecuteNonQuery(sql); //执行条形码删除
sql = "DELETE FROM WH_IOFormDtsPack WHERE DID=" + SysString.ToDBString(p_ID) + " AND ID NOT IN(" + idStr + ")"; //WH_IOFormDtsPack WH_PackBox
sqlTrans.ExecuteNonQuery(sql);
}
}
else//新增状态
{
sql = "SELECT TOP 1 ID FROM WH_IOFormDtsPack WHERE DID=" + SysString.ToDBString(p_ID);
DataTable dt = sqlTrans.Fill(sql);
if (dt.Rows.Count > 0)
{
throw new BaseException("不能重复保存！");
}
}
IOForm p_Main = new IOForm(sqlTrans);
p_Main.ID = p_MainID;
p_Main.SelectByID();
IOFormDts p_MainDts = new IOFormDts(sqlTrans);
p_MainDts.ID = p_ID;
p_MainDts.SelectByID();
IOFormDtsPackRule rule = new IOFormDtsPackRule();
PackBoxRule Brule = new PackBoxRule();
decimal Qty = 0;
decimal PieceQty = 0;
for (int i = 0; i < p_BE.Length; i++)
{
FormNoControlRule frule = new FormNoControlRule();
IOFormDtsPack entity = (IOFormDtsPack)p_BE[i];
int boxNoCreateTypeID = 0;//箱号条码来源
if (entity.ID == 0)
{
if (entity.BoxNo == string.Empty)//没有箱号条码
{
entity.BoxNo = frule.RGetFormNo((int)FormNoControlEnum.码单箱号, sqlTrans);
rule.RAdd(entity, sqlTrans);
frule.RAddSort((int)FormNoControlEnum.码单箱号, sqlTrans);
}
else//有箱号条码说明是验布产生的条码
{
boxNoCreateTypeID = 1;//验布来源
}
}
else
{
rule.RUpdate(entity, sqlTrans);
}
PackBox entityBox = new PackBox();
if (entity.ID != 0)//仓库明细已生成，则寻找箱号ID 此处判断其实无意义，经过上面的代码肯定有ID值了
{
sql = "SELECT ID FROM WH_PackBox WHERE BoxNo=" + SysString.ToDBString(entity.BoxNo);
DataTable dtPackBox = sqlTrans.Fill(sql);
if (dtPackBox.Rows.Count != 0)//如果找到条码
{
entityBox.ID = SysConvert.ToInt32(dtPackBox.Rows[0]["ID"]);
}
else//如果未找到条码
{
entityBox.CreateSourceID = boxNoCreateTypeID;////原始条码表加个字段表示来源 0:表示入库录入
}
}
entityBox.BoxNo = entity.BoxNo;
entityBox.WHID = p_MainDts.WHID;
entityBox.SectionID = p_MainDts.SectionID;
entityBox.SBitID = p_MainDts.SBitID;
entityBox.ColorName = p_MainDts.ColorName;
entityBox.ColorNum = p_MainDts.ColorNum;
entityBox.CompanyTypeID = p_MainDts.CompanyTypeID;
entityBox.GoodsCode = p_MainDts.GoodsCode;
entityBox.GoodsLevel = p_MainDts.GoodsLevel;
entityBox.ItemCode = p_MainDts.ItemCode;
entityBox.ItemName = p_MainDts.ItemName;
entityBox.ItemStd = p_MainDts.ItemStd;
entityBox.JarNum = p_MainDts.JarNum;
entityBox.Batch = p_MainDts.Batch;
entityBox.VendorBatch = p_MainDts.VendorBatch;
entityBox.MWeight = p_MainDts.MWeight;
entityBox.MWidth = p_MainDts.MWidth;
entityBox.Qty = entity.Qty;
entityBox.Unit = p_MainDts.Unit;
entityBox.BoxStatusID = (int)EnumBoxStatus.未入库;
entityBox.DID = p_ID;
entityBox.InFormNo = p_Main.FormNo;
entityBox.OrderFormNo = p_MainDts.DtsOrderFormNo;//合同号明细
if (entityBox.ID == 0)//没有ID则新增
{
Brule.RAdd(entityBox, sqlTrans);
}
else//有ID则修改
{
Brule.RUpdate(entityBox, sqlTrans);
}
Qty += entity.Qty;
PieceQty++;
}
//if (PieceQty == 0)
//{
// throw new BaseException("请填写细码后点击保存");
//}
sql = "UPDATE WH_IOFormDts SET Qty=" + SysString.ToDBString(Qty);
sql += ",PieceQty=" + SysString.ToDBString(PieceQty);
sql += ",PackFlag=1 ";
sql += " WHERE ID=" + SysString.ToDBString(p_ID);
sqlTrans.ExecuteNonQuery(sql);
}
catch (BaseException)
{
throw;
}
catch (Exception E)
{
throw new BaseException(E.Message);
}
}
