You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
298 lines
16 KiB
298 lines
16 KiB
using ICSSoft.Common;
|
|
using ICSSoft.Entity;
|
|
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 ReturnDoc
|
|
{
|
|
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["ReturnCRDNAME"];
|
|
/// <summary>
|
|
/// 借用(生成其他出库单)
|
|
/// </summary>
|
|
/// <param name="Bills"></param>
|
|
/// <returns></returns>
|
|
public string ConfirmRd08(List<ICSReturnDoc> Bills)
|
|
{
|
|
string msg = string.Empty;
|
|
string sql = string.Empty;
|
|
|
|
|
|
DataSet ds = null;
|
|
SqlConnection conn = new SqlConnection();
|
|
int num = 0;
|
|
string connS = "";
|
|
SqlCommand cmd = new SqlCommand();
|
|
|
|
List<string> result = Bills.Select(t => t.WorkPoint).Distinct().ToList();
|
|
|
|
|
|
foreach (string WorkPoint in result)
|
|
{
|
|
try
|
|
{
|
|
connS = string.Format(connString, WorkPoint);
|
|
conn = new System.Data.SqlClient.SqlConnection(connS);
|
|
conn.Open();
|
|
SqlTransaction sqlTran = conn.BeginTransaction();
|
|
cmd = new SqlCommand();
|
|
cmd.Transaction = sqlTran;
|
|
cmd.Connection = conn;
|
|
foreach (ICSReturnDoc head in Bills)
|
|
{
|
|
|
|
string iFatherIdTwo = "";
|
|
|
|
if (WorkPoint != head.WorkPoint)
|
|
continue;
|
|
|
|
if (!DBHelper.IsInventoryConsolidation(cmd, head.WorkPoint))
|
|
throw new Exception("U8正在整理现存量,请稍后再试");
|
|
|
|
string[] ss = head.WorkPoint.Split('_');
|
|
ERPDB = ss[1];
|
|
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);
|
|
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 cRDcode = DBHelper.GetRDCode(crdname, cmd);
|
|
string iBaseCodeLen = DBHelper.GetAllRDCode(cardnewcode, "" + date + "", "admin", cRDcode, head.WorkPoint);
|
|
|
|
ICSUserInfo userInfo = new ICSUserInfo();
|
|
userInfo = DBHelper.GetPersonInfo(head.User, cmd);
|
|
|
|
//取得out库单的默认显示模版
|
|
string DEF_ID08 = DBHelper.GetDefaultTemplate(cardnewcode, cmd);
|
|
//取得其他出库单单据 表头ID,表体DID
|
|
VouchKey key08 = new VouchKey();
|
|
#region 其他出库单表头
|
|
sql = @"INSERT INTO dbo.RdRecord08
|
|
(ID,bRdFlag,cVouchType,cBusType,cSource,cBusCode,cWhCode,dDate,cCode,cRdCode,
|
|
cHandler,cMemo,bTransFlag,cMaker,dVeriDate,bpufirst,biafirst,VT_ID,bIsSTQc,bOMFirst,
|
|
bFromPreYear,bIsComplement,iDiscountTaxType,ireturncount,
|
|
iverifystate,iswfcontrolled,dnmaketime,dnverifytime,bredvouch,cSourceLs,cDepCode)
|
|
VALUES(@ID,1,'08','其他出库','借出借用单',@cBusCode,@cWhCode,CONVERT(NVARCHAR(15),GETDATE(),23),@cCode,@cRdCode,
|
|
@cHandler,@cMemo,'0',@cMaker,CONVERT(NVARCHAR(15),GETDATE(),23),'0','0',
|
|
@VT_ID,'0','0','0','0','0','0','0','0',GETDATE(),GETDATE(),'0','1',@cDepCode) ";
|
|
|
|
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("@cRdCode", cRDcode));
|
|
cmd.Parameters.Add(new SqlParameter("@cDepCode", head.DepCode));
|
|
cmd.Parameters.Add(new SqlParameter("@cHandler", userInfo.UserName));
|
|
cmd.Parameters.Add(new SqlParameter("@cMemo", ""));
|
|
cmd.Parameters.Add(new SqlParameter("@cMaker", userInfo.UserName));
|
|
cmd.Parameters.Add(new SqlParameter("@VT_ID", DEF_ID08));
|
|
cmd.Parameters.Add(new SqlParameter("@cBusCode", head.SourceCode));
|
|
cmd.CommandText = sql;
|
|
try
|
|
{
|
|
cmd.ExecuteNonQuery();
|
|
}
|
|
catch (Exception ex)
|
|
{
|
|
log.Error("生成其他出库单失败!SQL:\r\n" + sql);
|
|
throw new Exception("程序异常,请联系开发人员!");
|
|
}
|
|
#endregion
|
|
foreach (ICSBrrowDocs body in head.details)
|
|
{
|
|
if (DBHelper.bInvBatch(body.InvCode, cmd) == true)
|
|
{
|
|
if (body.BatchCode == "")
|
|
{
|
|
log.Error("该物料:" + body.InvCode + "已启用批次,请重新填写!");
|
|
throw new Exception("该物料:" + body.InvCode + "已启用批次,请重新填写!");
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if (body.BatchCode != "")
|
|
{
|
|
log.Error("该物料:" + body.InvCode + "未启用批次,请重新填写!");
|
|
throw new Exception("该物料:" + body.InvCode + "未启用批次,请重新填写!");
|
|
}
|
|
}
|
|
#region 3.5.1 表体
|
|
sql = @"INSERT INTO dbo.rdrecords08
|
|
(AutoID,ID,cInvCode,iQuantity,iSOutQuantity,iSOutNum,iFlag,iDebitIDs,iNQuantity,cBatch,iNum,cItemCode,
|
|
cMassUnit,bLPUseFree,iRSRowNO,iOriTrackID,bCosting,bVMIUsed,iExpiratDateCalcu,iordertype,irowno,cbaccounter,iPUnitCost,iPPrice,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10)
|
|
VALUES(@AutoID,@ID,@cInvCode,@iQuantity,'0','0','0',@iDebitIDs,'0',@cBatch,@iNum,@cItemCode,
|
|
'0','0','0','0','1','0','0','0',@irowno,null,null,null,@cFree1,@cFree2,@cFree3,@cFree4,@cFree5,@cFree6,@cFree7,@cFree8,@cFree9,@cFree10)";
|
|
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("@iNum", body.Amount.ToString("0.00")));
|
|
cmd.Parameters.Add(new SqlParameter("@irowno", body.Sequence));
|
|
cmd.Parameters.Add(new SqlParameter("@iDebitIDs", body.SourceDetailID));
|
|
cmd.Parameters.Add(new SqlParameter("@cBatch", body.BatchCode));
|
|
cmd.Parameters.Add(new SqlParameter("@cItemCode", body.ProjectCode));
|
|
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
|
|
{
|
|
cmd.ExecuteNonQuery();
|
|
}
|
|
catch (Exception ex)
|
|
{
|
|
log.Error("生成其他出库单表体失败!SQL:\r\n" + sql);
|
|
throw new Exception("程序异常,请联系开发人员!");
|
|
}
|
|
#endregion
|
|
|
|
sql = @"UPDATE a SET iQtyRK =ISNULL(iQtyRK,0)+" + body.Quantity + @"
|
|
FROM dbo.HY_DZ_BorrowOutBacks a
|
|
WHERE a.Autoid='" + body.SourceDetailID + "'";
|
|
DBHelper.CmdExecuteNonQuery(sql, cmd, "回写借入单数量失败!");
|
|
|
|
sql = @"select isnull(iQtyRK,0)fOutQuantity,isnull(iQuantity,0)iQuantity,ISNULL(iNum, 0)iNum,ISNULL(NiNum, 0)NiNum,ISNULL(iNum, 0)-ISNULL(NiNum, 0) SiNum from HY_DZ_BorrowOutBacks a
|
|
LEFT JOIN (select sum(iNum) NiNum,iDebitIDs from rdrecords08 GROUP BY iDebitIDs) b on a.AutoID=b.iDebitIDs
|
|
where a.AutoID='" + body.SourceDetailID + "'";
|
|
DataTable dtDisCheck = DBHelper.SQlReturnData(sql, cmd);
|
|
if (dtDisCheck != null && dtDisCheck.Rows.Count > 0)
|
|
{
|
|
foreach (DataRow item in dtDisCheck.Rows)
|
|
{
|
|
if (Convert.ToDecimal(item["fOutQuantity"].ToString()) == Convert.ToDecimal(item["iQuantity"].ToString()))
|
|
{
|
|
if (Convert.ToDecimal(item["iNum"].ToString()) != 0)
|
|
{
|
|
if (Convert.ToDecimal(item["SiNum"].ToString()) != 0)
|
|
{
|
|
sql = @"Update rdrecords08 set iNum=isnull(iNum,0)+(" + item["SiNum"].ToString() + ") where autoid='" + iChildId + "' ";
|
|
body.Amount = (Convert.ToDecimal(body.Amount.ToString("0.00"))) + (Convert.ToDecimal(item["SiNum"].ToString()));
|
|
|
|
DBHelper.CmdExecuteNonQuery(sql, cmd, "辅计量余数处理失败!");
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
|
|
//更新现存量
|
|
key08.cBustypeUN = "调拨入库";
|
|
key08.cVouchTypeUN = "08";
|
|
key08.TableName = "IA_ST_UnAccountVouch08";
|
|
//DBHelper.UpdateCurrentStock(cmd, body.InvCode, head.WHCode, "", body.Quantity, key08);
|
|
//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, key08);
|
|
DBHelper.UpdateCurrentStockCCGC(cmd, body.InvCode, head.WHCode, body.BatchCode, body.Quantity, body.Amount, body.cFree1,
|
|
body.cFree2, body.cFree3, body.cFree4, body.cFree5, body.cFree6, body.cFree7, body.cFree8, body.cFree9, body.cFree10,
|
|
"", key08, "", "", "", "", 0, 0, 0, 0, 0, 0, 0, 0, iFatherId, iChildId);
|
|
|
|
iFatherIdTwo = "'" + iFatherId + "',";
|
|
iChildId--;
|
|
|
|
}
|
|
#region 查询
|
|
sql = @"
|
|
select DISTINCT a.ID as ID,a.ID as IDs,cBusCode as SourceCode ,
|
|
cCode as OtherInCode,a.cDepCode,c.cDepName,a.cWhCode,d.cWhName,
|
|
cSource as SourceType,cMaker as CreateUser,dnmaketime as CreateDateTime,
|
|
cHandler as Checker,dnverifytime as CheckDateTime
|
|
from rdrecord08 a
|
|
left join Department c on a.cDepCode=c.cDepCode
|
|
left join Warehouse d on a.cWhCode=d.cWhCode
|
|
WHERE a.ID in ({0})
|
|
|
|
select DISTINCT a.ID as IDs,b.AutoID as DetailID,irowno as Sequence,b.cInvCode as InvCode
|
|
,iQuantity as Quantity,b.iDebitIDs as SourceDetailID,iNum as Amount
|
|
,isnull(b.cItemCode,'') ProjectCode,isnull(b.cbatch,'') cBatch,'' version ,'' brand,
|
|
isnull(b.cFree1,'') as cFree1,
|
|
isnull(b.cFree2,'') as cFree2,
|
|
isnull(b.cFree3,'') as cFree3,
|
|
isnull(b.cFree4,'') as cFree4,
|
|
isnull(b.cFree5,'') as cFree5,
|
|
isnull(b.cFree6,'') as cFree6,
|
|
isnull(b.cFree7,'') as cFree7,
|
|
isnull(b.cFree8,'') as cFree8,
|
|
isnull(b.cFree9,'') as cFree9,
|
|
isnull(b.cFree10,'') as cFree10
|
|
from rdrecord08 a
|
|
left join rdrecords08 b on a.ID=b.ID
|
|
left join Department c on a.cDepCode=c.cDepCode
|
|
left join Warehouse d on a.cWhCode=d.cWhCode
|
|
WHERE a.ID in ({0})";
|
|
sql = string.Format(sql, iFatherIdTwo.TrimEnd(','));
|
|
if (ds != null)
|
|
ds.Merge(DBHelper.SQlReturnDataSet(sql, cmd));
|
|
else
|
|
ds = DBHelper.SQlReturnDataSet(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();
|
|
}
|
|
}
|
|
msg = JSON.DataSetToJson(ds, "details", "IDs");
|
|
return msg;
|
|
}
|
|
/// <summary>
|
|
/// 记录日志
|
|
/// </summary>
|
|
/// <param name="Bills"></param>
|
|
private void LogInfo(List<ICSReturnDoc> Bills)
|
|
{
|
|
string HeadList = string.Empty;
|
|
string BodyList = string.Empty;
|
|
foreach (ICSReturnDoc head in Bills)
|
|
{
|
|
HeadList += "\r\n 借用单号:" + head.SourceCode + ",用户:" + head.User + ",站点:" + head.WorkPoint + "";
|
|
|
|
}
|
|
log.Info(HeadList);
|
|
log.Info(BodyList);
|
|
}
|
|
|
|
}
|
|
}
|