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
{
    public class DisassemblyDoc
    {

        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["DisaRCRDNAME"];

        /// <summary>
        /// 审核拆卸单
        /// </summary>
        /// <param name="Bills"></param>
        /// <returns></returns>
        public bool Dismrecord01(List<ICSDisassemblyDoc> Bills)
        {
            bool ResultFlag = false;
            string connS = "";
            SqlConnection conn = new SqlConnection();
            SqlCommand cmd = new SqlCommand();

            if (Bills.Count <= 0)
            {
                throw new Exception("传送数据为空！");
            }
            LogInfo(Bills);

             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 (ICSDisassemblyDoc head in Bills)
                     {
                         if (WorkPoint != head.WorkPoint)
                         {
                             continue;
                         }

                         if (!DBHelper.IsInventoryConsolidation(cmd, head.WorkPoint))
                             throw new Exception("U8正在整理现存量，请稍后再试");

                         string[] ss = head.WorkPoint.Split('_');
                         ERPDB = ss[1];

                         string sql = "";
                         ICSUserInfo userInfo = new ICSUserInfo();
                         userInfo = DBHelper.GetPersonInfo(head.User, cmd);
                         string cHandler = string.Empty;
                         string cIWhCode = string.Empty;

                         #region 检验单号是否存在
                         sql = "select * from AssemVouch where ID='" + head.ID + "'";
                         DataTable dt = DBHelper.SQlReturnData(sql, cmd);
                         if (dt != null && dt.Rows.Count > 0)
                         {
                             cHandler = dt.Rows[0]["cVerifyPerson"].ToString();
                             //cIWhCode = head.cWhCode;
                             if (!string.IsNullOrEmpty(cHandler))
                             {
                                 throw new Exception("单据ID：" + head.ID + "不是开立状态！");
                             }
                         }
                         else
                         {
                             throw new Exception("单据ID：" + head.ID + "在U8中不存在！");
                         }
                         #endregion

                         #region 审核拆卸单
                         sql = @"UPDATE dbo.AssemVouch SET cVerifyPerson='" + userInfo.UserName + @"' ,
                            dVerifyDate=CONVERT(VARCHAR(50),GETDATE(),112),dnverifytime=GETDATE() WHERE ID='" + head.ID + "'";
                         DBHelper.CmdExecuteNonQuery(sql, cmd, "审核拆卸单失败！");
                         #endregion

                         #region  其他出库单表头

                         string[] dd = CRNALL.Split('~');
                         string crdname = dd[0];
                         string carname = dd[1];
                         string crdname1 = dd[2];
                         string carname1 = dd[3];
                         string surface = dd[4];

                         string cRDcode = DBHelper.GetRDCode(crdname, cmd);
                         string cRDcode1 = DBHelper.GetRDCode(crdname1, cmd);
                         string cardnewcode = DBHelper.GetCardNumber(carname, cmd);
                         string cardnewcode1 = DBHelper.GetCardNumber(carname1, cmd);

                         //取得out库单的默认显示模版
                         string DEF_ID09 = DBHelper.GetDefaultTemplate(cardnewcode1, cmd);
                         //取得采购入库单单据 表头ID，表体DID
                         VouchKey key09 = new VouchKey();
                         var nums = Bills.Count;
                         Dictionary<string, int> dics = DBHelper.GetAllCode("" + ERPDB + "", surface, "" + nums + "", head.WorkPoint, cmd);
                         int iFatherIds = Convert.ToInt32(dics["iFatherId"].ToString());
                         int iChildIds = Convert.ToInt32(dics["iChildId"].ToString());
                         DateTime dates = DateTime.Now;

                         string iBaseCodeLens = DBHelper.GetAllRDCode(cardnewcode, "" + dates + "", "admin", cRDcode, head.WorkPoint, cmd);
                         sql = @"INSERT INTO dbo.RdRecord09
                            (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)

                            SELECT top 1 @ID,'0','09','拆卸出库','拆卸',a.cAVCode,b.cWhCode,CONVERT(NVARCHAR(15),GETDATE(),23),@cCode,@cRdCode,
                            @cHandler,@cMemo,'0',@cMaker,CONVERT(NVARCHAR(15),GETDATE(),23),'0','0',
                            '85','0','0','0','0','0','0','0','0',GETDATE(),GETDATE(),'0',null,cDepCode 
                            from dbo.AssemVouch a
                            inner join AssemVouchs  b on a.id=b.id
                            WHERE a.ID='" + head.ID + "' and bAVType='套件' ";

                         cmd.Parameters.Clear();
                         cmd.Parameters.Add(new SqlParameter("@ID", iFatherIds));
                         cmd.Parameters.Add(new SqlParameter("@cCode", iBaseCodeLens));
                         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_ID09));
                         cmd.Parameters.Add(new SqlParameter("@cRdCode", cRDcode1));
                         cmd.CommandText = sql;
                         try
                         {
                             cmd.ExecuteNonQuery();
                         }
                         catch (Exception ex)
                         {
                             log.Error("生成其他出库单失败！拆卸单ID：" + head.ID + "；异常：" + ex.Message + "；SQL：\r\n" + sql);
                             throw new Exception("程序异常，请联系开发人员！");
                         }
                         #endregion


                         #region 3.5 其他出库单表体

                         #region 检验单号是否存在
                         sql = "select iAVQuantity,iAVNum,* from AssemVouchs where ID='" + head.ID + "' and bAVType='套件'";
                         DataTable dsh = DBHelper.SQlReturnData(sql, cmd);
                         if (dsh != null && dsh.Rows.Count > 0)
                         {
                             cIWhCode = dsh.Rows[0]["cWhCode"].ToString();
                         }
                         else
                         {
                             throw new Exception("单据ID：" + head.ID + "在U8中不存在！");
                         }
                         //判断物料批号与现存量表批号是否一致、数量不能超过现存量物料数量
                         sql = @"SELECT cBatch,iQuantity from CurrentStock WHERE cInvCode='" + dsh.Rows[0]["cInvCode"].ToString() + "'AND cBatch='" + dsh.Rows[0]["cAVBatch"].ToString() + @"'AND cFree1='" + dsh.Rows[0]["cFree1"].ToString() + @"' AND cFree2='" + dsh.Rows[0]["cFree2"].ToString() + @"' AND cFree3='" + dsh.Rows[0]["cFree3"].ToString() + @"' AND cFree4='" + dsh.Rows[0]["cFree4"].ToString() + @"' AND cFree5='" + dsh.Rows[0]["cFree5"].ToString() + @"' AND cFree6='" + dsh.Rows[0]["cFree6"].ToString() + @"' AND cFree7='" + dsh.Rows[0]["cFree7"].ToString() + @"' AND cFree8='" + dsh.Rows[0]["cFree8"].ToString() + @"' AND cFree9='" + dsh.Rows[0]["cFree9"].ToString() + @"' AND cFree10='" + dsh.Rows[0]["cFree10"].ToString() + @"' and cWhCode='" + dsh.Rows[0]["cWhCode"].ToString() + "'";
                         //sql = @"SELECT cBatch,iQuantity from CurrentStock WHERE cInvCode='" + dsh.Rows[0]["cInvCode"].ToString() + "'AND cBatch=''and cWhCode='" + dsh.Rows[0]["cWhCode"].ToString() + "'";
                         DataTable dtItem = DBHelper.SQlReturnData(sql, cmd);
                         if (dtItem != null && dtItem.Rows.Count > 0)
                         {

                             if (Convert.ToDecimal(dtItem.Rows[0]["iQuantity"].ToString()) < Convert.ToInt32(dsh.Rows[0]["iAVQuantity"].ToString()))
                             {
                                 throw new Exception("物料条码的数量大于U8现存量物料数量,物料:" + dsh.Rows[0]["cInvCode"].ToString());
                             }

                         }
                         else
                         {
                             throw new Exception("物料:" + dsh.Rows[0]["cInvCode"].ToString() + "在现存量表中不存在!");
                         }
                         #endregion
                         #region 3.5.1 表体
                         sql = @"INSERT INTO dbo.rdrecords09
                        (AutoID,ID,cInvCode,iQuantity,iSOutQuantity,iSOutNum,iFlag,iTrIds,iNQuantity,iNum,
                        cMassUnit,bLPUseFree,iRSRowNO,iOriTrackID,bCosting,bVMIUsed,iExpiratDateCalcu,iordertype,irowno,cbaccounter,cBatch,iPUnitCost,iPPrice,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10)
                        SELECT @AutoID,@ID,cInvCode,iAVQuantity,'0','0','0',a.autoID,iAVQuantity,iAVNum,
                         '0','0','0','0','1','0','0','0',a.irowno,null,cAVBatch,iAVPCost,iAVPPrice,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10
                        from AssemVouchs a
                        where ID=" + head.ID + @" and bAVType='套件' ;";

                         cmd.Parameters.Clear();
                         cmd.Parameters.Add(new SqlParameter("@AutoID", iChildIds));
                         cmd.Parameters.Add(new SqlParameter("@ID", iFatherIds));


                         cmd.CommandText = sql;
                         try
                         {
                             cmd.ExecuteNonQuery();
                         }
                         catch (Exception ex)
                         {
                             log.Error("生成其他出库单表体失败！拆卸单ID：" + head.ID + "；异常：" + ex.Message + "；SQL：\r\n" + sql);
                             throw new Exception("程序异常，请联系开发人员！");
                         }

                         sql = @"INSERT INTO dbo.rdrecords09sub
                                ( AutoID , ID ,iBG_Ctrl , iBGSTSum )
                                values('" + iChildIds + "','" + iFatherIds + "',0,0)";
                         cmd.CommandText = sql;
                         cmd.ExecuteNonQuery();
                         #endregion

                         if (head.UpdateStock)
                         {
                             //更新现存量
                             key09.cBustypeUN = "拆卸出库";
                             key09.cVouchTypeUN = "09";
                             key09.TableName = "IA_ST_UnAccountVouch09";

                             //DBHelper.UpdateCurrentStock(cmd, dsh.Rows[0]["cInvCode"].ToString(), cIWhCode, "", -Convert.ToDecimal(dsh.Rows[0]["iAVQuantity"].ToString()), key09);
                             //DBHelper.UpdateCurrentStockNEW(cmd, dsh.Rows[0]["cInvCode"].ToString(), cIWhCode, dsh.Rows[0]["cAVBatch"].ToString(), -Convert.ToDecimal(dsh.Rows[0]["iAVQuantity"].ToString()), dsh.Rows[0]["cFree1"].ToString(), dsh.Rows[0]["cFree2"].ToString(), dsh.Rows[0]["cFree3"].ToString(), dsh.Rows[0]["cFree4"].ToString(), dsh.Rows[0]["cFree5"].ToString(), dsh.Rows[0]["cFree6"].ToString(), dsh.Rows[0]["cFree7"].ToString(), dsh.Rows[0]["cFree8"].ToString(), dsh.Rows[0]["cFree9"].ToString(), dsh.Rows[0]["cFree10"].ToString(), key09);
                             string inum = dsh.Rows[0]["iAVNum"].ToString();
                             if (inum == "")
                             {
                                 inum = "0";
                             }
                             DBHelper.UpdateCurrentStockCCGC(cmd, dsh.Rows[0]["cInvCode"].ToString(), cIWhCode, dsh.Rows[0]["cAVBatch"].ToString(),
                                 -Convert.ToDecimal(dsh.Rows[0]["iAVQuantity"].ToString()), -Convert.ToDecimal(inum), dsh.Rows[0]["cFree1"].ToString(),
                                          dsh.Rows[0]["cFree2"].ToString(), dsh.Rows[0]["cFree3"].ToString(), dsh.Rows[0]["cFree4"].ToString(), dsh.Rows[0]["cFree5"].ToString(), dsh.Rows[0]["cFree6"].ToString(), dsh.Rows[0]["cFree7"].ToString(), dsh.Rows[0]["cFree8"].ToString(), dsh.Rows[0]["cFree9"].ToString(), dsh.Rows[0]["cFree10"].ToString(),
                                          "", key09, "", "", "", "", 0, 0, 0, 0, 0, 0, 0, 0, iFatherIds, iChildIds);
                         }


                         //DBHelper.UpdateIDandDID("rd", ErpName, head.list.Count(), cmd);
                         #endregion

                         sql = "select cWhCode from dbo.AssemVouchs  where ID='" + head.ID + "' and bAVType='散件' group by cWhCode;";
                         DataTable dtChecks = DBHelper.SQlReturnData(sql, cmd);
                         int iChildId = 0;
                         int iFatherId = 0;
                         VouchKey key08 = new VouchKey();
                         for (int i = 0; i < dtChecks.Rows.Count; i++)
                         {
                             #region 其他入库单表头
                             //取得out库单的默认显示模版
                             string DEF_ID08 = DBHelper.GetDefaultTemplate(cardnewcode, cmd);
                             //取得采购入库单单据 表头ID，表体DID
                             var num = Bills.Count;
                             Dictionary<string, int> dic = DBHelper.GetAllCode("" + ERPDB + "", surface, "" + num + "", head.WorkPoint, cmd);
                             iFatherId = Convert.ToInt32(dic["iFatherId"].ToString());
                             iChildId = Convert.ToInt32(dic["iChildId"].ToString());
                             DateTime date = DateTime.Now;
                             string iBaseCodeLen = DBHelper.GetAllRDCode(cardnewcode, "" + date + "", "admin", cRDcode, head.WorkPoint, cmd);

                             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)

                         SELECT top 1 @ID,'1','08','拆卸入库','拆卸',a.cAVCode,@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',null,cDepCode 
                        from dbo.AssemVouch a  
                        WHERE id='" + head.ID + "' ";

                             cmd.Parameters.Clear();
                             cmd.Parameters.Add(new SqlParameter("@ID", iFatherId));
                             //cmd.Parameters.Add(new SqlParameter("@cBusCode", head.cCode));
                             cmd.Parameters.Add(new SqlParameter("@cWhCode", dtChecks.Rows[0]["cWhCode"].ToString()));
                             cmd.Parameters.Add(new SqlParameter("@cCode", iBaseCodeLen));
                             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("@cRdCode", cRDcode));
                             cmd.CommandText = sql;
                             try
                             {
                                 cmd.ExecuteNonQuery();
                             }
                             catch (Exception ex)
                             {
                                 log.Error("生成其他入库单表头失败！拆卸ID：" + head.ID + ";异常：" + ex.Message + "；SQL：\r\n" + sql);
                                 throw new Exception("程序异常，请联系开发人员！");
                             }

                             #endregion
                             sql = "select * from AssemVouchs where ID='" + head.ID + "' and bAVType='散件' and cWhCode='" + dtChecks.Rows[i]["cWhCode"].ToString() + "' ";
                             DataTable ds = DBHelper.SQlReturnData(sql, cmd);
                             for (int j = 0; j < ds.Rows.Count; j++)
                             {
                                 #region 其他入库单表体
                                 if (ds != null && ds.Rows.Count > 0)
                                 {
                                     cIWhCode = ds.Rows[j]["cWhCode"].ToString();
                                 }
                                 else
                                 {
                                     throw new Exception("单据号：" + head.ID + "在U8中不存在！");
                                 }
                                 sql = @"INSERT INTO dbo.rdrecords08
                        (AutoID,ID,cInvCode,iQuantity,iSOutQuantity,iSOutNum,iFlag,iTrIds,iNQuantity,iNum,
                        cMassUnit,bLPUseFree,iRSRowNO,iOriTrackID,bCosting,bVMIUsed,iExpiratDateCalcu,iordertype,irowno,cbaccounter,cBatch,iPUnitCost,iPPrice,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10)
                        SELECT @AutoID,@ID,cInvCode,a.iAVQuantity,'0','0','0',a.AutoID,iAVQuantity,iAVNum,
                         '0','0','0','0','1','0','0','0',a.irowno,null,cAVBatch,iAVPCost,iAVPPrice,cFree1,cFree2,cFree3,cFree4,cFree5,cFree6,cFree7,cFree8,cFree9,cFree10 from AssemVouchs a  
                        where a.autoID=" + ds.Rows[j]["autoID"].ToString() + @" ;";

                                 cmd.Parameters.Clear();
                                 cmd.Parameters.Add(new SqlParameter("@AutoID", iChildId));
                                 cmd.Parameters.Add(new SqlParameter("@ID", iFatherId));

                                 cmd.CommandText = sql;
                                 try
                                 {
                                     cmd.ExecuteNonQuery();
                                 }
                                 catch (Exception ex)
                                 {
                                     log.Error("生成其他出库单表体失败！拆卸单单号：" + head.ID + "；异常：" + ex.Message + "；SQL：\r\n" + sql);
                                     throw new Exception("程序异常，请联系开发人员！");
                                 }

                                 if (head.UpdateStock)
                                 {
                                     //更新现存量
                                     key08.cBustypeUN = "拆卸入库";
                                     key08.cVouchTypeUN = "08";
                                     key08.TableName = "IA_ST_UnAccountVouch08";
                                     //DBHelper.UpdateCurrentStockNEW(cmd, ds.Rows[j]["cInvCode"].ToString(), cIWhCode, ds.Rows[j]["cAVBatch"].ToString(), Convert.ToDecimal(ds.Rows[j]["iAVQuantity"].ToString()), ds.Rows[j]["cFree1"].ToString(), ds.Rows[j]["cFree2"].ToString(), ds.Rows[j]["cFree3"].ToString(), ds.Rows[j]["cFree4"].ToString(), ds.Rows[j]["cFree5"].ToString(), ds.Rows[j]["cFree6"].ToString(), ds.Rows[j]["cFree7"].ToString(), ds.Rows[j]["cFree8"].ToString(), ds.Rows[j]["cFree9"].ToString(), ds.Rows[j]["cFree10"].ToString(), key08);
                                     //DBHelper.UpdateCurrentStock(cmd, ds.Rows[j]["cInvCode"].ToString(), cIWhCode, "", Convert.ToDecimal(ds.Rows[j]["iAVQuantity"].ToString()), key08);
                                     string inum = dsh.Rows[j]["iAVNum"].ToString();
                                     if (inum == "")
                                     {
                                         inum = "0";
                                     }
                                     DBHelper.UpdateCurrentStockCCGC(cmd, dsh.Rows[j]["cInvCode"].ToString(), cIWhCode, dsh.Rows[j]["cAVBatch"].ToString(),
                                         Convert.ToDecimal(dsh.Rows[j]["iAVQuantity"].ToString()), Convert.ToDecimal(inum), dsh.Rows[j]["cFree1"].ToString(),
                                            dsh.Rows[j]["cFree2"].ToString(), dsh.Rows[j]["cFree3"].ToString(), dsh.Rows[j]["cFree4"].ToString(), dsh.Rows[j]["cFree5"].ToString(), dsh.Rows[j]["cFree6"].ToString(), dsh.Rows[j]["cFree7"].ToString(), dsh.Rows[j]["cFree8"].ToString(), dsh.Rows[j]["cFree9"].ToString(), dsh.Rows[j]["cFree10"].ToString(),
                                            "", key09, "", "", "", "", 0, 0, 0, 0, 0, 0, 0, 0, iFatherId, iChildId);
                                 }

                                 #endregion
                                 iChildId--;
                             }
                         }

                     }
                     cmd.Transaction.Commit();
                 }
                 catch (Exception ex)
                 {
                     if (cmd.Transaction != null)
                     cmd.Transaction.Rollback();
                     log.Error(ex.Message);
                     throw new Exception(ex.Message);
                 }
                 finally
                 {
                     if (conn.State == ConnectionState.Open)
                     {
                         conn.Close();
                     }
                     conn.Dispose();
                 }
             }
            ResultFlag = true;
            return ResultFlag;

        }
        /// <summary>
        /// 记录日志
        /// </summary>
        /// <param name="Bills"></param>
        private void LogInfo(List<ICSDisassemblyDoc> Bills)
        {
            string HeadList = string.Empty;
            string BodyList = string.Empty;
            foreach (ICSDisassemblyDoc head in Bills)
            {
                HeadList += "\r\n 表头主键ID：" + head.ID + "，用户：" + head.User  + "，站点：" + head.WorkPoint + "";

            }
            log.Info(HeadList);
            log.Info(BodyList);
        }
    }
}