DiferenciasCambioCobros.cs

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

using sage.ew.listados.Clases;
using sage.ew.db;
using sage.ew.global;
using System.Data;
using sage.ew.functions;
using sage.ew.ewbase;
using sage.ew.docscompra;
using sage.ew.cliente;
using sage.ew.enumerations;


namespace sage.ew.contabilidad
{
    public class DiferenciasCambioCobros : DiferenciasCambio
    {
        private TipoOrigenDiferenciaCambio _eOrigen = TipoOrigenDiferenciaCambio.Normal;

        public DiferenciasCambioCobros()
            : base(TipoDiferenciaCambio.Cobros)
        {
            _lUsarDivisa = Convert.ToBoolean(EW_GLOBAL._GetVariable("wl_divisaventa"));
            _cDivisaEmpresa = EW_GLOBAL._GetVariable("wc_moneda").ToString();
            _cNombreControlCombo = "cmbFechaClienteBanco";
            _cClienteProveedor = "cliente";                  //Cliente o proveedor => para aprovechar código de la base
        }

        public override String _ReportFile
        {
            get
            {
                return "diferenciascambiocobro.report";
            }
        }

        public override List<string> _ReportColumns
        {
            get
            {
                List<String> reportColumns = new List<string>();

                _dicDefEntidades = new Dictionary<string, ew.interficies.IDefEntidad>();
                _dicDefEntidades.Add("factura", new DefEntidad() { _DB = "COMUNES", _Tabla = "PREVI_CL", _Campo = "LTRIM(FACTURA)", _Relacion = "", _Empresa = true });
                _dicDefEntidades.Add("cliente", new DefEntidad() { _DB = "GESTION", _Tabla = "CLIENTES", _Campo = "CODIGO", _Relacion = "", _Empresa = false });
                _dicDefEntidades.Add("f_pago", new DefEntidad() { _DB = "GESTION", _Tabla = "FPAG", _Campo = "CODIGO", _Relacion = "", _Empresa = false });
                _dicDefEntidades.Add("empresa", new DefEntidad() { _DB = "GESTION", _Tabla = "EMPRESA", _Campo = "CODIGO", _Relacion = "", _Empresa = false });

                reportColumns.Add("factura");
                reportColumns.Add("siiframod");
                reportColumns.Add("referencia");
                reportColumns.Add("emision");
                reportColumns.Add("vencim");
                reportColumns.Add("divisa");
                reportColumns.Add("importe");
                reportColumns.Add("divisa_importe");
                reportColumns.Add("cambio");
                reportColumns.Add("cotiza");
                reportColumns.Add("diferencia");
                reportColumns.Add("codigo");
                reportColumns.Add("cliente");       //Variante cobros
                reportColumns.Add("pagare");        //Variante cobros

                if (_TipoDiferenciaCambio == TipoDiferenciaCambio.Pagos)
                {
                    _dicDefEntidades.Add("banco", new DefEntidad() { _DB = "GESTION", _Tabla = "CUENTAS", _Campo = "CODIGO", _Relacion = "", _Empresa = false });

                    reportColumns.Add("banco");
                    reportColumns.Add("nombanc");
                }

                reportColumns.Add("f_pago");        //Variante cobros
                reportColumns.Add("nomfpag");

                return reportColumns;
            }
        }

        public override DataTable _DataTable()
        {
            _InicializarVariables();

            string lcSql = obtenerQueryObtencionDatos();

            //Ejecutamos el Query
            if (DB.SQLExec(lcSql, ref _dtResult) && _dtResult.Rows.Count > 0)
            {
                //Redondeo la diferencia a moneda => No se ha integrado en el SQL pq no puedo garantizar que redodee igual
                _RedondearImporteDeLasDiferencias();

                //Ens guardem les dades sense totalitzar per operar mes tard
                this._ResultadosSinTotalizar = _dtResult.Copy();

                agruparResultadosConTotales();
            }

            return _dtResult;
        }

        private string obtenerQueryObtencionDatos()
        {
            string lcSql = string.Empty;

            //Encapsulo como se calcula el campo ya que se llama en varios puntos del query (datos y where)
            string lcCampoCotiza = queryCalculoCampoCotiza(tcAliasTablaClienteProveedor: "CLIENTES");
            string lcCampoDiferencia = queryCalculoCampoDiferencia(tcAliasTablaClienteProveedor: "CLIENTES");


            lcSql = " SELECT p.empresa, p.vencim, p.cliente, RTRIM(CLIENTES.nombre) as nombrecliente, " +
                            "p.banco, RTRIM(c.nombre) as nombanc, " + 
                            "p.f_pago, f.nombre as nomfpag, p.importe, p.factura as factura, p.emision as fecha, " +
                            "p.orden, p.pagare, p.divisa, p.importediv AS divisa_importe, p.cambio, p.pendiente, p.impagado, " +
                            Divisa._ObtenerSqlDivisa("MONEDA", "simbolo") + ", p.emision, p.periodo,p.siiframod, p.referencia";

            //Obtención de cambio pactado (sino tiene => cotización por fecha y si tampoco existe el cambio de la propia previsión " 
            lcSql += ",CLIENTES.IDIOMA as divisacliente, CLIENTES.CAMBIO as cambiocliente, CLIENTES.FEC_CAM as fechacambiocliente, " +
                            lcCampoCotiza + " AS cotiza, " +
                            lcCampoDiferencia + " AS diferencia ";

            lcSql += "FROM " + DB.SQLDatabase("comunes", "previ_cl") + " p " +
                      " LEFT OUTER JOIN " + DB.SQLDatabase("gestion", "clientes") + " CLIENTES ON p.cliente = CLIENTES.codigo " +
                      " LEFT OUTER JOIN " + DB.SQLDatabase("gestion", "fpag") + " f ON p.f_pago=f.codigo " +
                      " LEFT OUTER JOIN " + DB.SQLDatabase("gestion", "cuentas") + " c ON p.banco=c.codigo " +
                      " LEFT OUTER JOIN " + DB.SQLDatabase("gestion", "moneda") + "  MONEDA ON p.divisa= MONEDA.codigo ";

            //Query de obtención de máximas cotizaciones por fecha
            lcSql += " LEFT OUTER JOIN (" + obtenerQueryCotizacionMaximaPorFecha() + ") AS LASTCOTIZA ON LASTCOTIZA.CODIGO = p.DIVISA ";


            lcSql += "WHERE " + EW_GLOBAL._Consolida("p.Empresa") + " AND p.importe != 0 AND p.banco ='' ";

            if (!_lVerDiferenciasCambioCero) //Añado filtro por el campo diferencia 
            {
                lcSql += "AND " + lcCampoDiferencia + " <> 0 ";
            }

            //Origen de la diferencia de cambio
            if(_eOrigen == TipoOrigenDiferenciaCambio.Impagado)
                lcSql += "AND p.impago = 'S' ";
            else
                if (_eOrigen == TipoOrigenDiferenciaCambio.Normal)
                    lcSql += "AND p.impago <> 'S' ";

            //Añado criterios de filtrado
            lcSql += obtenerCriteriosFiltradoSql();

            //Añado ORDER BY
            lcSql += obtenerClausulaOrderBy();
            return lcSql; ;
        }

        protected override void _InicializarVariables()
        {
            base._InicializarVariables();

            //Si viene del cierre la fecha viene asignada por el parametro y se fuerzan los filtros
            if (_FechaProceso is DateTime && _Cuentas is List<string> && _Cuentas.Count > 0)
            {
                _Filtros.Add("ClienteLista", _Cuentas);
            }

            if (_Opciones.ContainsKey("nFechaClienteBanco"))  _nSubtotalesPor = _Opcion_Entero("nFechaClienteBanco"); //Específic
            if (_Opciones.ContainsKey("nNormalImpagadoTod"))  _eOrigen = (TipoOrigenDiferenciaCambio)_Opcion_Entero("nNormalImpagadoTod");
        }

        private string obtenerCriteriosFiltradoSql()
        {
            string lcFiltro = "";

            lcFiltro += _Filtro_Fecha(_Filtros, _Tipo_Filtro_Fecha.Fecha, "p", (_nTipoFecha == 0 ? "vencim" : "emision"));
            lcFiltro += _Filtro_String(_Filtros, _Tipo_Filtro_String.Cliente, "p", "cliente"); //Filtro específico cobros
            //lcFiltro += _Filtro_String(_Filtros, _Tipo_Filtro_String.Banco, "p", "banco");
            lcFiltro += _Filtro_String(_Filtros, _Tipo_Filtro_String.FPago, "p", "f_pago"); //Nombre campo distinto PREVIS vs PREVI_CL
            lcFiltro += _DivisaConfig.ObtenerFiltroDivisa("divisa", "p");

            return lcFiltro;
        }
    }
}