using log4net;
using Microsoft.Extensions.Caching.Memory;
using SqlSugar;
using System;
using System.Collections.Generic;
using System.Linq;
using System.Net;
using System.Net.Http;
using System.Threading.Tasks;
using System.Web.Http;
using System.Web.UI.WebControls;
using UFIDA.U8.Framework.Api.Common.Entity;
using UFIDA.U8.Framework.Api.ControlObject.Common;
using UFIDA.U8.Framework.Api.ControlObject.Entity;
using UFIDA.U8.Framework.Api.ControlObject.Json;
using UFIDA.U8.Framework.Api.ControlObject.PU;
using UFIDA.U8.Framework.Api.ControlObject.SA;
using UFIDA.U8.Framework.Api.ControlObject.U8M;
using UFIDA.U8.Framework.Api.Unit;

namespace UFIDA.U8.Framework.Api.Controllers.U8
{
    public class SAController : ApiController
    {

        /// <summary>
        /// 日志组件
        /// </summary>
        private readonly ILog _logInfo = LogManager.GetLogger("logInfo");

        private static readonly MemoryCache _cache = new MemoryCache(new MemoryCacheOptions { ExpirationScanFrequency = TimeSpan.FromMinutes(10) });

        /// <summary>
        /// 保存单据
        /// </summary>
        /// <param name="cAccId">系统号</param>
        /// <param name="cCardNum">单据类型编码</param>
        /// <param name="input">报文</param>
        /// <param name="VoucherState">单据状态:0新增,1修改</param>
        /// <returns></returns>
        /// <exception cref="Exception"></exception>
        [HttpPost]
        [Route("api/U8/SA/{cCardNum}/Save")]
        public async Task<BaseResult<string>> Save(string cAccId, string cCardNum, [FromBody] Dictionary<string, object> input, int VoucherState = 0)
        {
            try
            {
                var db = CommUnit.GetDbClient();

                var workId = SnowFlakeSingle.Instance.NextId();

                _logInfo.Debug($"作业Id:{workId}-----单据:{cCardNum},操作:新增,对接账套:{cAccId},数据:{input.ToJson()}");

                if (!_cache.TryGetValue($"U8_{cAccId}", out BaseLogin baseLogin))
                {
                    _logInfo.Debug($"作业Id:{workId}-----未获取到缓存的登录信息,正在重新构建");

                    baseLogin = new BaseLogin();

                    var param = await CommUnit.GetLoginParamter(cAccId);

                    if (param == null)
                    {
                        throw new Exception("未能加载指定系统号的登录信息");
                    }

                    baseLogin.Init(param, false);

                    _cache.Clear();

                    _cache.Set($"U8_{cAccId}", baseLogin);
                }

                _logInfo.Debug($"作业Id:{workId}-----登录信息获取完成,缓存设置完成,开始加载单据配置信息");

                var voucherInfo = await db.Queryable<SysU8VoucherDefine>().FirstAsync(s => s.CardNumber == cCardNum);

                var defs = await db.Queryable<SysU8FieldDefine>().Where(s => s.CardNumber == cCardNum && s.cPosition == "H" && s.bEnable == true).ToListAsync();  //查询表头字段配置,供后续设置字段值


                var newNumber = "";
                var bGetCode = false;
                var codeKey = "";

                if (defs.Any(a => a.bDefault == true && a.cPosition == "H" && a.DefaultValue == "单号" && a.bEnable == true))
                {
                    bGetCode = true;
                    codeKey = defs.Where(a => a.bDefault == true && a.cPosition == "H" && a.DefaultValue == "单号" && a.bEnable == true).Select(a => a.FieldName).First();

                    _logInfo.Debug($"作业Id:{workId}-----配置获取单号");
                }
                else
                {
                    _logInfo.Debug($"作业Id:{workId}-----没有单号需要自动指定");
                }

                #region 调整日期,去掉时间部分

                if (input.ContainsKey("ddate"))
                {
                    _logInfo.Debug($"作业Id:{workId}-----调整日期,去掉时间部分");
                    input["ddate"] = $"{Convert.ToDateTime(input["ddate"]):yyyy-MM-dd}";
                }

                if (input.ContainsKey("dtvdate"))
                {
                    _logInfo.Debug($"作业Id:{workId}-----调整日期,去掉时间部分");
                    input["dtvdate"] = $"{Convert.ToDateTime(input["dtvdate"]):yyyy-MM-dd}";
                }

                #endregion
                _logInfo.Debug($"作业Id:{workId}-----设置表头数据");
                input.SetDictionaryData(defs, baseLogin.Connection, newNumber);

                _logInfo.Debug($"作业Id:{workId}-----读取表体数据");
                var bodyData = input[voucherInfo.BodyName].ToJson().ToList<Dictionary<string, object>>(); //读取表体的数据

                if (bodyData == null || bodyData.Count <= 0)
                    throw new Exception("无表体数据!");

                _logInfo.Debug($"作业Id:{workId}-----获取表体字段配置");
                var defsBody = await db.Queryable<SysU8FieldDefine>().Where(s => s.CardNumber == cCardNum && s.cPosition == "B" && s.bEnable == true).ToListAsync();   //获取表体的字段配置

                var rowNo = 1;

                foreach (var body in bodyData)
                {
                    _logInfo.Debug($"作业Id:{workId}-----设置第{rowNo}行单据数据");
                    body.SetDictionaryData(defsBody, baseLogin.Connection, newNumber, rowNo);

                    rowNo++;
                }

                input[voucherInfo.BodyName] = bodyData;

                var co = new ClsVoucherCO_SA();

                var res = await co.Save(baseLogin, input, cCardNum, (VoucherTypeSA)Convert.ToInt32(voucherInfo.VoucherType), VoucherState,bGetCode, codeKey, voucherInfo.bVerify, voucherInfo.iswfcontrolled, voucherInfo.cFlowFieldName);

                return res;
            }
            catch (Exception ex)
            {
                _logInfo.Error(ex.Message, ex);

                return new BaseResult<string> { bSuccess = false, message = ex.Message, result = ex.StackTrace };
            }
        }

        /// <summary>
        /// 查询特定单据部分
        /// </summary>
        /// <param name="cAccId">系统号</param>
        /// <param name="cCardNum">单据类型编码</param>
        /// <param name="input">查询条件</param>
        /// <param name="cCardPostion">查询所属区域 H:表头，B:表体</param>
        /// <returns></returns>
        /// <exception cref="Exception"></exception>
        [HttpPost]
        [Route("api/U8/SA/{cCardNum}/Load")]
        [Route("api/U8/SA/{cCardNum}/Load/{cCardPostion}")]
        public async Task<BaseResult<dynamic>> Load(string cAccId, string cCardNum, [FromBody] Dictionary<string, object> input, string cCardPostion = "H")
        {
            var workId = SnowFlakeSingle.Instance.NextId();

            try
            {
                _logInfo.Debug($"作业Id:{workId}-----单据:{cCardNum},操作:查询,对接账套:{cAccId},条件:{input.ToJson()}");

                if (!_cache.TryGetValue($"U8_{cAccId}", out BaseLogin baseLogin))
                {
                    _logInfo.Debug($"作业Id:{workId}-----未获取到缓存的登录信息,正在重新构建");

                    baseLogin = new BaseLogin();

                    var param = await CommUnit.GetLoginParamter(cAccId);

                    if (param == null)
                    {
                        throw new Exception("未能加载指定系统号的登录信息");
                    }

                    baseLogin.Init(param, false);

                    _cache.Clear();

                    _cache.Set($"U8_{cAccId}", baseLogin);
                }

                var vouchers = CommonHelper.GetVouchers(baseLogin.Connection, cCardNum);

                if (vouchers == null)
                {
                    throw new Exception("未能获取到单据配置信息");
                }

                var db = new SqlSugarClient(new ConnectionConfig()
                {
                    DbType = DbType.SqlServer,
                    ConfigId = cAccId,
                    ConnectionString = baseLogin.UFDataConnstringForNet,
                    IsAutoCloseConnection = true,
                    MoreSettings = new ConnMoreSettings()
                    {
                        IsWithNoLockQuery = true
                    }
                });

                var cBTQName = vouchers.cBTQName;
                var cBWQName = vouchers.cBWQName;
                var cBTTblName = vouchers.cBTTblName;
                var cBWTblName = vouchers.cBWTblName;
                var voucherIdFieldName = vouchers.voucherIdFieldName;
                var vouchersIdFieldName = "";
                var tableName = cBTQName;
                var colsHeadList = new List<string>();
                var colsBodyList = new List<string>();
                var bExtHead = false;
                var bExtBody = false;

                if (cCardPostion == "H")
                {
                    tableName = cBTQName;
                }

                if (cCardPostion == "B")
                {
                    tableName = cBWQName;
                }

                if (cCardPostion == "L")
                {
                    tableName = cBWQName;
                }

                var cDefWhere = vouchers.cDefWhere;

                var query = db.Queryable<dynamic>().AS(cBTQName, cBTQName);

                if (!string.IsNullOrWhiteSpace(cBWQName))
                {
                    query.AddJoinInfo(cBWQName, cBWQName, $"{cBTQName}.[{voucherIdFieldName}]={cBWQName}.[{voucherIdFieldName}]");

                    var bodyCols = db.DbMaintenance.GetColumnInfosByTableName(cBWQName);

                    if (bodyCols != null && bodyCols.Count > 0)
                    {
                        colsBodyList.AddRange(from col in bodyCols where !col.DbColumnName.ToLower().Contains("ufts") && col.DbColumnName.ToLower() != voucherIdFieldName select $"{cBWQName}.[{col.DbColumnName.ToLower()}]");

                        if (cCardPostion == "B" && !colsBodyList.Contains(voucherIdFieldName.ToLower()))
                        {
                            colsBodyList.Add($"{cBWQName}.[{voucherIdFieldName.ToLower()}]");
                        }
                    }
                }

                var headCols = db.DbMaintenance.GetColumnInfosByTableName(cBTQName);

                if (headCols != null && headCols.Count > 0)
                {
                    colsHeadList.AddRange(from col in headCols where !col.DbColumnName.ToLower().Contains("ufts") select $"{cBTQName}.[{col.DbColumnName}]");
                }

                if (db.DbMaintenance.IsAnyTable($"{cBTTblName}_extradefine", false))
                {
                    bExtHead = true;
                    var cols = db.DbMaintenance.GetColumnInfosByTableName($"{cBTTblName}_extradefine");

                    if (cols != null && cols.Count > 0)
                    {
                        foreach (var col in cols)
                        {
                            if (col.DbColumnName.ToLower().StartsWith("chdefine"))
                            {
                                colsHeadList.Add($"{cBTTblName}_extradefine.[{col.DbColumnName.ToLower()}]");
                            }
                            else
                            {
                                vouchersIdFieldName = col.DbColumnName;
                            }
                        }
                    }

                    query.AddJoinInfo($"{cBTTblName}_extradefine", $"{cBTTblName}_extradefine", $"{cBTQName}.[{voucherIdFieldName}]={cBTTblName}_extradefine.[{voucherIdFieldName}]");
                }

                if (db.DbMaintenance.IsAnyTable($"{cBWTblName}_extradefine", false))
                {
                    bExtBody = true;
                    var cols = db.DbMaintenance.GetColumnInfosByTableName($"{cBWTblName}_extradefine");

                    if (cols != null && cols.Count > 0)
                    {
                        foreach (var col in cols)
                        {
                            if (col.DbColumnName.ToLower().StartsWith("cbdefine"))
                            {
                                colsBodyList.Add($"{cBWTblName}_extradefine.[{col.DbColumnName.ToLower()}]");
                            }
                            else
                            {
                                vouchersIdFieldName = col.DbColumnName;
                            }
                        }
                    }

                    query.AddJoinInfo($"{cBWTblName}_extradefine", $"{cBWTblName}_extradefine", $"{cBWQName}.[{vouchersIdFieldName}]={cBWTblName}_extradefine.[{vouchersIdFieldName}]");
                }

                if (input != null)
                {
                    var conModels = new List<IConditionalModel>();

                    foreach (var o in input)
                    {
                        if (o.Key == "dModifyDate")
                        {
                            conModels.Add(new ConditionalModel
                            {
                                FieldName = "dverifysystime",
                                ConditionalType = ConditionalType.GreaterThanOrEqual,
                                FieldValue = $"{o.Value}"
                            });
                        }
                        else if (o.Key == "dModifyDate__2")
                        {
                            conModels.Add(new ConditionalModel
                            {
                                FieldName = "dverifysystime",
                                ConditionalType = ConditionalType.LessThanOrEqual,
                                FieldValue = $"{o.Value}"
                            });
                        }
                        else if ($"{o.Value}".EndsWith("%") || $"{o.Value}".StartsWith("%"))
                        {
                            conModels.Add(new ConditionalModel
                            {
                                FieldName = $"{o.Key}",
                                ConditionalType = ConditionalType.Like,
                                FieldValue = $"{o.Value}"
                            });
                        }
                        else if (o.Key.EndsWith("__2"))
                        {
                            conModels.Add(new ConditionalModel
                            {
                                FieldName = $"{o.Key.Replace("__2", "")}",
                                ConditionalType = ConditionalType.LessThanOrEqual,
                                FieldValue = $"{o.Value}"
                            });
                        }
                        else if (input.ContainsKey($"{o.Key}__2"))
                        {
                            conModels.Add(new ConditionalModel
                            {
                                FieldName = $"{o.Key}",
                                ConditionalType = ConditionalType.GreaterThanOrEqual,
                                FieldValue = $"{o.Value}"
                            });
                        }
                        else
                        {
                            conModels.Add(new ConditionalModel
                            {
                                FieldName = o.Key,
                                ConditionalType = ConditionalType.Equal,
                                FieldValue = $"{o.Value}"
                            });
                        }
                    }

                    query.Where(conModels);
                }

                query.Where(cDefWhere);

                if (cCardPostion == "H")
                {
                    if (bExtHead)
                    {
                        query.Select($"{string.Join(",", colsHeadList)}").Distinct();
                    }
                    else
                    {
                        query.Select($"{string.Join(",", colsHeadList)}").Distinct();
                    }
                }

                if (cCardPostion == "B")
                {
                    if (bExtBody)
                    {
                        query.Select($"{string.Join(",", colsBodyList)}").Distinct();
                    }
                    else
                    {
                        query.Select($"{string.Join(",", colsBodyList)}").Distinct();
                    }
                }

                if (cCardPostion == "L")
                {
                    colsBodyList.AddRange(colsHeadList);

                    if (bExtBody)
                    {
                        query.Select($"{string.Join(",", colsBodyList)}").Distinct();
                    }
                    else
                    {
                        query.Select($"{string.Join(",", colsBodyList)}").Distinct();
                    }
                }

                _logInfo.Debug(query.ToSqlString());

                return new BaseResult<dynamic>() { bSuccess = true, message = "查询成功", result = await query.ToListAsync() };
            }
            catch (Exception ex)
            {
                _logInfo.Error(ex.Message, ex);

                return new BaseResult<dynamic> { bSuccess = false, message = ex.Message, result = ex.StackTrace };
            }
        }
    }
}