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 PurchaseRequisition
    {
        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="infos"></param>
        /// <returns></returns>
        public string Get(List<ICSPurchaseRequisition> infos)
        {
            List<ICSPurchaseRequisition> szJson = new List<ICSPurchaseRequisition>();
            DataTable dt = null;
            DataTable dtNew = null;
            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 (ICSPurchaseRequisition 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,a.cCode,a.cDepCode ,c.cDepName,a.cMaker ,a.cMakeTime ,a.cVerifier ,a.cAuditTime,
                             b.AutoID ,b.irowno ,b.cInvCode ,b.fQuantity ,b.dRequirDate ,b.dArriveDate ,b.cexch_name ,b.fUnitPrice   
                             from PU_AppVouch a
                             inner join PU_AppVouchs b on a.ID =b.ID
                             left join Department c on a.cDepCode=c.cDepCode WHERE 1=1";
                    if (!string.IsNullOrWhiteSpace(info.PRCode))
                    {
                        sql += " and a.cCode='{0}'";
                    }
                    if (!string.IsNullOrWhiteSpace(info.MTime.ToString()))
                    {
                        sql += " and ISNULL(a.dCloseTime ,ISNULL(a.cChangAuditTime,ISNULL(a.cAuditTime, ISNULL(a.cModifyTime, a.cmaketime))))>='{1}'";
                    }
                    if (!string.IsNullOrWhiteSpace(info.User))
                    {
                        sql += "and a.CMAKER='{2}'";
                    }
                    sql = string.Format(sql, info.PRCode, info.MTime, info.User);
                    dt = DBHelper.SQlReturnData(sql, cmd);

                    if (dt.Rows.Count <= 0 || dt == null)
                        throw new Exception("请购单：" + info.PRCode + "，无信息！");
                    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;

        }
        /// <summary>
        /// 创建请购单
        /// </summary>
        /// <param name="Bills"></param>
        /// <returns></returns>
        public string CreatePurchaseRequisition(List<ICSPurchaseRequisition> Bills)
        {
            string msg = "";
            DataTable dt = null;
            DataTable dtNew = null;
            string connS = "";
            SqlConnection conn = new SqlConnection();

            VouchKey key = new VouchKey();
            int num = 0;
            foreach (ICSPurchaseRequisition head in Bills)
            {
                num = head.details.Count();
            }


            SqlCommand cmd = new SqlCommand();



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

            foreach (ICSPurchaseRequisition head in Bills)
            {
                try
                {
                    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;
                    cmd.CommandTimeout = 300;
                    string[] ss = head.WorkPoint.Split('_');
                    ERPDB = ss[1];
                    Dictionary<string, int> dic = DBHelper.GetAllCode("" + ERPDB + "", "PuApp", "" + 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("27", "" + date + "", "admin", head.WorkPoint);
                    string sql = string.Empty;
                    #region 请购单表头
                    sql = @"Insert Into PU_AppVouch
                                    (ivtid,id,ccode,ddate,cdepcode,
                                    cpersoncode,cbustype,cmaker,cverifier,
                                    iverifystateex,ireturncount,iswfcontrolled,cAuditDate,iPrintCount,
                                    cMakeTime,cAuditTime
                                    ) 
                                    Values 
                                    ('8171',@ID,@ccode,CONVERT(VARCHAR(10),GETDATE(),23),@cdepcode,
                                    null,'普通采购',@cmaker,@cverifier,
                                    '2','0','0','','0',
                                    GETDATE(),GETDATE()
                                    )" + Environment.NewLine;
                    cmd.Parameters.Clear();
                    cmd.Parameters.Add(new SqlParameter("@ID", iFatherId));
                    cmd.Parameters.Add(new SqlParameter("@ccode", iBaseCodeLen));
                    cmd.Parameters.Add(new SqlParameter("@cdepcode", head.DepCode));
                    cmd.Parameters.Add(new SqlParameter("@cverifier", head.User));
                    cmd.Parameters.Add(new SqlParameter("@cmaker", head.User));
                    //cmd.Parameters.Add(new SqlParameter("@bredvouch",0));
                    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);
                    }
                    #endregion
                    #region 请购单表体
                    int irowno = 0;
                    foreach (ICSPurchaseRequisitions body in head.details)
                    {
                        iChildId -= 1;
                        sql += @"IF NOT EXISTS(
	                                SELECT cInvCode 
	                                FROM Inventory
	                                WHERE cInvCode='@cInvCode'
                                )
                                BEGIN
	                                RAISERROR('存货编码：@cInvCode 不存在！',16,0)
                                END" + Environment.NewLine;
                        sql = @"Insert Into PU_AppVouchs
                                        (id,autoid,cvencode,cinvcode,fquantity,
                                        funitprice,ipertaxrate,ftaxprice,fmoney,drequirdate,
                                        darrivedate,iReceivedQTY,cdefine22,cdefine23,btaxcost,
                                        iReceivedNum,cpersoncodeexec,cdepcodeexec,cexch_name,iexchrate,
                                        ioricost,ioritaxcost,iorimoney,ioritaxprice,iorisum,
                                        imoney,itaxprice,ivouchrowno) 
                                        VALUES 
                                        (@ID,@AutoID,NULL,@cInvCode,@fQuantity,
                                        NULL,17,NULL,NULL,@drequirdate,
                                        @darrivedate,'0',NULL,NULL,1,
                                        0,NULL,NULL,N'人民币',1,
                                        NULL,NULL,NULL,NULL,NULL,
                                        NULL,NULL,@ivouchrowno)" + Environment.NewLine;
                        cmd.Parameters.Clear();

                        cmd.Parameters.Add(new SqlParameter("@AutoID", iChildId));
                        cmd.Parameters.Add(new SqlParameter("@cInvCode", body.InvCode));
                        cmd.Parameters.Add(new SqlParameter("@ID", iFatherId));
                        cmd.Parameters.Add(new SqlParameter("@fQuantity", body.Quantity));
                        cmd.Parameters.Add(new SqlParameter("@drequirdate", body.RequirDate));
                        cmd.Parameters.Add(new SqlParameter("@darrivedate", body.ArriveDate));
                        cmd.Parameters.Add(new SqlParameter("@ivouchrowno", body.Sequence));

                        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);
                        }

                    }
                    sql = @"
select a.ID,a.cCode,a.cDepCode ,c.cDepName,a.cMaker ,a.cMakeTime ,a.cVerifier ,a.cAuditTime,
                             b.AutoID ,b.irowno ,b.cInvCode ,b.fQuantity ,b.dRequirDate ,b.dArriveDate ,b.cexch_name ,b.fUnitPrice   
                             from PU_AppVouch a
                             inner join PU_AppVouchs b on a.ID =b.ID
                             left join Department c on a.cDepCode=c.cDepCode where a.id='{0}' ";
                    sql = string.Format(sql, iFatherId);
                    dt = DBHelper.SQlReturnData(sql, cmd);
                    #endregion
                    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();
                }
            }
            msg = JsonConvert.SerializeObject(dtNew);
            return msg;

        }
        /// <summary>
        /// 审核请购单
        /// </summary>
        /// <param name="infos"></param>
        /// <returns></returns>
        public string Approve(List<ICSPurchaseRequisition> infos)
        {
            List<ICSPurchaseRequisition> szJson = new List<ICSPurchaseRequisition>();
            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 (ICSPurchaseRequisition 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.PU_AppVouch SET cVerifier  ='" + info.User + @"' ,
                            cAuditTime =CONVERT(VARCHAR(50),GETDATE(),112),cAuditDate =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<ICSPurchaseRequisition> infos)
        {
            List<ICSPurchaseRequisition> szJson = new List<ICSPurchaseRequisition>();
            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 (ICSPurchaseRequisition 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  PU_AppVouch  where  PU_AppVouch.ID='" + info.ID + "'";
                    sql += @"delete  PU_AppVouchs  where  PU_AppVouchs.ID='" + 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;
        }
        private void LogInfo(List<ICSPurchaseRequisition> Bills)
        {
            string HeadList = string.Empty;
            string BodyList = string.Empty;
            foreach (ICSPurchaseRequisition head in Bills)
            {
                HeadList += "\r\n 表头主键ID：" + head.ID + "，部门：" + head.DepCode + "，用户：" + head.User + "，站点：" + head.WorkPoint;
                foreach (ICSPurchaseRequisitions body in head.details)
                {
                    //  BodyList += "\r\n 表体主键ID： " + body. + "，数量：" + body.Quantity;
                }
            }
            log.Info(HeadList);
            log.Info(BodyList);
        }
    }
}