纽威
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.
 
 
 
 
 

234 lines
12 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 BrrowDoc
{
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"];
/// <summary>
/// 借用(生成其他出库单)
/// </summary>
/// <param name="Bills"></param>
/// <returns></returns>
public string ConfirmRd09(List<ICSBrrowDoc> Bills)
{
string msg = string.Empty;
string connS = "";
string sql = string.Empty;
SqlConnection conn = new SqlConnection();
DataTable dtNew1 = null;
DataTable dtNew2 = null;
int num = 0;
SqlCommand cmd = new SqlCommand();
//log.Info("-------合并前-------");
//log.Info("-------合并后-------");
//List<RdRecord09> Vouchers = new List<RdRecord09>();
foreach (ICSBrrowDoc 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];
num = head.details.Count();
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("0302", "" + date + "", "admin");
string cRDcode = DBHelper.GetRDCode("样品出库", cmd);
//取得out库单的默认显示模版
string DEF_ID09 = DBHelper.GetDefaultTemplate("0302", cmd);
//取得其他出库单单据 表头ID,表体DID
VouchKey key09 = new VouchKey();
#region 其他出库单表头
key09.ID += 1;
sql = @"INSERT INTO dbo.RdRecord09
( ID ,bRdFlag ,cVouchType ,cBusType ,cSource ,cWhCode ,dDate ,cCode ,
cRdCode ,cDepCode ,cHandler ,bTransFlag ,cMaker ,dVeriDate ,bpufirst ,
biafirst ,VT_ID ,bIsSTQc ,bFromPreYear ,bIsComplement ,iDiscountTaxType ,
iBG_OverFlag ,cBG_Auditor ,cBG_AuditTime ,ControlResult ,ireturncount ,
iverifystate ,iswfcontrolled ,cModifyPerson ,dnmaketime ,dnverifytime ,
iPrintCount,cBusCode )
VALUES(@ID,0,'09','其他出库','借出借用单',@cWhCode,CONVERT(NVARCHAR(15),GETDATE(),23),@cCode,
@cRdCode,@cDepCode,@cHandler,0,@cMaker,CONVERT(NVARCHAR(15),GETDATE(),23),0,
0,@VT_ID,0,0,0,0,
0,'','',-1,0,
0,0,'',GETDATE(),GETDATE(),0,@cBusCode) ";
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", head.User));
cmd.Parameters.Add(new SqlParameter("@cMaker", head.User));
cmd.Parameters.Add(new SqlParameter("@VT_ID", DEF_ID09));
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)
{
#region 3.5.1 表体
sql = @"INSERT INTO dbo.rdrecords09
( AutoID ,ID ,cInvCode ,iQuantity ,iFlag ,bLPUseFree ,iRSRowNO ,iOriTrackID ,cBatch,
bCosting ,bVMIUsed ,iExpiratDateCalcu ,iordertype ,isotype ,irowno ,iposflag,iDebitIDs ,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10)
VALUES(@AutoID,@ID,@cInvCode,@iQuantity,0,0,0,0,@cBatch,
1,0,0,0,0,@irowno,1,@iDebitIDs,@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("@irowno", body.Sequence));
cmd.Parameters.Add(new SqlParameter("@iDebitIDs", body.SourceDetailID));
cmd.Parameters.Add(new SqlParameter("@cBatch", body.BatchCode));
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
if (head.UpdateStock)
{
//更新现存量
key09.cBustypeUN = "调拨出库";
key09.cVouchTypeUN = "09";
key09.TableName = "IA_ST_UnAccountVouch09";
//DBHelper.UpdateCurrentStock(cmd, body.InvCode, head.WHCode, "", -body.Quantity, key09);
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, key09);
}
iFatherIdTwo += "'" + iFatherId + "',";
iChildId--;
sql = @"UPDATE a SET iQtyOut=ISNULL(iQtyOut,0)+" + body.Quantity + @"
FROM dbo.HY_DZ_BorrowOuts a
WHERE a.Autoid='" + body.SourceDetailID + "'";
DBHelper.CmdExecuteNonQuery(sql, cmd, "回写借入单数量失败!");
}
//OM_MODetails
#region 查询
sql = @"
select a.ID as ID,a.ID as IDs,cBusCode as SourceCode ,
cCode as OtherOutCode,a.cDepCode,c.cDepName,a.cWhCode,d.cWhName,
cSource as SourceType,cMaker as CreateUser,dnmaketime as CreateDateTime,
cHandler as Checker,dnverifytime as CheckDateTime
from rdrecord09 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 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
from rdrecord09 a
left join rdrecords09 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(','));
DataSet ds = DBHelper.SQlReturnDataSet(sql, cmd);
dtNew1.Merge(ds.Tables[0]);
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";
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;
}
/// <summary>
/// 记录日志
/// </summary>
/// <param name="Bills"></param>
private void LogInfo(List<ICSBrrowDoc> Bills)
{
string HeadList = string.Empty;
string BodyList = string.Empty;
foreach (ICSBrrowDoc head in Bills)
{
HeadList += "\r\n 借用单号:" + head.SourceCode + ",用户:" + head.User + ",站点:" + head.WorkPoint + "";
}
log.Info(HeadList);
log.Info(BodyList);
}
}
}