FidelizaFuncs.cs

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Data;

using sage.ew.db;
using sage.ew.global;
using sage.ew.listados.Clases;
using sage.ew.functions;
using System.Windows.Forms;
using sage.ew.ewbase;
using sage.ew.global.Diccionarios;
using Sage.ES.S50.Addons;
using System.Net;
using sage.addons.fideliza.DataAccess;
using Unity;

namespace sage.addons.fideliza.Negocio.Clases
{
    public class fideliza
    {
        # region PROPIEDADES PÚBLICAS


        # endregion


        //PE-98118: si funcionamos con Hera
        private bool _llHera = Convert.ToBoolean(EW_GLOBAL._GetVariable("wl_hera"));

        private string _cEmpresa = Convert.ToString(EW_GLOBAL._GetVariable("wc_empresa"));
        private string _cAny = Convert.ToString(EW_GLOBAL._GetVariable("wc_any"));

        private addons.fideliza.fideliza _ofideliza = FIDELIZA._Get_Objeto_Fideliza();
        private IFidelizaFuncsDA oFidelizaFuncsDA;

        #region Constructors

        [InjectionConstructor]
        public fideliza(IFidelizaFuncsDA fidelizaFuncsDA)
        {
            oFidelizaFuncsDA = fidelizaFuncsDA;
        }
        #endregion Contructors

        public DataTable _Calcular_Puntos(string tcNumero, string tcLetra, DateTime tdFecha, decimal tnValorPunto, int tnSession = 0, bool tlCancelar = false)
        {

            bool llAbono, llAplicar;
            int lnSessionAux, lnRecno, lnLinia;
            decimal lnPuntos;
            string lcSQL, lcSelect, lcWhere, lcOrder, lcJoinFactor, lcWhereFactor, lcJoinJAC, lcInstr;

            lnPuntos = lnSessionAux = lnRecno = lnLinia = 0;
            lcSQL = lcSelect = lcWhere = lcOrder = lcJoinFactor = lcWhereFactor = lcJoinJAC = lcInstr = string.Empty;
            llAbono = llAplicar = false;

            DataTable ldtLinVen;//= new DataTable();
            DataTable ldtFACTPTOS; // = new DataTable();
            //DataTable ldtFACTPTOS1; // = new DataTable();
            DataTable ldtFACTPTOS2; // = new DataTable();
            DataTable ldtFACTPTOS3; // = new DataTable();
            DataTable ldtFACTPTOS4; // = new DataTable();
            DataTable ldtFACTPTOS5; // = new DataTable();
            DataTable ldtFACTPTOS6; // = new DataTable();
            DataTable ldtFACTPTOS7; // = new DataTable();
            DataTable ldtFACTPTOS8; // = new DataTable();
            DataTable ldtFACTPTOS9; // = new DataTable();
            DataTable ldtFACTPTOS10; // = new DataTable();
            DataTable ldtFACTPTOS11; // = new DataTable();
            
            ldtLinVen = oFidelizaFuncsDA.GetLineasVenta( _cEmpresa, tcNumero, tcLetra, _cAny);
            //lcSQL = " SELECT C.CLIENTE, D.ARTICULO, D.DEFINICION, D.LINIA, D.IMPORTEIVA, D.PUNTOS, A.SUBFAMILIA, D.FAMILIA, A.MARCA, E.TARIFA, '' AS ACTIVIDAD " +
            //        " FROM ((((" + DB.SQLDatabase("GESTION", "D_ALBVEN") + " D " +
            //            " INNER JOIN " + DB.SQLDatabase("GESTION", "C_ALBVEN") + " C ON C.EMPRESA = D.EMPRESA AND C.NUMERO = D.NUMERO AND C.LETRA = D.LETRA) " +
            //            " INNER JOIN " + DB.SQLDatabase("GESTION", "CLIENTES") + " E ON C.CLIENTE = E.CODIGO) " +
            //            " INNER JOIN " + DB.SQLDatabase("TUEFID", "LIN_AV") + " L ON D.EMPRESA = L.EMPRESA AND D.NUMERO = L.NUMERO AND D.LETRA = L.LETRA AND D.LINIA = L.LINIA) " +
            //            " LEFT JOIN " + DB.SQLDatabase("GESTION", "ARTICULO") + " A ON D.ARTICULO = A.CODIGO) " +
            //        " WHERE D.EMPRESA = " + DB.SQLString(_cEmpresa) + " " +
            //            " AND D.NUMERO = " + DB.SQLString(tcNumero) + " " +
            //            " AND D.LETRA = " + DB.SQLString(tcLetra) + " " +
            //            " AND L.EJERCICIO = " + DB.SQLString(_cAny) + " " +
            //            " AND L.PUNTOSPRO = 0 " +
            //            " AND D.TIPO_IVA != '' AND D.IMPORTEIVA != 0 " +
            //        " ORDER BY D.LINIA";
            //DB.SQLExec(lcSQL, ref ldtLinVen);
            ldtFACTPTOS = oFidelizaFuncsDA.GetLineasFacturacionPtos(_cEmpresa, tcNumero, tcLetra, tdFecha, out lcSelect, out lcWhere, out lcOrder);
            //foreach (DataRow ldrItem in ldtLinVen.Rows)
            //    ldrItem["actividad"] = Convert.ToString(DB.SQLValor("ACTI_CLI", "CLIENTE", Convert.ToString(ldrItem["cliente"]), "ACTIVIDAD"));

            //lcSelect = "SELECT D.LINIA, F.FACTOR AS FACTOR, F.SUMAR AS SUMAR, F.CLIENTE, F.ARTICULO, F.SUBFAMILIA, F.FAMILIA, F.MARCA, F.ACTIVIDAD, F.TARIFA " +
            //            " FROM " + DB.SQLDatabase("GESTION", "C_ALBVEN") + " C " +
            //                " LEFT JOIN " + DB.SQLDatabase("GESTION", "D_ALBVEN") + " D ON C.EMPRESA = D.EMPRESA AND C.NUMERO = D.NUMERO AND C.LETRA = D.LETRA " +
            //                " LEFT JOIN " + DB.SQLDatabase("GESTION", "ARTICULO") + " A ON D.ARTICULO = A.CODIGO ";

            //lcWhere = " WHERE C.EMPRESA = " + DB.SQLString(_cEmpresa) + " " +
            //                " AND C.NUMERO = " + DB.SQLString(tcNumero) + " " +
            //                " AND C.LETRA = " + DB.SQLString(tcLetra) + " " +
            //                " AND D.TIPO_IVA != '' AND D.IMPORTEIVA != 0 " +
            //                " AND F.FECHAINI <= " + DB.SQLString(tdFecha) + " AND F.FECHAFIN >= " + DB.SQLString(tdFecha) + " ";

            //lcOrder = " ORDER BY D.LINIA";

            //lcJoinFactor = " LEFT JOIN " + DB.SQLDatabase("GESTION", "ACTI_CLI") + " E ON C.CLIENTE = E.CLIENTE " +
            //               " LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON E.ACTIVIDAD = F.ACTIVIDAD ";
            //lcWhereFactor = "AND F.ACTIVIDAD <> '' AND F.CLIENTE = '' AND F.ARTICULO = '' AND F.FAMILIA = '' AND F.SUBFAMILIA = '' AND F.MARCA = '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS1);
            //ldtFACTPTOS = ldtFACTPTOS1;

            // Consulta por cliente.
            ldtFACTPTOS2 = oFidelizaFuncsDA.GetLineasFacturacionPtosPorCliente(lcSelect, lcWhere, lcOrder);
            //lcJoinFactor = "LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON D.CLIENTE = F.CLIENTE ";
            //lcWhereFactor = "AND F.CLIENTE <> '' AND F.ARTICULO = '' AND F.FAMILIA = '' AND F.SUBFAMILIA = '' AND F.MARCA = '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS2);
            DBfunctions.SQLUnionDatatable(ref ldtFACTPTOS, ldtFACTPTOS2);

            // Consulta por tarifa
            ldtFACTPTOS3 =  oFidelizaFuncsDA.GetLineasFacturacionPtosPorTarifa(lcSelect, lcWhere, lcOrder);
            //lcJoinFactor = " LEFT JOIN " + DB.SQLDatabase("GESTION", "CLIENTES") + " E ON C.CLIENTE = E.CODIGO " +
            //                "LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON E.TARIFA = F.TARIFA ";
            //lcWhereFactor = "AND F.TARIFA <> '' AND F.ARTICULO = '' AND F.FAMILIA = '' AND F.SUBFAMILIA = '' AND F.MARCA = '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS3);
            DBfunctions.SQLUnionDatatable(ref ldtFACTPTOS, ldtFACTPTOS3);

            // Consulta por artículo.
            ldtFACTPTOS4 = oFidelizaFuncsDA.GetLineasFacturacionPtosPorArticulos(lcSelect, lcWhere, lcOrder);
            //lcJoinFactor = "LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON D.ARTICULO = F.ARTICULO ";
            //lcWhereFactor = "AND F.ARTICULO <> '' AND F.FAMILIA = '' AND F.SUBFAMILIA = '' AND F.MARCA = '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS4);
            DBfunctions.SQLUnionDatatable(ref ldtFACTPTOS, ldtFACTPTOS4);

            // Consulta por familia.
            ldtFACTPTOS5 = oFidelizaFuncsDA.GetLineasFacturacionPorFamilias(lcSelect, lcWhere, lcOrder);
            //lcJoinFactor = "LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON A.FAMILIA = F.FAMILIA ";
            //lcWhereFactor = "AND F.ARTICULO = '' AND F.FAMILIA <> '' AND F.SUBFAMILIA = '' AND F.MARCA = '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS5);
            DBfunctions.SQLUnionDatatable(ref ldtFACTPTOS, ldtFACTPTOS5);

            ldtFACTPTOS6 = oFidelizaFuncsDA.GetLineasFacturacionPorSubFamilia(lcSelect, lcWhere, lcOrder);
            //lcJoinFactor = "LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON A.SUBFAMILIA = F.SUBFAMILIA ";
            //lcWhereFactor = "AND F.ARTICULO = '' AND F.FAMILIA = '' AND F.SUBFAMILIA <> '' AND F.MARCA = '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS6);
            DBfunctions.SQLUnionDatatable(ref ldtFACTPTOS, ldtFACTPTOS6);

            // Consulta por marca.
            ldtFACTPTOS7 = oFidelizaFuncsDA.GetLineasFacturacionPorFamilias(lcSelect, lcWhere, lcOrder);
            //lcJoinFactor = "LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON A.MARCA = F.MARCA ";
            //lcWhereFactor = "AND F.ARTICULO = '' AND F.FAMILIA = '' AND F.SUBFAMILIA = '' AND F.MARCA <> '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS7);
            DBfunctions.SQLUnionDatatable(ref ldtFACTPTOS, ldtFACTPTOS7);
            ldtFACTPTOS8 = oFidelizaFuncsDA.GetLineasFacturacionPorFamiliaYSubfamilia(lcSelect, lcWhere, lcOrder);
            // Consulta por familia y subfamilia.
            //lcJoinFactor = "LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON A.FAMILIA = F.FAMILIA AND A.SUBFAMILIA = F.SUBFAMILIA ";
            //lcWhereFactor = "AND F.ARTICULO = '' AND F.FAMILIA <> '' AND F.SUBFAMILIA <> '' AND F.MARCA = '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS8);
            DBfunctions.SQLUnionDatatable(ref ldtFACTPTOS, ldtFACTPTOS8);

            // Consulta por familia y marca.
            ldtFACTPTOS9 = oFidelizaFuncsDA.GetLineasFacturacionPorFamiliaYMarca(lcSelect, lcWhere, lcOrder);
            //lcJoinFactor = "LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON A.FAMILIA = F.FAMILIA AND A.MARCA = F.MARCA ";
            //lcWhereFactor = "AND F.ARTICULO = '' AND F.FAMILIA <> '' AND F.SUBFAMILIA = '' AND F.MARCA <> '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS9);
            DBfunctions.SQLUnionDatatable(ref ldtFACTPTOS, ldtFACTPTOS9);

            ldtFACTPTOS10 = oFidelizaFuncsDA.GetLineasFacturacionPorSubfamiliaYMarca(lcSelect, lcWhere, lcOrder);
            //lcJoinFactor = "LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON A.SUBFAMILIA = F.SUBFAMILIA AND A.MARCA = F.MARCA ";
            //lcWhereFactor = "AND F.ARTICULO = '' AND F.FAMILIA = '' AND F.SUBFAMILIA <> '' AND F.MARCA <> '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS10);
            DBfunctions.SQLUnionDatatable(ref ldtFACTPTOS, ldtFACTPTOS10);

            // Consulta por familia, subfamilia y marca.
            ldtFACTPTOS11 = oFidelizaFuncsDA.GetLineasFacturacionPorFamiliaSubfamiliaYMarca(lcSelect, lcWhere, lcOrder);
            //lcJoinFactor = "LEFT JOIN " + DB.SQLDatabase("TUEFID", "FACTORPTOS") + " F ON A.FAMILIA = F.FAMILIA AND A.SUBFAMILIA = F.SUBFAMILIA AND A.MARCA = F.MARCA ";
            //lcWhereFactor = "AND F.ARTICULO = '' AND F.FAMILIA <> '' AND F.SUBFAMILIA <> '' AND F.MARCA <> '' ";
            //lcSQL = lcSelect + lcJoinFactor + lcWhere + lcWhereFactor + lcOrder;
            //DB.SQLExec(lcSQL, ref ldtFACTPTOS11);
            DBfunctions.SQLUnionDatatable(ref ldtFACTPTOS, ldtFACTPTOS11);

            //ldtFACTPTOS1 = null;
            ldtFACTPTOS2 = null;
            ldtFACTPTOS3 = null;
            ldtFACTPTOS4 = null;
            ldtFACTPTOS5 = null;
            ldtFACTPTOS6 = null;
            ldtFACTPTOS7 = null;
            ldtFACTPTOS8 = null;
            ldtFACTPTOS9 = null;
            ldtFACTPTOS10 = null;
            ldtFACTPTOS11 = null;


            var ldtLINVENPTOSAUX = (from a in ldtLinVen.AsEnumerable()
                                    join b in ldtFACTPTOS.AsEnumerable()
                                    on new
                                    {
                                        linia = a.Field<int>("linia")
                                    }
                                    equals new
                                    {
                                        linia = b.Field<int>("linia")
                                    }
                                    into leftJoin
                                    from c in leftJoin.DefaultIfEmpty()
                                    select new
                                    {
                                        actividad = a.Field<string>("actividad"),
                                        cliente = a.Field<string>("cliente"),
                                        tarifa = a.Field<string>("tarifa"),
                                        articulo = a.Field<string>("articulo"),
                                        nombre_articulo = a.Field<string>("definicion"),
                                        linia = a.Field<int>("linia"),
                                        importeiva = a.Field<decimal>("importeiva"),
                                        puntos = a.Field<decimal>("puntos"),
                                        subfamilia = a.Field<string>("subfamilia"),
                                        familia = a.Field<string>("familia"),
                                        marca = a.Field<string>("marca"),
                                        factor = (c == null ? 99999 : c.Field<decimal>("factor")),  //CCR 140945: si no hay registros en el leftjoin de factorpuntos ponemos 99999 como marca
                                        sumar = (c == null ? 0 : c.Field<int>("sumar")),
                                        factividad = (c == null ? string.Empty : c.Field<string>("actividad")),
                                        fcliente = (c == null ? string.Empty : c.Field<string>("cliente")),
                                        ftarifa = (c == null ? string.Empty : c.Field<string>("tarifa")),
                                        farticulo = (c == null ? string.Empty : c.Field<string>("articulo")),
                                        fsubfamilia = (c == null ? string.Empty : c.Field<string>("subfamilia")),
                                        ffamilia = (c == null ? string.Empty : c.Field<string>("familia")),
                                        fmarca = (c == null ? string.Empty : c.Field<string>("marca")),
                                        numreg = 0,
                                        aplicar = true,
                                        puntoscalc = 0.0M,
                                    }).__CopyToDataTable();


            lnRecno = 0;
            foreach (DataRow ldrItem in ldtLINVENPTOSAUX.Rows)
            {
                lnRecno++;
                ldrItem["numreg"] = lnRecno;
            }

            var ldtLINVENPTOS = (from item in ldtLINVENPTOSAUX.AsEnumerable()
                                 group item by new
                                 {
                                     linia = item.Field<int>("linia")
                                 } into g
                                 select new
                                 {
                                     articulo = g.Max(x => x.Field<string>("articulo")),
                                     nombre_articulo = g.Max(x => x.Field<string>("nombre_articulo")),
                                     linia = g.Key.linia,
                                     importeiva = g.Max(x => x.Field<decimal>("importeiva")),
                                     puntos = g.Max(x => x.Field<decimal>("puntos")),
                                     factor = g.Sum(x => x.Field<decimal>("factor")),
                                     sumar = g.Sum(x => x.Field<int>("sumar")),
                                     puntoscalc = g.Max(x => x.Field<decimal>("puntoscalc"))
                                 }).__CopyToDataTable();

            lnRecno = 0;
            foreach (DataRow ldrItem in ldtLINVENPTOSAUX.Rows)
            {
                lnRecno++;
                llAplicar = false;

                lnLinia = Convert.ToInt32(ldrItem["linia"]);


                if (Convert.ToBoolean(ldrItem["aplicar"]))
                {
                    if (!string.IsNullOrWhiteSpace(Convert.ToString(ldrItem["factividad"])))
                        llAplicar = true;
                    else
                    {
                        if (!string.IsNullOrWhiteSpace(Convert.ToString(ldrItem["fcliente"])))
                            llAplicar = true;
                        else
                        {
                            if (!string.IsNullOrWhiteSpace(Convert.ToString(ldrItem["ftarifa"])))
                                llAplicar = true;
                            else
                            {
                                if (!string.IsNullOrWhiteSpace(Convert.ToString(ldrItem["farticulo"])))
                                    llAplicar = true;
                                else
                                {
                                    if (!string.IsNullOrWhiteSpace(Convert.ToString(ldrItem["fsubfamilia"])))   // PE-97904. Cambiar fsubfam por fsubfamilia
                                        llAplicar = true;
                                    else
                                    {
                                        if (!string.IsNullOrWhiteSpace(Convert.ToString(ldrItem["ffamilia"])))
                                            llAplicar = true;
                                        else
                                        {
                                            if (!string.IsNullOrWhiteSpace(Convert.ToString(ldrItem["fmarca"])))
                                                llAplicar = true;
                                        }
                                    }
                                }
                            }
                        }
                    }
                }




                if (llAplicar)
                {

                    DataRow[] ldrs = ldtLINVENPTOS.Select("linia=" + lnLinia);

                    if (ldrs.Length == 1)
                    {
                        ldrs[0]["factor"] = Convert.ToDecimal(ldrItem["factor"]);
                        ldrs[0]["sumar"] = Convert.ToInt32(ldrItem["sumar"]);
                    }


                    foreach (DataRow ldrItem2 in ldtLINVENPTOSAUX.Rows)
                    {
                        if (Convert.ToInt32(ldrItem2["linia"]) == lnLinia && Convert.ToInt32(ldrItem2["numreg"]) != lnRecno)
                            ldrItem2["aplicar"] = false;
                    }
                }
            }


            foreach (DataRow ldrItem in ldtLINVENPTOS.Rows)
            {
                llAbono = false;

                if (Convert.ToDecimal(ldrItem["puntos"]) == 0 || tlCancelar)
                {
                    lnPuntos = Convert.ToDecimal(ldrItem["importeiva"]) * tnValorPunto;
                    llAbono = (Convert.ToDecimal(ldrItem["importeiva"]) < 0);
                }
                else
                    lnPuntos = Convert.ToDecimal(ldrItem["puntos"]);

                //CCR 140945: Se quita la comprobación de que sea difrente de 0 ya que si es 0 hemos de multiplicar por 0 y dejar puntos a 0 al ser un factor explícito a 0
                //pero si no hay registros de factor tendremos la marca que hemos puesto en el LINQ de 99999
                if (ldrItem["factor"] != DBNull.Value && Convert.ToDecimal(ldrItem["factor"]) != 99999M)
                    lnPuntos = lnPuntos * Convert.ToDecimal(ldrItem["factor"]);


                if (ldrItem["sumar"] != DBNull.Value && Convert.ToInt32(ldrItem["sumar"]) != 0)
                    lnPuntos = lnPuntos + Convert.ToInt32(ldrItem["SUMAR"]) * (llAbono ? -1 : 1);


                //PE-97914: gestionamos el tipo de redondeo de puntos segun lo que nos viene del enlace

                switch (_ofideliza._FidelizaWS._RedondeoPuntos)
                {
                    case 1:
                        lnPuntos = Math.Truncate(lnPuntos);
                        break;

                    case 2:
                        lnPuntos = Math.Round(lnPuntos, 0, MidpointRounding.AwayFromZero); //PE-98166
                        break;

                    case 3:
                        lnPuntos = Math.Ceiling(Math.Abs(lnPuntos));
                        if (llAbono)
                            lnPuntos = lnPuntos * -1;
                        break;
                }

                ldrItem["puntoscalc"] = lnPuntos;

            }

            ldtLinVen = null;
            ldtFACTPTOS = null;
            ldtLINVENPTOSAUX = null;


            return ldtLINVENPTOS;
        }

        public void _AltaTarjetaFideliza(string tcCliente, string tcTarjeta, string tcPrincipal = "")
        {
            // 98459
            //la tarjeta no existe, llamaremos al formulario de darla de alta de tarjeta
            sage.ew.cliente.Cliente loCliente = new sage.ew.cliente.Cliente(tcCliente);

            Negocio.Clases.TarjetasFideliza loTarjetas = new TarjetasFideliza();

            if (string.IsNullOrWhiteSpace(tcPrincipal))
            {
                loTarjetas._Cif = loCliente._NIF;
                loTarjetas._Nombre = loCliente._Nombre;
                loTarjetas._Empresa = loCliente._RazonComercial;
                loTarjetas._CodPost = loCliente._CodPost;
                loTarjetas._Direccion = loCliente._Direccion;
                loTarjetas._Email = loCliente._Email;
                loTarjetas._Telefono = loCliente._Telefono;
                loTarjetas._Poblacion = loCliente._Poblacion;
                loTarjetas._Provincia = loCliente._Provincia;
                loTarjetas._Pais = loCliente._Pais;
            }
            else
                loTarjetas._TPrincipal = tcPrincipal.Trim(); // establecemos la tarjeta principal asociada                       

            loTarjetas._Codigo = tcTarjeta;
            loTarjetas._Show();
            // fi 98459
        }

        public void _ConsultaTarjetaFideliza(string tcTarjeta, string tcPrincipal = "")
        {
            Negocio.Clases.TarjetasFideliza loTarjetas = new TarjetasFideliza();

            loTarjetas._CargarDatosTarjeta(tcTarjeta);

            if (!loTarjetas._Activa)
            {
                loTarjetas._Codigo = tcTarjeta;
                loTarjetas._Show(true);
            }
        }

        public string _Obtener_Max_Tarjeta(string tcMaxTarjeta)
        {
            int lnLenCad = tcMaxTarjeta.Length;
            string lcResult = "";

            //PE-100384: Cambiamos el sistema para obtener el max_Tarjeta a partir directamente del valor de la tarjeta máximo de la web transformandolo a Int64 y sumando 1
            if (!tcMaxTarjeta.__IsNumber())
            {
                lcResult = "0";
            }
            else
            {
                Int64 lnMax = Convert.ToInt64(tcMaxTarjeta);
                lnMax = lnMax + 1;
                lcResult = Convert.ToString(lnMax);
            }

            return lcResult;
        }

        public string _Get_Tarjeta_Ejercicio(string tcEjercicio, string tcTarjetaAbono, string tcLetraAbono, string tcAliasDB)
        {
            string lcTarjeta = "";
            string lcEmpresa = EW_GLOBAL._GetVariable("wc_empresa").ToString();

            if (!Convert.ToBoolean(EW_GLOBAL._GetVariable("wl_factser")))
                tcLetraAbono = "  ";

            lcTarjeta = DB.SQLValor("CAB_AV", "EJERCICIO = '" + tcEjercicio + "' AND EMPRESA = '" + lcEmpresa + "' AND NUMERO = '" + tcTarjetaAbono + "' AND LETRA", tcLetraAbono, "TARJETAFID", tcAliasDB).ToString();

            return lcTarjeta;
        }

        public string _Brow_Tarjetas(int tnTipo = 1)
        {
            addons.fideliza.fideliza lofideliza = addons.fideliza.FIDELIZA._Get_Objeto_Fideliza();

            //PE-97887: llamar al formulario para introducir los criterios de búsqueda de las tarjetas
            Visual.Forms.frmBuscarTarjetas loFormBuscar = new Visual.Forms.frmBuscarTarjetas(1);
            loFormBuscar._ShowDialog(); //Bug 114218 Cambiar .ShowDialog() por ._ShowDialog()

            if (loFormBuscar.DialogResult == DialogResult.OK)
                return loFormBuscar._Tarjeta;
            else
                return string.Empty;
        }

        public bool _Buscar_Documentos(string tcTarjeta, out Datos_Documento loDatosDoc)
        {
            loDatosDoc.Ejercicio = "";
            loDatosDoc.Numero = "";
            loDatosDoc.Letra = "";
            loDatosDoc.Tarjeta = "";
            loDatosDoc.Linia = 0;

            addons.fideliza.fideliza lofideliza = addons.fideliza.FIDELIZA._Get_Objeto_Fideliza();

            string lcSelectLetra = "";
            if (Convert.ToBoolean(EW_GLOBAL._GetVariable("wl_factser")))
                lcSelectLetra = ", V.LETRA";

            string lcSelectTarjeta = "";
            if (string.IsNullOrWhiteSpace(tcTarjeta))
                lcSelectTarjeta = ", V.TARJETAFID";

            string lcAny = EW_GLOBAL._GetVariable("wc_any").ToString();

            DataTable ldtEjercicios = new DataTable();
            string lcAnyAnterior = string.Empty;
            DB.SQLExec("SELECT [any] AS ejer, anterior FROM " + DB.SQLDatabase("COMUNES", "EJERCICI") + " WHERE [any] = " + DB.SQLString(EW_GLOBAL._GetVariable("wc_any")), ref ldtEjercicios);
            if (ldtEjercicios.Rows.Count > 0)
            {
                lcAnyAnterior = Convert.ToString(ldtEjercicios.Rows[0]["anterior"]).Trim();
            }

            string lcEmpresa = EW_GLOBAL._GetVariable("wc_empresa").ToString();

            DataTable ldtAlbAbonos = new DataTable();

            //PE-98118: Si es Hera, mostrar Clienteerp en la búsqueda
            string lcCliente = string.Empty;
            if (_llHera)
                lcCliente = "C.CLIENTEERP";
            else
                lcCliente = "C.CLIENTE";

            // PE-105235. Hay que buscar datos en el ejercicio actual y el anterior
            string lcSQL = "Select V.EJERCICIO, V.NUMERO " + lcSelectLetra + ", C.FECHA, " + lcCliente + lcSelectTarjeta +
                           " From " + DB.SQLDatabase(lofideliza._AliasDB, "CAB_AV") + " V " +
                               " Inner Join [multiples_ejercicios].dbo.C_ALBVEN C ON V.EMPRESA = C.EMPRESA AND V.NUMERO = C.NUMERO AND V.LETRA = C.LETRA AND Year(C.FECHA) = [master].dbo.val(V.EJERCICIO) " +
                           " Where (V.EMPRESA = " + DB.SQLString(lcEmpresa) + " " +
                               (lofideliza._Configuracion._OrigenAbonos == false ? "AND V.TIPO = 1 AND V.TARJETAFID <> '' AND V.NUM_AB = '' " : "") +
                               (!string.IsNullOrWhiteSpace(tcTarjeta) ? "AND V.TARJETAFID = '" + tcTarjeta + "'" : "") + ")";


            if (!string.IsNullOrWhiteSpace(lcAnyAnterior))
            {
                DB.SQLExecEjer(lcSQL, ref ldtAlbAbonos, new string[] { lcAny, lcAnyAnterior });
            }
            else
            {
                DB.SQLExecEjer(lcSQL, ref ldtAlbAbonos, new string[] { lcAny });
            }

            sage.ew.formul.Forms.Seleccionar loSeleccionar = new ew.formul.Forms.Seleccionar();
            loSeleccionar._Titulo = "Documentos de venta a abonar";
            loSeleccionar._DataTable = ldtAlbAbonos;
            loSeleccionar._Solo_lectura = true;
            loSeleccionar._ShowDialog();

            if (loSeleccionar.DialogResult == System.Windows.Forms.DialogResult.OK)
            {
                loDatosDoc.Ejercicio = loSeleccionar._DataRowSelect["Ejercicio"].ToString();
                loDatosDoc.Numero = loSeleccionar._DataRowSelect["Numero"].ToString();
                if (Convert.ToBoolean(EW_GLOBAL._GetVariable("wl_factser")))
                    loDatosDoc.Letra = loSeleccionar._DataRowSelect["Letra"].ToString();
                if (string.IsNullOrWhiteSpace(tcTarjeta))
                    loDatosDoc.Tarjeta = loSeleccionar._DataRowSelect["TarjetaFid"].ToString();
                else
                    loDatosDoc.Tarjeta = tcTarjeta;
            }

            return loSeleccionar.DialogResult == System.Windows.Forms.DialogResult.OK;
        }

        public int _Cobros_Facturas_CobTarFid(string tcFactura)
        {
            int lnCobTarjFid = 0;

            addons.fideliza.fideliza lofideliza = addons.fideliza.FIDELIZA._Get_Objeto_Fideliza();
            string lcAny = EW_GLOBAL._GetVariable("wc_any").ToString();
            string lcEmpresa = EW_GLOBAL._GetVariable("wc_empresa").ToString();
            DataTable ldtCobrosTarjFid = new DataTable();

            string lcSQL = "Select left(numero, (CASE WHEN charindex('/',numero) > 0 THEN charindex('/',numero) ELSE len(numero) END) - 1) As NUMERO " +
                           " From " + DB.SQLDatabase(lofideliza._AliasDB, "COBTARJFID") +
                           " Where EJERCICIO = " + DB.SQLString(lcAny) +
                               " And EMPRESA = " + DB.SQLString(lcEmpresa) +
                               " And NUMERO <> ''" +
                               " And TIPO = 4";

            if (DB.SQLExec(lcSQL, ref ldtCobrosTarjFid) && ldtCobrosTarjFid.Rows.Count > 0)
            {
                DataRow[] loRows = ldtCobrosTarjFid.Select("LTrim(NUMERO) = LTrim('" + tcFactura + "') AND NUMERO != ''");
                lnCobTarjFid = loRows.Count();
            }

            return lnCobTarjFid;
        }

        public int _CobrosTarjeta(string tcTablaCobros, string tcNumeroDocumento, string tcLetraDocumento, string lcCondicion = "")
        {
            DataTable tdtCobros = new DataTable();
            return _CobrosTarjeta(tcTablaCobros, tcNumeroDocumento, tcLetraDocumento, lcCondicion, out tdtCobros);
        }

        public int _CobrosTarjeta(string tcTablaCobros, string tcNumeroDocumento, string tcLetraDocumento, string lcCondicion, out DataTable tdtCobros)
        {
            int lnCobros = 0;
            tdtCobros = new DataTable();

            addons.fideliza.fideliza lofideliza = addons.fideliza.FIDELIZA._Get_Objeto_Fideliza();
            string lcEjercicio = EW_GLOBAL._GetVariable("wc_any").ToString();
            string lcEmpresa = EW_GLOBAL._GetVariable("wc_empresa").ToString();
            DataTable ldtCobrosTarjFid = new DataTable();

            string lcSql = "Select * " +
                           " From " + DB.SQLDatabase(lofideliza._AliasDB, tcTablaCobros) +
                           " Where EJERCICIO = " + DB.SQLString(lcEjercicio) +
                               " And EMPRESA = " + DB.SQLString(lcEmpresa) +
                               " And NUMERO = " + DB.SQLString(tcNumeroDocumento) +
                               " And LETRA = " + DB.SQLString(tcLetraDocumento) +
                               (!string.IsNullOrWhiteSpace(lcCondicion) ? " And " + lcCondicion : "");

            if (DB.SQLExec(lcSql, ref tdtCobros) && tdtCobros != null)
            {
                lnCobros = tdtCobros.Rows.Count;
            }

            return lnCobros;
        }

        public Cobros_Con_Tarjeta _Comprobar_Cobros_Con_Tarjeta(string tcFactura, string tcNumero, string tcLetra)
        {
            // Comprobamos si hay cobros con tarjetas de fidelización.
            int lnCobTarjFid = _CobrosTarjeta("COBTARJFID", tcNumero, tcLetra);

            // Si no existen cobros de tarjetas de fidelización y hay número de factura comprobamos que si existen cobros de facturas.
            if (lnCobTarjFid == 0 && !string.IsNullOrWhiteSpace((tcFactura)))
                lnCobTarjFid = _Cobros_Facturas_CobTarFid(tcFactura);

            // Comprobamos si hay cobros con tarjetas de regalo.
            int lnCobTarjReg = _CobrosTarjeta("COBTARJREG", tcNumero, tcLetra, "TIPOTARJ = 0");

            // Si no existen cobros de tarjetas de regalo y hay número de factura comprobamos que si existen cobros de facturas.
            if (lnCobTarjReg == 0 && !string.IsNullOrWhiteSpace((tcFactura)))
                lnCobTarjReg = _Cobros_Facturas_CobTarFid(tcFactura);

            // Comprobamos si hay cobros con vales de fidelización.
            int lnCobTarjVal = _CobrosTarjeta("COBTARJREG", tcNumero, tcLetra, "TIPOTARJ = 1");

            // Si no existen cobros de vales de fidelización y hay número de factura comprobamos que si existen cobros de facturas.
            if (lnCobTarjVal == 0 && !string.IsNullOrWhiteSpace((tcFactura)))
                lnCobTarjVal = _Cobros_Facturas_CobTarFid(tcFactura);

            Cobros_Con_Tarjeta loCobros_Con_Tarjeta = new Cobros_Con_Tarjeta();
            loCobros_Con_Tarjeta.ConTarjetaFidelizacion = lnCobTarjFid;
            loCobros_Con_Tarjeta.ConTarjetaRegalo = lnCobTarjReg;
            loCobros_Con_Tarjeta.ConTarjetaVales = lnCobTarjVal;

            return loCobros_Con_Tarjeta;
        }

        public bool _Es_Articulo_Regalo(string tcArticulo, string tcTarifa)
        {
            bool lb_Es_Articulo_Regalo = false;

            if (string.IsNullOrWhiteSpace(tcArticulo) || string.IsNullOrWhiteSpace(tcTarifa))
                return false;

            string lcSql = "";
            sage.addons.fideliza.fideliza _ofideliza = FIDELIZA._Get_Objeto_Fideliza();

            lcSql = "Select ART_REG.ARTICULO " +
                    " From " + DB.SQLDatabase(_ofideliza._AliasDB, "ART_REG") + " ART_REG " +
                    " Where ART_REG.EMPRESA = " + DB.SQLString(_cEmpresa) +
                        " And ART_REG.ARTICULO = " + DB.SQLString(tcArticulo) +
                        " And ART_REG.TARIFA = " + DB.SQLString(tcTarifa);

            DataTable ldtArt_Reg = new DataTable();
            if (DB.SQLExec(lcSql, ref ldtArt_Reg) && ldtArt_Reg.Rows.Count > 0)
            {
                lb_Es_Articulo_Regalo = true;
            }

            return lb_Es_Articulo_Regalo;
        }

        public void _Mensaje_TarjetasRegalo(dynamic toDocumento)
        {
            sage.addons.fideliza.fideliza loFideliza = FIDELIZA._Get_Objeto_Fideliza();

            string lcEmpresa = toDocumento._Empresa;
            string lcNumero = toDocumento._Numero;
            string lcLetra = toDocumento._Letra;

            string lcSql = "";

            lcSql = "Select LIN_AV.TARJETAREG " +
                    " From " + DB.SQLDatabase("GESTION", "D_ALBVEN") + " D_ALBVEN " +
                        " Inner Join " + DB.SQLDatabase("TPV", "C_ALBVEN") + " C_ALBVEN " +
                            " On C_ALBVEN.EJERCICIO = " + DB.SQLString(_cAny) + " And D_ALBVEN.EMPRESA = C_ALBVEN.EMPRESA And D_ALBVEN.NUMERO = C_ALBVEN.NUMERO And C_ALBVEN.LETRA = D_ALBVEN.LETRA " +
                        " Inner Join " + DB.SQLDatabase(loFideliza._AliasDB, "LIN_AV") + " LIN_AV " +
                            " On LIN_AV.EJERCICIO = " + DB.SQLString(_cAny) + " And D_ALBVEN.EMPRESA = LIN_AV.EMPRESA And D_ALBVEN.NUMERO = LIN_AV.NUMERO And D_ALBVEN.LETRA = LIN_AV.LETRA And D_ALBVEN.LINIA = LIN_AV.LINIA " +
                        " Inner Join " + DB.SQLDatabase(loFideliza._AliasDB, "ART_REG") + " ART_REG " +
                            " On ART_REG.ARTICULO = D_ALBVEN.ARTICULO And ART_REG.TARIFA = C_ALBVEN.TARIFA And ART_REG.EMPRESA = C_ALBVEN.EMPRESA " +
                    " Where LIN_AV.EJERCICIO = " + DB.SQLString(_cAny) +
                        " And D_ALBVEN.EMPRESA = " + DB.SQLString(lcEmpresa) +
                        " And D_ALBVEN.NUMERO = " + DB.SQLString(lcNumero) +
                        " And D_ALBVEN.LETRA = " + DB.SQLString(lcLetra) +
                        " And D_ALBVEN.ARTICULO <> '' " +
                        " And D_ALBVEN.TIPO_IVA <> '' " +
                        " And LIN_AV.TARJETAREG = ''";

            DataTable ldtTarjetasRegalo = new DataTable();

            if (DB.SQLExec(lcSql, ref ldtTarjetasRegalo) && ldtTarjetasRegalo.Rows.Count > 0)
            {
                toDocumento._MessageBox("El albarán contiene líneas con tarjetas de regalo asociadas que no han sido activadas.", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1, DialogResult.OK);
            }
        }

        public void _Mostrar_Log_Error()
        {
            sage.addons.fideliza.fideliza loFideliza = FIDELIZA._Get_Objeto_Fideliza();

            DataTable ldtLog = new DataTable();
            ldtLog.Columns.Add("Fecha", typeof(DateTime));
            ldtLog.Columns.Add("Proceso", typeof(string));

            // Recuperamos los errores
            DataTable ldtTaulaLog = new DataTable();
            if (DB.SQLExec("Select * " +
                       " From " + DB.SQLDatabase(loFideliza._AliasDB, "FIDELILOG") +
                       " Where TIPO <> 0", ref ldtTaulaLog) == false)
                return;

            foreach (DataRow loLog in ldtTaulaLog.Rows)
            {
                string lcXMLEnv = loLog["ENVXML"].ToString().Trim();
                int lnTipo = Convert.ToInt32(loLog["TIPO"]);

                DataTable ldtXML = loFideliza._FidelizaWS._XmlToCursor(lcXMLEnv, "NODO");

                if (ldtXML.Rows.Count > 0)
                {
                    string lcNumero = ldtXML.Rows[0]["numero"].ToString();
                    string lcLetra = ldtXML.Rows[0]["letra"].ToString();
                    string lcTarjeta = ldtXML.Rows[0]["tarjeta"].ToString();
                    DateTime ldtFecha = Convert.ToDateTime(ldtXML.Rows[0]["FECHA"]);

                    string lcProceso = "";

                    switch (lnTipo)
                    {
                        case 1: // Envío de puntos.
                            lcProceso = "Envío de puntos de la tarjeta de fidelización " + lcTarjeta + " para el documento " + lcLetra + lcNumero;
                            break;
                        case 2: // Liquidación de puntos.
                            lcProceso = "Liquidación de puntos de la tarjeta de fidelización " + lcTarjeta + " para el documento " + lcLetra + lcNumero;
                            break;
                        case 3: // Cobro saldo tarjeta regalo.
                            lcProceso = "Cobro saldo de la tarjeta de regalo " + lcTarjeta + " para el documento " + lcLetra + lcNumero;
                            break;
                        case 4: // Abono saldo tarjeta regalo.
                            lcProceso = "Abono saldo de la tarjeta de regalo " + lcTarjeta + " para el documento " + lcLetra + lcNumero;
                            break;
                        case 5: // Activación tarjeta regalo.
                            lcProceso = "Activación de la tarjeta de regalo " + lcTarjeta + " para el documento " + lcLetra + lcNumero;
                            break;
                        case 6: // Activación tarjeta fidelización.
                            lcProceso = "Activación de la tarjeta de fidelización " + lcTarjeta;
                            break;
                        default:
                            break;
                    }

                    DataRow loNewLog = ldtLog.NewRow();
                    loNewLog["Fecha"] = ldtFecha;
                    loNewLog["Proceso"] = lcProceso;
                    ldtLog.Rows.Add(loNewLog);
                }
            }

            // Si hay registros para mostrar ...
            if (ldtLog.Rows.Count > 0)
            {
                sage.ew.formul.Forms.Seleccionar frmSeleccionar = new ew.formul.Forms.Seleccionar();
                frmSeleccionar._DataTable = ldtLog;
                frmSeleccionar._Boto_Aceptar = false;
                frmSeleccionar._Solo_lectura = true;
                frmSeleccionar._Texto_Cancelar = "&Cerrar";
                frmSeleccionar._Titulo = "Envíos pendientes a la web de fidelización";
                frmSeleccionar._ShowDialog();
            }
        }

        public bool _Probar_Url_Fideliza(string tcNombre)
        {
            bool llExisteTueFid;
            decimal lnValorPtoAcum, lnValorPtoLiquida, lnDecimales;
            int lnRes, lnTipo;
            string lcMens, lcMascara, lcCadWeb, lcNIF, lcNombreEmp, lcEmail, lcDir, lcPob, lcCodPost, lcTelefono, lcNombre;

            llExisteTueFid = false;
            lnValorPtoAcum = lnValorPtoLiquida = lnDecimales = lnRes = lnTipo = 0;
            lcMens = lcMascara = lcCadWeb = lcNIF = lcNombreEmp = lcEmail = lcDir = lcPob = lcCodPost = lcTelefono = lcNombre = string.Empty;


            lcNombre = tcNombre.Trim().ToLower();

            addons.fideliza.fideliza lofideliza = addons.fideliza.FIDELIZA._Get_Objeto_Fideliza();

            //lofideliza._FidelizaWS._URL = FIDELIZA._ProtocoloWeb + "://" + lcNombre + ".tuefideliza.com/";
            lofideliza._FidelizaWS._URL = lcNombre;
            llExisteTueFid = lofideliza._FidelizaWS._ExisteFideliza(out lnTipo);

            if (!llExisteTueFid)
            {
                if (lnTipo == 0)
                {
                    FUNCTIONS._MessageBox("El nombre de la web de fidelización entrado no existe. " + Environment.NewLine + "Debe registrar mediante el botón Registrar web.", "Probar URL", MessageBoxButtons.OK, MessageBoxIcon.Information);
                }
                else
                    FUNCTIONS._MessageBox("La web de fidelización entrada está desactivada.", "Probar URL", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1);
            }
            else
            {
                //lofideliza._FidelizaWS._URL = FIDELIZA._ProtocoloWeb + "://" + lcNombre + ".tuefideliza.com/";
                lofideliza._FidelizaWS._URL = lcNombre;

                lnValorPtoAcum = lofideliza._FidelizaWS._ValorPunto(1);

                if (string.IsNullOrWhiteSpace(lofideliza._FidelizaWS._Error_Message))
                    lnValorPtoLiquida = lofideliza._FidelizaWS._ValorPunto(2);

                //PE-98298: Comprobamos si el _Error_Message está lleno ya que probablemente haya un error con el código de tienda. Lo mostramos. En caso contrario mostramos
                //el valor del punto de acumulación y liquidación
                if (!string.IsNullOrWhiteSpace(lofideliza._FidelizaWS._Error_Message))
                {
                    FUNCTIONS._MessageBox(lofideliza._FidelizaWS._Error_Message, "Error conexión", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1);
                }
                else
                {

                    ewMascara _Mascara = new ewMascara(Convert.ToString(EW_GLOBAL._GetMascara(KeyDiccionarioMascara.wc_grantotal)));

                    lcMens = "ACUMULACIÓN: POR CADA 1 € = " + lnValorPtoAcum.ToString(_Mascara._Mascara_Net) +
                                                            (lnValorPtoAcum == 1 ? " PUNTO " : " PUNTOS ") +
                                                            lofideliza._FidelizaWS._NombreSistema.ToUpper() +
                                                            Environment.NewLine + Environment.NewLine +
                            "LIQUIDACIÓN: POR CADA 1 PUNTO " + lofideliza._FidelizaWS._NombreSistema.ToUpper() + " = " + lnValorPtoLiquida.ToString(_Mascara._Mascara_Net) + " € ";

                    FUNCTIONS._MessageBox(lcMens, "Probar URL", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
                }
            }
            return true;
        }

        public string _Revisar_Cif(string tcValor)
        {

            string lcCIF, lcValor;
            int lnLen, lnZeros;

            lcCIF = string.Empty;
            lcValor = tcValor.Trim();
            lnLen = lnZeros = 0;

            if (!string.IsNullOrWhiteSpace(lcValor))
            {
                lcValor = lcValor.Replace("-", "");
                lcValor = lcValor.Replace(".", "");
                lcValor = lcValor.Replace(" ", "");

                lnLen = lcValor.Length;

                if (lnLen < 9)
                {
                    lnZeros = 9 - lnLen;
                    lcValor = Enumerable.Repeat("0", lnZeros) + lcValor;
                }

                lcCIF = lcValor.Replace("-", "").Trim(); ;
            }

            return lcCIF;
        }

        public decimal _Redondeo_Puntos(decimal tnImporte, decimal tnValorPunto, bool tlLiquidar)
        {
            decimal lnPuntos = 0;

            switch (_ofideliza._FidelizaWS._RedondeoPuntos)
            {
                // Parte entera del importe.
                case 1:
                    if (tlLiquidar)
                        lnPuntos = Math.Floor(tnImporte / tnValorPunto);
                    else
                        lnPuntos = Math.Floor(tnImporte * tnValorPunto);
                    break;

                // Redondeo superior o inferior en función del primer decimal.
                case 2:
                    if (tlLiquidar)
                        lnPuntos = Math.Round(tnImporte / tnValorPunto, 0);
                    else
                        lnPuntos = Math.Round(tnImporte * tnValorPunto, 0);
                    break;

                // Redondeo al entero superior.
                case 3:
                    if (tlLiquidar)
                        lnPuntos = Math.Floor(Math.Abs(tnImporte) / tnValorPunto) + 1;
                    else
                        lnPuntos = Math.Floor(Math.Abs(tnImporte) * tnValorPunto) + 1;

                    if (tnImporte < 0)
                        lnPuntos = lnPuntos * -1;
                    break;
            }

            return lnPuntos;
        }

        public bool _PuedeAcumularPuntosFactucert(string tcEmpresa, string tcNumero, string tcLetra, string tcEjercicio, sage.ew.docsven.eTipoDocumento toTipo)
        {
            if (toTipo == sage.ew.docsven.eTipoDocumento.Ticket && AddonsController.Instance.AddonsManager.IsLoaded("FACTUCERT"))
            {
                //CCR 211523: Comprobamos si el ticket que nos llega es un ticket borrador y en tal caso retornamos false inmediatamente
                //porque no se permite acumular puntos en un ticket borrador. Si lo ha dejado crédito, por ejemplo. Sólo cuando ya se certifica se podrá acumular                
                if (tcNumero.Substring(Math.Max(0, tcNumero.Length - 2)) == "TB")
                {
                    return false;
                }

                DataTable datos = new DataTable();
                string lcSql = " SELECT * FROM " + DB.SQLDatabase("FACTUCERT", "FCREGCERT") +
                                " WHERE EMPRESA = " + DB.SQLString(tcEmpresa) +
                                " AND NUMERO = " + DB.SQLString(tcNumero) +
                                " AND LETRA = " + DB.SQLString(tcLetra) +
                                " AND TIPO_DOC = 2 " +
                                " AND EJERCICIO = " + DB.SQLString(tcEjercicio);

                DB.SQLExec(lcSql, ref datos);

                if (datos.Rows.Count == 0)
                {
                    return false;
                }
                else
                {
                    //Bug 179737: Si hemos encontrado registro, aprovechamos aquí para eliminar los registros en CAB_AV y LIN_AV que han quedado con el código de borrador de ticket bai
                    string lcBorrador = Convert.ToString(datos.Rows[0]["borrador"]);

                    //CCR  211523: eliminar este código porque puede estar dando problemas teniendo factucert si el ticket borrador y destino en la tabla FCREGCERT es el mismo
                    //Bug 212431: Volvemos el código como estaba ya que parece que da problemas en la certificación y reabrimos CCR 211523
                    lcSql = "DELETE FROM " + DB.SQLDatabase("TUEFID", "CAB_AV") +
                             " WHERE EMPRESA = " + DB.SQLString(tcEmpresa) +
                                " AND NUMERO = " + DB.SQLString(lcBorrador) +
                                " AND LETRA = " + DB.SQLString(tcLetra) +
                                " AND EJERCICIO = " + DB.SQLString(tcEjercicio);
                    DB.SQLExec(lcSql);

                    lcSql = "DELETE FROM " + DB.SQLDatabase("TUEFID", "LIN_AV") +
                             " WHERE EMPRESA = " + DB.SQLString(tcEmpresa) +
                                " AND NUMERO = " + DB.SQLString(lcBorrador) +
                                " AND LETRA = " + DB.SQLString(tcLetra) +
                                " AND EJERCICIO = " + DB.SQLString(tcEjercicio);
                    DB.SQLExec(lcSql);                    
                }
            }

            return true;
        }

        public bool _ActualizarCobTarjetaFidSiFactuCert(string tcEmpresa, string tcNumero, string tcLetra, string tcEjercicio, sage.ew.docsven.eTipoDocumento toTipo)
        {
            bool lbOk = false;

            //Comprobar si es un ticket y está certificado
            if (toTipo == sage.ew.docsven.eTipoDocumento.Ticket && AddonsController.Instance.AddonsManager.IsLoaded("FACTUCERT"))
            {
                DataTable datos = new DataTable();
                string lcSql = " SELECT * FROM " + DB.SQLDatabase("FACTUCERT", "FCREGCERT") +
                                " WHERE EMPRESA = " + DB.SQLString(tcEmpresa) +
                                " AND NUMERO = " + DB.SQLString(tcNumero) +
                                " AND LETRA = " + DB.SQLString(tcLetra) +
                                " AND TIPO_DOC = 2 " +
                                " AND EJERCICIO = " + DB.SQLString(tcEjercicio);

                DB.SQLExec(lcSql, ref datos);

                if (datos.Rows.Count > 0)
                {
                    //Ticket certificado, localizamos registro en cobtarjfid con el numero de borrador y si lo encontramos, cambiamos el borrador por el ticket certificado
                    DataTable ldtTemp = new DataTable();
                    string lcBorrador = Convert.ToString(datos.Rows[0]["borrador"]);
                    lcSql = "SELECT * FROM " + DB.SQLDatabase("TUEFID", "COBTARJFID") +
                             " WHERE EMPRESA = " + DB.SQLString(tcEmpresa) +
                                " AND NUMERO = " + DB.SQLString(lcBorrador) +
                                " AND LETRA = " + DB.SQLString(tcLetra) +
                                " AND TIPO = 1 " +
                                " AND EJERCICIO = " + DB.SQLString(tcEjercicio);

                    DB.SQLExec(lcSql, ref ldtTemp);
                    if (ldtTemp.Rows.Count > 0)
                    {
                        lcSql = "UPDATE " + DB.SQLDatabase("TUEFID", "COBTARJFID") +
                                 " SET NUMERO = " + DB.SQLString(tcNumero) +
                                 " WHERE EMPRESA = " + DB.SQLString(tcEmpresa) +
                                  " AND NUMERO = " + DB.SQLString(lcBorrador) +
                                  " AND LETRA = " + DB.SQLString(tcLetra) +
                                  " AND TIPO = 1 " +
                                  " AND EJERCICIO = " + DB.SQLString(tcEjercicio);
                        DB.SQLExec(lcSql);

                        lbOk = true;
                    }
                }
            }

            return lbOk;
        }

        public bool _ActualizarCobTarjetaRegSiFactuCert(string tcEmpresa, string tcNumero, string tcLetra, string tcEjercicio, sage.ew.docsven.eTipoDocumento toTipo)
        {
            bool lbOk = false;

            //Comprobar si es un ticket y está certificado
            if (toTipo == sage.ew.docsven.eTipoDocumento.Ticket && AddonsController.Instance.AddonsManager.IsLoaded("FACTUCERT"))
            {
                DataTable datos = new DataTable();
                string lcSql = " SELECT * FROM " + DB.SQLDatabase("FACTUCERT", "FCREGCERT") +
                                " WHERE EMPRESA = " + DB.SQLString(tcEmpresa) +
                                " AND NUMERO = " + DB.SQLString(tcNumero) +
                                " AND LETRA = " + DB.SQLString(tcLetra) +
                                " AND TIPO_DOC = 2 " +
                                " AND EJERCICIO = " + DB.SQLString(tcEjercicio);

                DB.SQLExec(lcSql, ref datos);

                if (datos.Rows.Count > 0)
                {
                    //Ticket certificado, localizamos registro en cobtarjfid con el numero de borrador y si lo encontramos, cambiamos el borrador por el ticket certificado
                    DataTable ldtTemp = new DataTable();
                    string lcBorrador = Convert.ToString(datos.Rows[0]["borrador"]);
                    lcSql = "SELECT * FROM " + DB.SQLDatabase("TUEFID", "COBTARJREG") +
                             " WHERE EMPRESA = " + DB.SQLString(tcEmpresa) +
                                " AND NUMERO = " + DB.SQLString(lcBorrador) +
                                " AND LETRA = " + DB.SQLString(tcLetra) +
                                " AND TIPO = 1 " +
                                " AND EJERCICIO = " + DB.SQLString(tcEjercicio) +
                                " AND TIPOTARJ = 0";

                    DB.SQLExec(lcSql, ref ldtTemp);
                    if (ldtTemp.Rows.Count > 0)
                    {
                        lcSql = "UPDATE " + DB.SQLDatabase("TUEFID", "COBTARJREG") +
                                 " SET NUMERO = " + DB.SQLString(tcNumero) +
                                 " WHERE EMPRESA = " + DB.SQLString(tcEmpresa) +
                                  " AND NUMERO = " + DB.SQLString(lcBorrador) +
                                  " AND LETRA = " + DB.SQLString(tcLetra) +
                                  " AND TIPO = 1 " +
                                  " AND EJERCICIO = " + DB.SQLString(tcEjercicio) +
                                  " AND TIPOTARJ = 0";
                        DB.SQLExec(lcSql);

                        lbOk = true;
                    }
                }
            }

            return lbOk;
        }

        public bool _HaAcumuladoPuntosTicket(string tcEmpresa, string tcNumero, string tcLetra, string tcEjercicio)
        {
            DataTable ldtDatos = new DataTable();
            string lcSql = " SELECT * FROM " + DB.SQLDatabase("TUEFID", "CAB_AV") +
                           " WHERE EMPRESA = " + DB.SQLString(tcEmpresa) +
                                " AND NUMERO = " + DB.SQLString(tcNumero) +
                                " AND LETRA = " + DB.SQLString(tcLetra) +
                                " AND TIPO = 1 " +  //Comprobar si el ticket ya ha acumulado puntos 1 acumulado, 0 no
                                " AND TARJETAFID <> '' " +  //Comprobar si el ticket ya ha acumulado puntos tarjetafid llena o no
                                " AND EJERCICIO = " + DB.SQLString(tcEjercicio);
            DB.SQLExec(lcSql, ref ldtDatos);
            if (ldtDatos != null && ldtDatos.Rows.Count > 0)
                return true;
            else
                return false;
        }

        public void _ComprobarProtocoloWeb()
        {
            //Fideliza ya está funcionando plenamente con https desde hace varias versiones. Quitamos las comprobaciones de protocolo
            FIDELIZA._ProtocoloWeb = "https";            
        }

        public void _ComprobarEntorno()
        {
            //DataTable ldtTemp = new DataTable();
            //string lcSql = "SELECT variable, valor FROM " + DB.SQLDatabase("COMUNES", "VARIABLE") + " WHERE variable = " + DB.SQLString("wc_entorno_fideliza");
            //DB.SQLExec(lcSql, ref ldtTemp);
            FIDELIZA._Entorno = oFidelizaFuncsDA.GetEntorno();
            //if (ldtTemp != null && ldtTemp.Rows.Count > 0)
            //{
            //    //Si existe en comunes!variable utilizamos este valor (vacio o inexistente, producción)
            //    FIDELIZA._Entorno = Convert.ToString(ldtTemp.Rows[0]["valor"]);
            //}
            //else
            //    FIDELIZA._Entorno = "";
        }

        public bool ComprobarSerieDocumentalFideliza(string tcSerie, string tablaTuefid)
        {
            DataTable loBdTuefid = new DataTable();

            bool llOk = false;

            if (DB._SQLExisteBBDD(tablaTuefid))
            {
                llOk = DB.SQLExec("select empresa, letra from [" + tablaTuefid + "].dbo.multitiend", ref loBdTuefid);

                llOk = false;
                foreach (DataRow loRow in loBdTuefid.Rows)
                {
                    string lcLetra = Convert.ToString(loRow["letra"]);
                    if (!string.IsNullOrWhiteSpace(lcLetra))
                    {
                        if (lcLetra == tcSerie)
                        {
                            FUNCTIONS._MessageBox("ATENCIÓN: No se puede utilizar la serie " + tcSerie + " porque ya se está utilizando en la opción de Tiendas en Tuefideliza", "Configuración Tu-Efideliza", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
                            llOk = true;
                            break;
                        }
                    }
                    else
                    {
                        llOk = false;
                    }
                }
            }

            return llOk;
        }

        public int _ObtenerPuntosALiquidar(string tcNumero, string tcLetra)
        {
            string lcSql = string.Empty;
            DataTable ldtCOBTARJFID = new DataTable();

            string lcAny = EW_GLOBAL._GetVariable("wc_any").ToString();
            string lcEmpresa = EW_GLOBAL._GetVariable("wc_empresa").ToString();

            // Comprobamos si existen cobros de tarjeta de fidelización no enlazados.
            lcSql = "SELECT TARJETA, LINEA, PUNTOS, IMPORTE FROM " + DB.SQLDatabase(_ofideliza._AliasDB, "COBTARJFID") +
                    " WHERE EJERCICIO = " + DB.SQLString(lcAny) +
                        " AND EMPRESA = " + DB.SQLString(lcEmpresa) +
                        " AND NUMERO = " + DB.SQLString(tcNumero) +
                        " AND LETRA = " + DB.SQLString(tcLetra) +
                        " AND TIPO = " + DB.SQLString(1) +
                        " AND ENLAZADO = 0 ";

            DB.SQLExec(lcSql, ref ldtCOBTARJFID);
            
            int lnPuntosLiquidadosPendientes = 0;

            if (ldtCOBTARJFID != null && ldtCOBTARJFID.Rows.Count > 0)
            {                
                // Recorremos los cobros y obtenemos los puntos liquidados
                foreach (DataRow loRow in ldtCOBTARJFID.Rows)
                {
                    lnPuntosLiquidadosPendientes += Convert.ToInt32(loRow["PUNTOS"]);
                }
            }

            return lnPuntosLiquidadosPendientes;
        }
    }

    public struct Cobros_Con_Tarjeta
    {
        public int ConTarjetaFidelizacion;
        public int ConTarjetaRegalo;
        public int ConTarjetaVales;
    }

    public struct Datos_Documento
    {
        public string Ejercicio;
        public string Numero;
        public string Letra;
        public int Linia;
        public string Tarjeta;
    }
}