ArqueoTpv.cs

//#define ewTools  //Descomentar esta línea para activar las operaciones relativas a medición de rendimiento
using System;
using System.Collections.Generic;
using System.Data;
using System.Linq;
using System.Windows.Forms;
using System.Threading.Tasks;
using System.IO;

using sage.ew.db;
using sage.ew.functions;
using sage.ew.global;
using sage.ew.netvfp;
using sage.ew.tpv.Forms;
using sage.ew.docventatpv;
using sage.ew.ewbase;
using sage.ew.formul.Forms;
using sage.ew.listados.Clases;
using sage.ew.listados.Listados;
using sage.ew.interficies;
using sage.ew.tpv.Clases;
using sage.ew.docsven;
using sage.ew.global.Diccionarios;
using Sage.ES.S50.Addons;

namespace sage.ew.tpv
{
    public class ArqueoTpv: IDocumentoImprimible, IAddons, IArqueoTpv
    {
        #region PROPIEDADES PROTECTED


        protected internal string _lcUsuario = Convert.ToString(EW_GLOBAL._GetVariable("wc_usuario"));


        protected internal string _lcUsuarioTablas = Convert.ToString(EW_GLOBAL._GetVariable("wc_usuario")).Trim().ToUpper() + "#" + Environment.MachineName.Trim().ToUpper() + "#" + Environment.UserName.Trim();


        protected internal bool _llDivisa = Convert.ToBoolean(EW_GLOBAL._GetVariable("wl_divisa"));


        protected internal string _lcMoneda_Empresa = Convert.ToString(EW_GLOBAL._GetVariable("wc_moneda"));


        protected internal int _lnDigitos = Convert.ToInt32(EW_GLOBAL._GetLenCampo(KeyDiccionarioLenCampos.wn_digitos));


        protected internal string _lcEmpresaActiva = Convert.ToString(EW_GLOBAL._GetVariable("wc_empresa"));


        protected internal string _lcEjercicioActivo = Convert.ToString(EW_GLOBAL._GetVariable("wc_any"));


        protected internal string _lcCajaActiva = Convert.ToString(EW_GLOBAL._GetVariable("wc_cajatpv"));


        protected internal string _lcLetraCajaActiva = Convert.ToString(EW_GLOBAL._GetVariable("wc_letratpv"));


        protected internal bool _llFactSer = Convert.ToBoolean(EW_GLOBAL._GetVariable("wl_factser"));


        protected internal bool _lNetOffLine = Convert.ToBoolean(EW_GLOBAL._GetVariable("wl_netoffline"));


        protected internal bool _llejercicioautomatico = Convert.ToBoolean(EW_GLOBAL._GetVariable("wl_Hera")) && Convert.ToBoolean(EW_GLOBAL._GetVariable("wl_ejercicioautomatico"));   // 104028


        protected internal Dictionary<string, Dictionary<string, object>> _dicMonedas = new Dictionary<string, Dictionary<string, object>>();


        protected internal Dictionary<string, decimal> _dicCotizacion = new Dictionary<string, decimal>();


        protected internal Dictionary<string, string> _dicMoneda = new Dictionary<string, string>();


        protected string _cMensaje_Error = string.Empty;


        protected bool _lEstadoConsulta = false;


        protected DateTime? _FechaDesde = null;


        protected DateTime? _FechaHasta = null;


        protected string _CajaDesde = string.Empty;


        protected string _CajaHasta = string.Empty;


        protected bool _TodasCajas = false;


        #endregion PROPIEDADES PROTECTED


        #region PROPIEDADES PRIVADAS


        private DataTable _oDtArqueo = null;


        private DocPrintArqueo _oDocPrintTPV = null;

        
        private bool _lMostrarMensajes = true;


        private bool _lArqueoCargado = false;


        private int _nNumero = 0;


        private string _cCaja = "";


        private DateTime _dFecha = DateTime.Today;

        private decimal _nImporteTotalVentas = 0.0M;                 // Importe total de ventas en el arqueo: incluye tiquets + albaranes + facturas
        
        private int _nNumero_Tiquets = 0;                            // Nº de tiquets en el arqueo ...
        private string _nNumero_Tiquet_Inicial = "";                 // Nº de tiquet inicial ...
        private string _nNumero_Tiquet_Final = "";                   // Nº de tiquet final ...
        private string _nLetra_Tiquet_Inicial = "";                  // Letra de tiquet inicial ...
        private string _nLetra_Tiquet_Final = "";                    // Letra de tiquet final ...
        
        private DateTime _dFecha_Inicial = new DateTime(1900, 1, 1);   // Fecha inicial del periodo de ventas incluidas en el arqueo ...
        private DateTime _dFecha_Final = new DateTime(1900, 1, 1);     // Fecha final del periodo de ventas incluidas en el arqueo ...

        private decimal _nImporteTotalOperCaja = 0.0M;               // Incluye reposiciones+cobros tiquets+vales efectuados+entregas a cuenta alb.+entregas a cuenta ped.+cobros facturas+cobros varios+pagos facturas+pagos varios+retiros caja en negativo

        private decimal _nImporteArqueo = 0.0M;                      // Importe arqueo calculado ...

        private decimal _nImporteEfectivoArqueo = 0.0M;              // Importe efectivo en caja calculado ...

        private decimal _nImporteTecleado = 0.0M;                    // Importe tecleado por el usuario. Campo solo válido cuando consultamos una arqueo cerrado ...
        private decimal _nImporteDiferencia = 0.0M;                  // Diferencia entrre los dos anteriores. Campo solo válido cuando consultamos una arqueo cerrado ...
        private decimal _nImporteRetirado = 0.0M;                    // Importe retirado de caja al cerrar el arqueo. Campo solo válido cuando consultamos una arqueo cerrado ...
        private decimal _nImporteRepEnCaja = 0.0M;                   // Importe dejado en caja al cerrar el arqueo. Campo solo válido cuando consultamos una arqueo cerrado ...

        private decimal _nImporteDesgFamilias = 0.0M;                // Total importe del desglose de ventas por familias ....

        private decimal _nDesgIvaTic_TotalBases = 0.0M;              // Suma total de todas las bases imponibles del desglose de IVA tiquets ...
        private decimal _nDesgIvaTic_TotalIvas = 0.0M;               // Suma total de todas los ivas del desglose de IVA tiquets ...
        private decimal _nDesgIvaTic_TotalTotal = 0.0M;              // Suma total de todos los totales del desglose de IVA tiquets ...

        private String _cObservaciones = String.Empty; //Campo observaciones

        //PE-77346
        private Dictionary<string, ewDocVentaTPV> _nDocsVenta;
        private Dictionary<string, ewDocIva> _nDocsIva;

        private string _TituloMantenimiento = "Arqueo de caja";

        //T115439
        private Boolean _lAvisoIva = false;


        #endregion PROPIEDADES PRIVADAS


        #region PROPIEDADES PUBLICAS


        public Dictionary<string, string> _Cajas = new Dictionary<string, string>();


        public Dictionary<string, string> _Numeros = new Dictionary<string, string>();


        public Boolean _AvisoIva
        {
            get
            {
                return _lAvisoIva;
            }
        }


        public DataTable _ArqueoDataTable
        {
            get
            {
                if (_oDtArqueo == null) _oDtArqueo = _MontaArqueo();
                return _oDtArqueo;
            }
        }


        public DialogResult? _DialogResult = null;


        public bool _Cargar_Todo_Arqueo_Al_Asignar_Numero = true;


        public bool _Error = false;


        public formul.FormBase _oLinkForm = null;

        
        public Dictionary<string, string> _Monedas
        {
            get
            {
                return _dicMoneda;
            }
        }


        public decimal _Cotizacion(String lcMoneda)
        {
            decimal lnCotizacion;

            // PE-87745 - Bloquear per paralelisme
            lock (_dicCotizacion)
            {

                if (_dicCotizacion.ContainsKey(lcMoneda))
                {
                    lnCotizacion = _dicCotizacion[lcMoneda];
                }
                else
                {
                    lnCotizacion = Divisa._Ultima_Cotizacion(lcMoneda);
                    _dicCotizacion.Add(lcMoneda, lnCotizacion);
                }
            }

            return lnCotizacion;
        }


        public Dictionary<string, object> _Moneda(String lcMoneda)
        {
            Dictionary<string, object> loDicMoneda;

            // PE-87745 - Bloquear per paralelisme
            lock (_dicMonedas)
            {

                if (_dicMonedas.ContainsKey(lcMoneda))
                {
                    loDicMoneda = _dicMonedas[lcMoneda];
                }
                else
                {
                    loDicMoneda =  DB.SQLREGValor("moneda", "codigo", lcMoneda);
                    _dicMonedas.Add(lcMoneda, loDicMoneda);
                }

            }
            return loDicMoneda;
        }


        public int _Numero
        {
            get
            {
                return this._nNumero;
            }
            set
            {
                // Esto está hecho así por si nos interesa cargar todo el arqueo o no. 
                // Si quisieramos consultar un apartado concreto de un arqueo (con nº 0 o diferente de 0), podemos poner la propiedad pública this._Cargar_Todo_Arqueo_Al_Asignar_Numero a false
                // y llamar al método público que carga en alguno de los datatables publicos internos la parte del arqueo que nos interese. 
                // Como lo normal es cargar el arqueo entero, esta propiedad se inicializa a true.
                
                // Resetamos las propiedades del objeto ...
                if(this._Cargar_Todo_Arqueo_Al_Asignar_Numero) this._DescargarDatos();

                this._nNumero = value;
                
                // Cargar todos los datos del arqueo.
                // Si hay numero declarado !=0, cargará los datos del arqueo que hemos pedido, si no hay nº cargará todos los datos como si fuese a realizar un arqueo nuevo ...
                if (this._Cargar_Todo_Arqueo_Al_Asignar_Numero) this._Load();
                //}
            }
        }


        public string _Observaciones
        {
            get { return this._cObservaciones; }
            set { this._cObservaciones = value; }
        }


        public string _Caja
        {
            get { return this._lcCajaActiva; }
            set { this._lcCajaActiva = value; }
        }


        public DateTime _Fecha
        {
            get { return this._dFecha; }
            set { this._dFecha = value; }
        }


        // CAMPOS DEL APARTADO I. VENTAS

        public decimal _ImporteTotalVentas
        {
            get { return this._nImporteTotalVentas; }
        }


        public int _Numero_Tiquets
        {
            get { return this._nNumero_Tiquets; }
        }


        public string _Numero_Tiquet_Inicial
        {
            get { return this._nNumero_Tiquet_Inicial; }
        }


        public string _Numero_Tiquet_Final
        {
            get { return this._nNumero_Tiquet_Final; }
        }


        public string _Letra_Tiquet_Inicial
        {
            get { return this._nLetra_Tiquet_Inicial; }
        }


        public string _Letra_Tiquet_Final
        {
            get { return this._nLetra_Tiquet_Final; }
        }


        // CAMPOS DEL APARTADO II. OPERACIONES DE CAJA

        public decimal _ImporteTotalOperCaja
        {
            get { return this._nImporteTotalOperCaja; }
        }


        // CAMPOS DEL APARTADO III. ARQUEO DE CAJA

        public decimal _ImporteArqueo
        {
            get { return this._nImporteArqueo; }
        }


        public decimal _ImporteEfectivoArqueo
        {
            get { return this._nImporteEfectivoArqueo; }
        }


        public decimal _ImporteTecleado
        {
            get { return this._nImporteTecleado; }
            set
            {
                this._nImporteTecleado = value;
                this._nImporteDiferencia = this._nImporteTecleado - this._nImporteEfectivoArqueo;
            }
        }


        public decimal _ImporteDiferencia
        {
            get { return this._nImporteDiferencia; }
        }


        public decimal _ImporteRepEnCaja
        {
            get { return this._nImporteRepEnCaja; }
            set
            {
                this._nImporteRepEnCaja = value;
                this._nImporteTecleado = value + this._nImporteRetirado;
                this._nImporteDiferencia = this._nImporteTecleado - this._nImporteEfectivoArqueo;
            }
        }


        public decimal _ImporteRetirado
        {
            get { return this._nImporteRetirado; }
            set
            {
                this._nImporteRetirado = value;
                this._nImporteTecleado = value + this._nImporteRepEnCaja;
                this._nImporteDiferencia = this._nImporteTecleado - this._nImporteEfectivoArqueo;
            }
        }


        public decimal _ImporteDesgFamilias
        {
            get { return this._nImporteDesgFamilias; }
        }


        public decimal _DesgIvaTic_TotalBases
        {
            get { return this._nDesgIvaTic_TotalBases; }
        }


        public decimal _DesgIvaTic_TotalIvas
        {
            get { return this._nDesgIvaTic_TotalIvas; }
        }


        public decimal _DesgIvaTic_TotalTotal
        {
            get { return this._nDesgIvaTic_TotalTotal; }
        }


        public string _Mensaje_Error
        {
            get { return _cMensaje_Error; }
            set { _cMensaje_Error = value;}
        }


        // Datatables donde guardaremos los diferentes apartados ...

        
        public DataTable _dtVentas_Tiquets;


        public DataTable _dtVentas_Albaranes;


        public DataTable _dtVentas_Facturas;



        public DataTable _dtOperCaja_Reposiciones;


        public DataTable _dtOperCaja_Retiradas;


        public DataTable _dtOperCaja_Cobros_Tiquets;


        public DataTable _dtOperCaja_Vales_Efectuados;


        public DataTable _dtOperCaja_Entregas_Cuenta_Albaranes;


        public DataTable _dtOperCaja_Entregas_Cuenta_Pedidos;


        public DataTable _dtOperCaja_Cobros_Varios;


        public DataTable _dtOperCaja_Cobros_Facturas;


        public DataTable _dtOperCaja_Pagos_Varios;


        public DataTable _dtOperCaja_Pagos_Facturas;


        
        public DataTable _dtArqueo_Caja;



        public DataTable _dtDesg_Familias;

        

        public DataTable _dtDesg_Iva;


        public bool _Estado_Consulta
        {
            get { return _lEstadoConsulta; }
            set { _lEstadoConsulta = value; }
        }


        public bool _DesgloseFamilias = (Convert.ToBoolean(DB.SQLValor("CONFTPV", "EMPRESA", Convert.ToString(EW_GLOBAL._GetVariable("wc_empresa")), "DESGFAM", "TPV")));


        public Dictionary<string, object> _Addons { get; } = new Dictionary<string, object>();


        #region IDocumentoImprimible


        public IDocPrint _DocPrint
        {
            get
            {
                if (_oDocPrintTPV == null)
                {
                    _oDocPrintTPV = new DocPrintArqueo((IDocumentoImprimible)this);
                }
                return _oDocPrintTPV;
            }
            set
            {
                if (value is DocPrintArqueo) _oDocPrintTPV = (DocPrintArqueo)value;
            }
        }


        public string _Empresa
        {
            get
            {
                return _lcEmpresaActiva;
            }
            set
            {
                ;
            }
        }


        string IDocumentoImprimible._Fecha
        {
            get
            {
                return _Fecha.ToString(EW_GLOBAL._CustomFormatDate);
            }
        }


        public string _Nombre
        {
            get
            {
                return "Arqueo de caja";
            }
        }


        public string _ReportBase
        {
            get
            {
                return ((DocPrintArqueo)_DocPrint)._TipoImpresion == sage.ew.tpv.Clases.DocPrintTPV.TipoImpresion.Ticket ? "arqueoticket.report" : "arqueo.report";
            }
            set
            {
                ;
            }
        }


        public string _ReportTitlePreview
        {
            get
            {
                return _Nombre;
            }
            set
            {
                ;
            }
        }


        public bool _Show_Print(int tnAbrirEn = 1)
        {
            throw new NotImplementedException();
        }


        public Dictionary<string, object> _Obtener_Filtros_SageReports(Dictionary<string, object> tdicParametros = null)
        {
            Dictionary<string, object> loFiltros = new Dictionary<string, object>();
            String lcBase, lcPercentIva, lcImporteIva, lcTotal, lcTitulo;
            Decimal lnTotalBase, lnTotalImporteIva, lnTotalTotal;
            Boolean lConsolidacion, lConsultaArqueos, lTipoArqueoConsulta;
            ewMascara loMascaraImport = new ewMascara(EW_GLOBAL._GetMascara(KeyDiccionarioMascara.wc_total));
            String lcCadenaFormat = "{0:" + loMascaraImport._Mascara_Net + "}";

            lcBase = lcPercentIva = lcImporteIva = lcTotal = "";
            lnTotalBase = lnTotalImporteIva = lnTotalTotal = 0;

            lTipoArqueoConsulta = tdicParametros.ContainsKey("TipoArqueoConsulta") ? Convert.ToBoolean(tdicParametros["TipoArqueoConsulta"]) : false;
            lConsolidacion = tdicParametros.ContainsKey("Consolidacion") ? Convert.ToBoolean(tdicParametros["Consolidacion"]) : false;
            lConsultaArqueos = tdicParametros.ContainsKey("ConsultaArqueos") ? Convert.ToBoolean(tdicParametros["ConsultaArqueos"]) : false;
            lcTitulo = tdicParametros.ContainsKey("Titulo") ? Convert.ToString(tdicParametros["Titulo"]) : _Nombre;

            //if (!lConsolidacion && !lConsultaArqueos && _Numeros.Count == 0)
            // CCR 123263 - Añadir el desglose de Iva
            if (_dtDesg_Iva != null && _dtDesg_Iva.Rows.Count > 0)
            {
                foreach (DataRow ldrFilaIva in _dtDesg_Iva.Rows)
                {
                    lcBase += String.Format("{0}{1}", !String.IsNullOrEmpty(lcBase) ? Environment.NewLine : String.Empty, String.Format(lcCadenaFormat, ldrFilaIva["baseiva"]));
                    lcPercentIva += String.Format("{0}{1}", !String.IsNullOrEmpty(lcPercentIva) ? Environment.NewLine : String.Empty, String.Format(lcCadenaFormat, ldrFilaIva["iva_tan"]));
                    lcImporteIva += String.Format("{0}{1}", !String.IsNullOrEmpty(lcImporteIva) ? Environment.NewLine : String.Empty, String.Format(lcCadenaFormat, ldrFilaIva["impiva"]));
                    lcTotal += String.Format("{0}{1}", !String.IsNullOrEmpty(lcTotal) ? Environment.NewLine : String.Empty, String.Format(lcCadenaFormat, ldrFilaIva["imptotal"]));

                    lnTotalBase += Convert.ToDecimal(ldrFilaIva["baseiva"]);
                    lnTotalImporteIva += Convert.ToDecimal(ldrFilaIva["impiva"]);
                    lnTotalTotal += Convert.ToDecimal(ldrFilaIva["imptotal"]);
                }
            }
            else
            {
                lcTotal = lcImporteIva = lcBase = String.Format(lcCadenaFormat, 0);
            }

            loFiltros.Add("wc_AvisoIva", _AvisoIva ? "1" : "0"); //T115439
            loFiltros.Add("wc_Base", lcBase);
            loFiltros.Add("wc_PercentIva", lcPercentIva);
            loFiltros.Add("wc_ImporteIva", lcImporteIva);
            loFiltros.Add("wc_Total", lcTotal);
            loFiltros.Add("wc_TotalBase", String.Format(lcCadenaFormat, lnTotalBase));
            loFiltros.Add("wc_TotalImporteIva", String.Format(lcCadenaFormat, lnTotalImporteIva));
            loFiltros.Add("wc_TotalTotal", String.Format(lcCadenaFormat, lnTotalTotal));
            loFiltros.Add("wc_MostrarIva", "1");

            loFiltros.Add("wc_Titulo", String.Format("{1} {0}", !lConsolidacion && !lConsultaArqueos ? lTipoArqueoConsulta ? "(Consulta)" : "(Definitivo)" : String.Empty, lcTitulo));
            loFiltros.Add("wc_ImporteRepEnCaja", String.Format(lcCadenaFormat, _ImporteRepEnCaja));
            loFiltros.Add("wc_ImporteRetirado", String.Format(lcCadenaFormat, _ImporteRetirado));
            loFiltros.Add("wc_ImporteTecleado", String.Format(lcCadenaFormat, _ImporteTecleado));

            return loFiltros;
        }


        public DataTable _Obtener_Datos_SageReports(Dictionary<string, object> tdicParametros = null)
        {
            DataTable loDT;

            loDT = _ArqueoDataTable;

            if (loDT is DataTable)
            {
                loDT = _ArqueoDataTable.Copy();

                if (loDT.Rows.Count > 0)
                {
                    DataRow loRow = loDT.Rows[loDT.Rows.Count - 1];

                    if (String.IsNullOrEmpty(Convert.ToString(loRow[0])) && String.IsNullOrEmpty(Convert.ToString(loRow[1])))
                    {
                        loDT.Rows.Remove(loRow);
                    }
                }
            }
            return loDT;
        }


        #endregion IDocumentoImprimible


        #endregion PROPIEDADES PUBLICAS


        #region CONSTRUCTORES


        public ArqueoTpv()
        {
#if ewTools
            EwTools._Start();
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            // Cargar las extensiones para arqueo TPV que encuentre en los Addons activos.
            //
            this._Addons_Cargar();

            this._DescargarDatos();

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif
        }


        public ArqueoTpv(int tnNumero)
        {
#if ewTools
            EwTools._Start();
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif
            // Cargar las extensiones para arqueo TPV que encuentre en los Addons activos.
            //
            this._Addons_Cargar();

            // Asignamos el código de arqueo, esta simple asignación ya hace que se descargue el objeto y se ejecute el _Load() y cargue todos los datos de un arqueo existente (caso
            // de que tnNumero!=0, o cargue todos los datos de una arqueo nuevo, caso de tnNumero=0. Importante asignar a la propiedad pública _Numero y no a la privada _nNumero, la
            // programación está hecha en la propiedad pública, no en la privada, la privada es para uso interrno y nos puede interesar asignarla sin tener que desencadenar todos
            // los procesos.
            //
            // Ojo! Todo lo anterior está condicionado a que la propiedad pública this._Cargar_Todo_Arqueo_Al_Asignar_Numero esté a true (por defecto lo está). Si estuviese a false
            // haría la asignación y nada más. La razón de esta última operativa es que tras asignar número se permita llamar a alguno de los métodos publicos del objeto que realiza la carga
            // de alguno de los apartados únicamente, es para extraer información concreta de algún apartado del arqueo sin tener que cargarlo todo.
            this._Numero = tnNumero;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif
        }


        public ArqueoTpv(dynamic toForm)
        {
#if ewTools
            EwTools._Start();
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            // Cargar las extensiones para arqueo TPV que encuentre en los Addons activos.
            //
            this._Addons_Cargar();

            this._oLinkForm = toForm;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif
        }


        #endregion CONSTRUCTORES


        #region METODOS PUBLICOS


        public Dictionary<string, object> _Obtener_DatosGen_Arqueo_Cerrado(string tcEjercicio, string tcEmpresa, int tnNumero)
        {
            Dictionary<string, object> loDic = new Dictionary<string, object>();

            loDic = DB.SQLREGValor("arqueos", new string[] {"empresa","ejercicio","numero"}, new string[] {tcEmpresa, tcEjercicio, Convert.ToString(tnNumero) },"tpv");
            return loDic;
        }


        public void _DescargarDatos()
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            this._Addons_DescargarDatos(TipoExecute.Before);

            // Reseteamos todas las propiedades privadas ...
            this._nNumero = 0;

            // Caja ..
            this._cCaja = "";

            this._nImporteTotalVentas = 0.0M;       // Importe total de ventas en el arqueo: incluye tiquets + albaranes + facturas
            this._nNumero_Tiquets = 0;              // Nº de tiquets en el arqueo ...
            this._nNumero_Tiquet_Inicial = "";      // Nº de tiquet inicial ...
            this._nNumero_Tiquet_Final = "";        // Nº de tiquet final ...
            this._nLetra_Tiquet_Inicial = "";       // Letra de tiquet inicial ...
            this._nLetra_Tiquet_Final = "";         // Letra de tiquet final ...
            this._dFecha_Inicial = new DateTime(1900, 1, 1);   // Fecha inicial del periodo de ventas incluidas en el arqueo ...
            this._dFecha_Final = new DateTime(1900, 1, 1);     // Fecha final del periodo de ventas incluidas en el arqueo ...

            this._nImporteTotalOperCaja = 0.0M;    // Incluye reposiciones+cobros tiquets+vales efectuados+entregas a cuenta alb.+entregas a cuenta ped.+cobros facturas+cobros varios+pagos facturas+pagos varios+retiros caja en negativo

            this._nImporteArqueo = 0.0M;           // Importe arqueo calculado ...
            this._nImporteEfectivoArqueo = 0.0M;   // Importe efectivo en caja calculado ...
            this._nImporteTecleado = 0.0M;         // Importe tecleado por el usuario. Campo solo válido cuando consultamos una arqueo cerrado ...
            this._nImporteDiferencia = 0.0M;       // Diferencia entrre los dos anteriores. Campo solo válido cuando consultamos una arqueo cerrado ...
            this._nImporteRetirado = 0.0M;         // Importe retirado de caja al cerrar el arqueo. Campo solo válido cuando consultamos una arqueo cerrado ...
            this._nImporteRepEnCaja = 0.0M;        // Importe dejado en caja al cerrar el arqueo. Campo solo válido cuando consultamos una arqueo cerrado ...

            this._nImporteDesgFamilias = 0.0M;     // Total importe del desglose de ventas por familias ....

            this._nDesgIvaTic_TotalBases = 0.0M;   // Suma total de todas las bases imponibles del desglose de IVA tiquets ...
            this._nDesgIvaTic_TotalIvas = 0.0M;    // Suma total de todas los ivas del desglose de IVA tiquets ...
            this._nDesgIvaTic_TotalTotal = 0.0M;   // Suma total de todos los totales del desglose de IVA tiquets ...

            // Datatables que tiene las ventas en los diferentes tipos de documentos y monedas ...
            this._dtVentas_Tiquets = null;
            this._dtVentas_Albaranes = null;
            this._dtVentas_Facturas = null;

            this._dtOperCaja_Reposiciones = null;
            this._dtOperCaja_Retiradas = null;
            this._dtOperCaja_Cobros_Tiquets = null;
            this._dtOperCaja_Vales_Efectuados = null;
            this._dtOperCaja_Entregas_Cuenta_Albaranes = null;
            this._dtOperCaja_Entregas_Cuenta_Pedidos = null;

            this._dtOperCaja_Cobros_Varios = null;
            this._dtOperCaja_Cobros_Facturas = null;
            this._dtOperCaja_Pagos_Varios = null;
            this._dtOperCaja_Pagos_Facturas = null;

            this._dtArqueo_Caja = null;
            this._dtDesg_Familias = null;
            this._dtDesg_Iva = null;

            this._lArqueoCargado = false;

            //PE-77346
            this._nDocsVenta = new Dictionary<string, ewDocVentaTPV>();
            this._nDocsIva = new Dictionary<string, ewDocIva>();

            this._Addons_DescargarDatos(TipoExecute.After);

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif
        }


        public bool _Load()
        {
#if ewTools
            EwTools._Restart();
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            this._Addons_Load(TipoExecute.Before);


            DB._Persist = false;  // PE-87745 - per fer paralelisme ha d'estar a false
            bool llRetorno = false;
            DataTable ldt_Cursor = new DataTable();
            
            //PE-77346
            this._nDocsVenta = new Dictionary<string, ewDocVentaTPV>();
            this._nDocsIva = new Dictionary<string, ewDocIva>();

            this._Error = false;
            this._Mensaje_Error = "";

            Boolean lbListado = this._Cajas.Count > 0 || this._Numeros.Count > 0;

            // Buscamos el registro de TPV!ARQUEOS
            String lcSql ;
            
            // 104028
            if (!lbListado)
            {
                if (_llejercicioautomatico) lcSql = "select * from " + DB.SQLDatabase("tpv", "arqueos") + " where empresa=" + DB.SQLString(this._lcEmpresaActiva) + " and numero=" + DB.SQLString(this._nNumero);
                else lcSql = "select * from " + DB.SQLDatabase("tpv", "arqueos") + " where empresa=" + DB.SQLString(this._lcEmpresaActiva) + " and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " and numero=" + DB.SQLString(this._nNumero);
            }
            else
            {
                if (_llejercicioautomatico) lcSql = String.Format("SELECT SUM(tecleado) as tecleado, SUM(repencaja) as repencaja, SUM(tecleado) as repencaja FROM {0} WHERE empresa = {1} AND {2}", DB.SQLDatabase("tpv", "arqueos"), DB.SQLString(this._lcEmpresaActiva), _makeId("", " and numero=" + DB.SQLString(this._nNumero), "numero"));
                else lcSql = String.Format("SELECT SUM(tecleado) as tecleado, SUM(repencaja) as repencaja, SUM(tecleado) as repencaja FROM {0} WHERE empresa = {1} AND ejercicio = {2} AND {3}",DB.SQLDatabase("tpv", "arqueos"),  DB.SQLString(this._lcEmpresaActiva),  DB.SQLString(this._lcEjercicioActivo), _makeId("",  " and numero=" + DB.SQLString(this._nNumero), "numero"));
            }
            // fi 104028
            llRetorno = DB.SQLExec(lcSql, ref ldt_Cursor);
            

            if (llRetorno || lbListado)
            {
                if (!lbListado)
                {
                    this._cCaja = this._nNumero != 0 && ldt_Cursor.Rows.Count > 0 ? Convert.ToString(ldt_Cursor.Rows[0]["caja"]) : this._lcCajaActiva;
                    this._dFecha = this._nNumero != 0 && ldt_Cursor.Rows.Count > 0 ? Convert.ToDateTime(ldt_Cursor.Rows[0]["fecha"]) : this._dFecha;
                }

#if ewTools
                EwTools._WriteTrace(EwTools.eMethodStatus.Procesando,"Inicio paralelismo");
#endif

                // PE-87745 - Paralelisme
                decimal lnTotalRepo = 0.0M, lnTotalTickets = 0.0M, lnTotalVales = 0.0M, lnTotalEntAlb = 0.0M, lnTotalEntPed = 0.0M, lnTotalCFac = 0.0M, lnTotalCVar = 0.0M;
                decimal lnTotalPFac = 0.0M, lnTotalPVar = 0.0M, lnTotalRet = 0.0M;

                String lcMsgNumTickets = "", lcMsgImpTickets = "", lcMsgRepo = "", lcMsgTickets = "", lcMsgVales = "", lcMsgEntAlb = "", lcMsgEntPed = "", lcMsgCFas = "", lcMsgCVar = "";
                String lcMsgPFac = "", lcMsgPVar = "", lcMsgRet = "";

                DataTable ldReposiciones  = new DataTable();
                DataTable ldCobrosTiquets = new DataTable();
                DataTable ldVales         = new DataTable();
                DataTable ldEntAlbaran    = new DataTable();
                DataTable ldEntPedidos    = new DataTable();
                DataTable ldCobrosFac     = new DataTable();
                DataTable ldCobrosVarios  = new DataTable();
                DataTable ldPagosFacturas = new DataTable();
                DataTable ldPagosVarios   = new DataTable();
                DataTable ldRetiros       = new DataTable();

                Parallel.Invoke(
                    () => this._nNumero_Tiquets = this._Obtener_Numero_Tiquets(ref this._nNumero_Tiquet_Inicial, ref this._nNumero_Tiquet_Final, ref lcMsgNumTickets, ref this._nLetra_Tiquet_Inicial, ref this._nLetra_Tiquet_Final),  //PE-90183

                    // I-VENTAS
                    () => this._Obtener_DataTables_Importe_Tiquets_Albaranes_Facturas(ref this._dFecha_Inicial, ref this._dFecha_Final, ref lcMsgImpTickets),

                    // II-OPERACIONES CAJA
                    () => ldReposiciones = this._Obtener_DataTable_OperCaja_Reposiciones(ref lnTotalRepo, ref lcMsgRepo),
                    () => ldCobrosTiquets = this._Obtener_DataTable_OperCaja_Cobros_Tiquets(ref lnTotalTickets, ref lcMsgTickets),
                    () => ldVales = this._Obtener_DataTable_OperCaja_Vales_Efectuados(ref lnTotalVales, ref lcMsgVales),
                    () => ldEntAlbaran = this._Obtener_DataTable_OperCaja_Entregas_Cuenta_Albaranes(ref lnTotalEntAlb, ref lcMsgEntAlb),
                    () => ldEntPedidos = this._Obtener_DataTable_OperCaja_Entregas_Cuenta_Pedidos(ref lnTotalEntPed, ref lcMsgEntPed),
                    () => ldCobrosFac = this._Obtener_DataTable_OperCaja_Cobros_Facturas(ref lnTotalCFac, ref lcMsgCFas),
                    () => ldCobrosVarios = this._Obtener_DataTable_OperCaja_Cobros_Varios(ref lnTotalCVar, ref lcMsgCVar),
                    () => ldPagosFacturas = this._Obtener_DataTable_OperCaja_Pagos_Facturas(ref lnTotalPFac, ref lcMsgPFac),
                    () => ldPagosVarios = this._Obtener_DataTable_OperCaja_Pagos_Varios(ref lnTotalPVar, ref lcMsgPVar),
                    () => ldRetiros = this._Obtener_DataTable_OperCaja_Retiros(ref lnTotalRet, ref lcMsgRet));

#if ewTools
                EwTools._WriteTrace(EwTools.eMethodStatus.Procesando, "Fin paralelismo");
#endif

                // Actualizar campo Total Operaciones Caja del objeto ...
                this._nImporteTotalOperCaja = lnTotalRepo + lnTotalTickets + lnTotalVales + lnTotalEntAlb + lnTotalEntPed + lnTotalCFac + lnTotalCVar + lnTotalPFac + lnTotalPVar + lnTotalRet;

                this._dtOperCaja_Reposiciones = ldReposiciones;
                this._dtOperCaja_Cobros_Tiquets = ldCobrosTiquets;
                this._dtOperCaja_Vales_Efectuados = ldVales;
                this._dtOperCaja_Entregas_Cuenta_Albaranes = ldEntAlbaran;
                this._dtOperCaja_Entregas_Cuenta_Pedidos = ldEntPedidos;
                this._dtOperCaja_Cobros_Facturas = ldCobrosFac;
                this._dtOperCaja_Cobros_Varios = ldCobrosVarios;
                this._dtOperCaja_Pagos_Facturas = ldPagosFacturas;
                this._dtOperCaja_Pagos_Varios = ldPagosVarios;
                this._dtOperCaja_Retiradas = ldRetiros;

                _MessageBox(lcMsgNumTickets);
                _MessageBox(lcMsgImpTickets);
                _MessageBox(lcMsgRepo);
                _MessageBox(lcMsgTickets);
                _MessageBox(lcMsgVales);
                _MessageBox(lcMsgEntAlb);
                _MessageBox(lcMsgEntPed);
                _MessageBox(lcMsgCFas);
                _MessageBox(lcMsgCVar);
                _MessageBox(lcMsgPFac);
                _MessageBox(lcMsgPVar);
                _MessageBox(lcMsgRet);

                // III-ARQUEO DE CAJA
                // Estos 3 campos tendran valor si estamos en un arqueo ya cerrado, sino estaran a 0

                // 90664
                if ((this._nNumero != 0 || lbListado) && ldt_Cursor.Rows.Count > 0 && ldt_Cursor.Rows[0]["tecleado"] != DBNull.Value)
                    this._nImporteTecleado = Convert.ToDecimal(ldt_Cursor.Rows[0]["tecleado"]);

                if ((this._nNumero != 0 || lbListado) && ldt_Cursor.Rows.Count > 0 && ldt_Cursor.Rows[0]["repencaja"] != DBNull.Value)
                    this._nImporteRepEnCaja = Convert.ToDecimal(ldt_Cursor.Rows[0]["repencaja"]);

                if ((this._nNumero != 0 || lbListado) && ldt_Cursor.Rows.Count > 0 && ldt_Cursor.Rows[0]["tecleado"] != DBNull.Value && ldt_Cursor.Rows[0]["repencaja"] != DBNull.Value)
                    this._nImporteRetirado = Convert.ToDecimal(ldt_Cursor.Rows[0]["tecleado"]) - Convert.ToDecimal(ldt_Cursor.Rows[0]["repencaja"]);
                
                // fi 90664

#if ewTools
                EwTools._WriteTrace(EwTools.eMethodStatus.Llamando, "_Obtener_DataTable_Arqueo_Caja");
#endif

                // Obtener datatable de cuadre de arqueo de caja ...
                this._Obtener_DataTable_Arqueo_Caja();

#if ewTools
                EwTools._WriteTrace(EwTools.eMethodStatus.Volviendo, "_Obtener_DataTable_Arqueo_Caja");
#endif

                this._nImporteDiferencia = this._nImporteEfectivoArqueo - this._nImporteTecleado;

#if ewTools
                EwTools._WriteTrace(EwTools.eMethodStatus.Llamando, "_Obtener_DataTable_Desg_Familias");
#endif

                // IV-DESGLOSE FAMILIAS
                this._nImporteDesgFamilias = this._Obtener_DataTable_Desg_Familias();

#if ewTools
                EwTools._WriteTrace(EwTools.eMethodStatus.Volviendo, "_Obtener_DataTable_Desg_Familias");
#endif

#if ewTools
                EwTools._WriteTrace(EwTools.eMethodStatus.Llamando, "_Obtener_DataTable_Desg_Iva_Tiquets");
#endif

                // Desglose IVA
                // Dentro de este método se actualizan 3 propiedades del objeto Arqueo que guardan las el total bases, el total ivas i el total total del desglose de IVA
                this._Obtener_DataTable_Desg_Iva_Tiquets();

#if ewTools
                EwTools._WriteTrace(EwTools.eMethodStatus.Volviendo, "_Obtener_DataTable_Desg_Iva_Tiquets");
#endif

                this._lArqueoCargado = true;
            }

            DB._Persist = false;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif      

            this._Addons_Load(TipoExecute.After);

            // Devuelve true si todo fue ok, false caso contrario.
            return (this._Error == false);
        }


        public void _Load_Observaciones()
        {
            DataTable ldt_Cursor = new DataTable();
            bool llRetorno;

            // Si no tenemos numero o hay más de un arqueo no realizar la consulta
            if (this._nNumero == 0 && this._Numeros.Count > 1) 
            {
                this._cObservaciones = "";
                return;
            }

            String lcCond = this._nNumero != 0 ?  " numero=" + DB.SQLString(this._nNumero) : _makeId("",  " and numero=" + DB.SQLString(this._nNumero), "numero");

            String lcSql ;
            lcSql = String.Format("select observacio FROM {0} WHERE empresa = {1} AND ejercicio = {2} and {3}", DB.SQLDatabase("tpv", "arqueos"), DB.SQLString(this._lcEmpresaActiva), DB.SQLString(this._lcEjercicioActivo), lcCond);
            llRetorno = DB.SQLExec(lcSql, ref ldt_Cursor);
            
            if (llRetorno && ldt_Cursor.Rows.Count > 0)
                this._cObservaciones = Convert.ToString(ldt_Cursor.Rows[0]["observacio"]);

            return;
        }


        public virtual bool _Save()
        {
            bool llRetorno = false, llConsultaOk = false;
            DataTable ldt_Arqueo = new DataTable();
            string lcNumero = "";

            this._Error = false;
            this._Mensaje_Error = "";

            this._Addons_Save(TipoExecute.Before);

            if (this._lArqueoCargado == false)
            {
                this._MessageBox("(_Save) No se ha cargado todavía ningun arqueo.\n\nPrimero debe cargarse en el objeto una arqueo.");
                return false;
            }

            if (this._nNumero != 0)
            {
                this._MessageBox("(_Save) No se puede cerrar un arqueo que ya está cerrado.\n\nPrimero se debe desarquear.");
                return false;
            }

            // Miramos si hay tiquets aparcados, si es así, no permitimos continuar ...
            int lnNumTicAparcados = this._Numero_Tiquets_Aparcados();

            if (lnNumTicAparcados > 0)
            {
                this._MessageBox("(_Save) Existen tickets aparcados.\n\nNo es posible cerrar el arqueo.");
                return false;
            }

            // Obtener nuevo número de arqueo ...
            do
            {
                // Obtener nuevo contador ...
                lcNumero = FUNCTIONS._SumaNumero(this._lcEmpresaActiva, "arqueo", "conftick", "tpv");
                if (this._lNetOffLine)
                    // Modo desconectat del servidor de la xarxa, treballem en local
                    lcNumero = this._lcLetraCajaActiva.Trim().PadLeft(2, '0') + this._lcCajaActiva.Substring(2, 2).Trim().PadLeft(2, '0') + lcNumero.Trim();

                // Si el arqueo ya existe, vamos al siguiente número de contador ...
                llConsultaOk = DB.SQLExec("select numero from " + DB.SQLDatabase("tpv", "arqueos") + " " +
                                          "where empresa=" + DB.SQLString(this._lcEmpresaActiva) + " and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " and " +
                                          "numero=" + DB.SQLString(Convert.ToInt32(lcNumero)), ref ldt_Arqueo);
                if (ldt_Arqueo.Rows.Count == 0)
                    break;
            }
            while (true);

            // Lo asignamos a la propiedad privada, de esta forma no se disparan todos los eventos que sí se disparan al asignar la propiedad pública ..
            this._nNumero = Convert.ToInt32(lcNumero);

            // Crear registro en tabla TPV!ARQUEOS ... 
            //PE-86774 Añadir numinit, numfint 
            llRetorno = DB.SQLExec("insert into " + DB.SQLDatabase("tpv", "arqueos") + " " +
                            "(usuario,empresa,ejercicio,caja,fecha,hora,numero, numinit, numfint ,tecleado, observacio, repencaja, letraini, letrafin) values (" +
                            DB.SQLString(this._lcUsuarioTablas) + ", " +
                            DB.SQLString(this._lcEmpresaActiva) + ", " +
                            DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + ", " +
                            DB.SQLString(this._lcCajaActiva) + ", " +
                            DB.SQLString(this._dFecha) + ", " +
                            DB.SQLString(DateTime.Now) + ", " +
                            DB.SQLString(this._nNumero) + ", " +
                            //PE-86774 Añadir numinit, numfint 
                            DB.SQLString(this._nNumero_Tiquet_Inicial.Replace("T", "")) + ", " +
                            DB.SQLString(this._nNumero_Tiquet_Final.Replace("T", "")) + ", " + 
                            DB.SQLString(this._nImporteTecleado) + ", " +
                            DB.SQLString(this._cObservaciones) + ", " +
                            DB.SQLString(this._nImporteRepEnCaja) + ", "+
                            DB.SQLString(this._nLetra_Tiquet_Inicial) + ", " +   //PE-90183
                            DB.SQLString(this._nLetra_Tiquet_Final) + ")");      //PE-90183
            if (!llRetorno)
            {
                this._MessageBox("(_Save) Error al insertar registro en la tabla tpv!arqueos.");
                this._DesArquear();
                return false;
            }

            // PE-87745 - Unificar los UPDATE en una sola instrucción

            

            // Marcar registros de TPV!C_ALBVEN
            llRetorno = DB.SQLExec("update " + DB.SQLDatabase("tpv", "c_albven") + " " +
                                    "set arqueo=" + DB.SQLString(this._nNumero) + " " +
                                    "from " + DB.SQLDatabase("tpv", "c_albven") + " a " +
                                    "inner join " + DB.SQLDatabase("gestion", "c_albven") + " b " +
                                    "on a.empresa = b.empresa " +
                                    " and a.numero = b.numero " +
                                    " and a.letra = b.letra " +
                                    " and a.ejercicio = " + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "where a.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                    "and a.arqueo=0 " +
                                    "and b.fecha<=" + DB.SQLString(this._dFecha) + " " +
                                    "and a.caja=" + DB.SQLString(this._lcCajaActiva) + "; "+
            
           // Marcar registros de TPV!TIKETS                    
                                    "update " + DB.SQLDatabase("tpv", "tikets") + " " +
                                    "set arqueo=" + DB.SQLString(this._nNumero) + " " +
                                    "where ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                    "and arqueo=0 " +
                                    "and fecha<=" + DB.SQLString(this._dFecha) + " " +
                                    "and caja=" + DB.SQLString(this._lcCajaActiva) + "; "+

            // Marcar registros de TPV!VALES
                                    "update " + DB.SQLDatabase("tpv", "vales") + " " +
                                    "set arqueo=" + DB.SQLString(this._nNumero) + " " +
                                    "where ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                    "and arqueo=0 " +
                                    "and fecha<=" + DB.SQLString(this._dFecha) + " " +
                                    "and caja=" + DB.SQLString(this._lcCajaActiva) + "; "+

            // Marcar registros de TPV!REPOSI
                                    "update " + DB.SQLDatabase("tpv", "reposi") + " " +
                                    "set arqueo=" + DB.SQLString(this._nNumero) + " " +
                                    "where empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                    "and caja=" + DB.SQLString(this._lcCajaActiva) + " " +
                                    "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and arqueo=0 " +
                                    "and fecha<=" + DB.SQLString(this._dFecha) + "; " +

            // Marcar registros de TPV!COB_PAGO
                                    "update " + DB.SQLDatabase("tpv", "cob_pago") + " " +
                                    "set arqueo=" + DB.SQLString(this._nNumero) + " " +
                                    "where empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                    "and caja=" + DB.SQLString(this._lcCajaActiva) + " " +
                                    "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and arqueo=0 " +
                                    "and operacion='R' " +
                                    "and fecha<=" + DB.SQLString(this._dFecha));
            if (!llRetorno)
            {
                this._MessageBox("(_Save) Error al actualizar campo ARQUEO.");
                // Si hubo algun error ejecuto desarqueo para que desmarque lo que pudiera haber marcado hasta ese momento ...
                this._DesArquear();
                return false;
            }
            

            // Guardar datos en TPV!D_ARQUEO

            // Primero borramos cualquier resto que pudiera haber del arqueo ...
            llRetorno = DB.SQLExec("delete from " + DB.SQLDatabase("tpv", "d_arqueo") + " " +
                                    "where empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                    "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and arqueo=" + DB.SQLString(this._nNumero));
            if (!llRetorno)
            {
                this._MessageBox("(_Save) Error al borrar registro de tpv!d_arqueo.");
                this._DesArquear();
                return false;
            }


            // PE-87745 - Paralelisme
            bool llVentaTickets = false, llVentaAlbaranes = false, llVentaFacturas = false, llCobrosFacturas=false, llCobrosTickets = false, llCobrosVarios = false;
            bool llEntregasCuenta = false, llEntregasPedido = false, llPagosFacturas = false, llPagosVarios = false, llReposiciones = false, llRetiradas = false;
            bool llVales = false, llFormasCobros = false;

            Parallel.Invoke(
                    () => llVentaTickets   = _Guardar_Arqueo(_dtVentas_Tiquets, " VT"),
                    () => llVentaAlbaranes = _Guardar_Arqueo(_dtVentas_Albaranes, " VA"),
                    () => llVentaFacturas  = _Guardar_Arqueo(_dtVentas_Facturas, " VF"),
                    () => llCobrosFacturas = _Guardar_Arqueo(_dtOperCaja_Cobros_Facturas, " CF"),
                    () => llCobrosTickets  = _Guardar_Arqueo(_dtOperCaja_Cobros_Tiquets, " CT"),
                    () => llCobrosVarios   = _Guardar_Arqueo(_dtOperCaja_Cobros_Varios, " CV"),
                    () => llEntregasCuenta = _Guardar_Arqueo(_dtOperCaja_Entregas_Cuenta_Albaranes, " EC"),
                    () => llEntregasPedido = _Guardar_Arqueo(_dtOperCaja_Entregas_Cuenta_Pedidos, " EP"),
                    () => llPagosFacturas  = _Guardar_Arqueo(_dtOperCaja_Pagos_Facturas, " PF"),
                    () => llPagosVarios    = _Guardar_Arqueo(_dtOperCaja_Pagos_Varios, " PV"),
                    () => llReposiciones   = _Guardar_Arqueo(_dtOperCaja_Reposiciones, " RP"),
                    () => llRetiradas      = _Guardar_Arqueo(_dtOperCaja_Retiradas, " RT"),
                    () => llVales          = _Guardar_Arqueo(_dtOperCaja_Vales_Efectuados, " VE"),
                    () => llFormasCobros   = _Guardar_Formas_Cobro());

            // Registros de ventas de tiquets en las diferentes monedas detectadas ...
            if (!llVentaTickets)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo VT.");
                this._DesArquear();
                return false;
            }

            // Registros de ventas de albaranes en las diferentes monedas detectadas ...
            if (!llVentaAlbaranes)
            {
               this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo VA.");
               this._DesArquear();
               return false;
            }

            // Registros de ventas de facturas en las diferentes monedas detectadas ...
            if (!llVentaFacturas)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo VA.");
                this._DesArquear();
                return false;
            }

            // Registros de cobros de facturas en las diferentes monedas detectadas ...
            if (!llCobrosFacturas)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo CF.");
                this._DesArquear();
                return false;
            }

            // Registros de cobros de tiquets en las diferentes monedas detectadas ...
            if (!llCobrosTickets)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo CT.");
                this._DesArquear();
                return false;
            }

            // Registros de cobros varios en las diferentes monedas detectadas ...
            if (!llCobrosVarios)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo CV.");
                this._DesArquear();
                return false;
            }

            // Registros de entregas a cuenta de albaranes en las diferentes monedas detectadas ...
            if (!llEntregasCuenta)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo EC.");
                this._DesArquear();
                return false;
            }

            // Registros de entregas a cuenta de pedidos en las diferentes monedas detectadas ...
            if (!llEntregasPedido)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo EP.");
                this._DesArquear();
                return false;
            }

            // Registros de pagos de facturas en las diferentes monedas detectadas ...                    
            if (!llPagosFacturas)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo PF.");
                this._DesArquear();
                return false;
            }

            // Registros de pagos varios en las diferentes monedas detectadas ...
            if (!llPagosVarios)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo PV.");
                this._DesArquear();
                return false;
            }

            // Registros de reposiciones en las diferentes monedas detectadas ...
            if (!llReposiciones)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo RP.");
                this._DesArquear();
                return false;
            }

            // Registros de retiradas en las diferentes monedas detectadas ...
            if (!llRetiradas)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo RT.");
                this._DesArquear();
                return false;
            }

            // Registros de vales efectuados
            if (!llVales)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo VE.");
                this._DesArquear();
                return false;
            }

            // Registros de arqueo de caja (formas de cobro efectivo) en las diferentes monedas detectadas ...
            if (!llFormasCobros)
            {
                this._MessageBox("(_Save) Error al insertar registro en tpv!d_arqueo (formas cobro efectivo).");
                this._DesArquear();
                return false;
            }

            if (this._Error == true)
            {
                llRetorno = false;
                this._MessageBox(this._Mensaje_Error);
                // Si hubo algun error ejecuto desarqueo para que desmarque lo que pudiera haber marcado hasta ese momento ...
                this._DesArquear();
                return false;
            }

            //CCR128982
            if (!this._Error) _UpdateOffLine(2);

            this._Addons_Save(TipoExecute.After);


            return (this._Error == false);
        }


        public virtual bool _Save_Observaciones()
        {
            bool llRetorno;

            // Si no tenemos numero o hay más de un arqueo no realizar la consulta
            if (this._nNumero == 0 && this._Numeros.Count > 1)
                return false;

            String lcNumero = Convert.ToString(this._nNumero);
            if (this._nNumero == 0)
            {
                KeyValuePair<string, string> itemFirst = _Numeros.First();
                lcNumero = itemFirst.Value;
            }


            llRetorno = DB.SQLExec("update " + DB.SQLDatabase("tpv", "arqueos") + " " +
                                    "set observacio=" + DB.SQLString(this._cObservaciones) + " " +
                                    "where ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                    "and numero=" + DB.SQLString(lcNumero));

            if (!llRetorno)
            {
                this._MessageBox("(_Save) Error al actualizar observaciones del ARQUEO.");
                return false;
            }
            return true;
        }


        // 90664
        public void _Arquear()
        {
            //this._DescargarDatos();

            this._Addons_Arquear(TipoExecute.Before);

            this._Load();
            this._Save();

            this._Addons_Arquear(TipoExecute.After);
        }


        public DataTable _DataTableCierreCaja(Dictionary<string, string> monedas = null)
        {

            //String tcCodigo;
            //DataTable dtArqueo = new DataTable();

            //tcCodigo = "*";


            //dtArqueo.Columns.Add("ini");
            //dtArqueo.Columns.Add("descripcion");
            //dtArqueo.Columns.Add("total");
            //dtArqueo.Columns.Add("tipo_fila");
            //dtArqueo.Columns.Add("tipo_navegacion");

            //if (monedas != null)
            //{
            //    foreach (KeyValuePair<string, string> moneda in monedas)
            //    {
            //        if (tcCodigo == "*" || tcCodigo == moneda.Key)
            //        {
            //            dtArqueo.Columns.Add(String.Format("Importe {0}", moneda.Value));
            //        }
            //    }
            //}

            //T115439
            DataTable dtArqueo = new DataTable();

            dtArqueo.Columns.Add("ini");
            dtArqueo.Columns.Add("descripcion");
            dtArqueo.Columns.Add("total");
            dtArqueo.Columns.Add("tipo_fila");
            dtArqueo.Columns.Add("tipo_navegacion");
            dtArqueo.Columns.Add("moneda"); 

            return dtArqueo;

        }


        public DataTable _MontaArqueo()
        {
            Boolean llShowTotal = false;
            Int32 iFactSimpl;
            Decimal iTotal, iTotalFacturas, iTotalAlbaranes, iRetirosCaja, iTotalDesgloseFamilia, iImporteTecleado, iTotalTickets;

            this._Addons_MontaArqueo(TipoExecute.Before);

            //PE-86776
            ewMascara _oMascaraImport = new ewbase.ewMascara(ew.global.EW_GLOBAL._GetMascara(KeyDiccionarioMascara.wc_total));
            ewMascara _oMascaraPorcent = new ewbase.ewMascara(ew.global.EW_GLOBAL._GetMascara(KeyDiccionarioMascara.wc_tpc));

            String lcCadenaFormat = "{0:" + _oMascaraImport._Mascara_Net + "}";

            _oDtArqueo = _DataTableCierreCaja(this._Monedas);

            if (this._dtVentas_Facturas != null)
            {
                // PE-90183 - En el caso de trabajar con series de documentos, presentar la letra inicial y final de los tickets.
                String lcTicketIni = this._Numero_Tiquet_Inicial;
                String lcTicketFin = this._Numero_Tiquet_Final;
                if (_llFactSer)
                {
                    lcTicketIni = String.IsNullOrEmpty(this._Letra_Tiquet_Inicial) || String.IsNullOrWhiteSpace(this._Letra_Tiquet_Inicial) ? lcTicketIni : new String(' ', 3) + this._Letra_Tiquet_Inicial + "-" + lcTicketIni.Trim();
                    lcTicketFin = String.IsNullOrEmpty(this._Letra_Tiquet_Final) || String.IsNullOrWhiteSpace(this._Letra_Tiquet_Final) ? lcTicketFin : new String(' ', 3) + this._Letra_Tiquet_Final + "-" + lcTicketFin.Trim();
                }


                iFactSimpl = this._Numero_Tiquets;
                //Ventas
                _oDtArqueo.Rows.Add(_addRow(new Object[] { "I.", "VENTAS", "", 1, Navegacion.No }));
                _oDtArqueo.Rows.Add(_addRow(new Object[] { "", String.Format("Nº de Facturas Simplificadas:{0}", iFactSimpl), "", 0, Navegacion.VentasTickets }));
                _oDtArqueo.Rows.Add(_addRow(new Object[] { "", String.Format("Factura simplificada inicial:{0}", lcTicketIni), "", 0, Navegacion.VentasTickets }));
                _oDtArqueo.Rows.Add(_addRow(new Object[] { "", String.Format("Factura simplificada final:{0}", lcTicketFin), "", 0, Navegacion.VentasTickets }));
                _AddBlank();

                //T115439 Diferenciamos por moneda
                foreach (var loDicMoneda in _dicMonedas)
                {
                    llShowTotal = false;
                    iTotalTickets = iTotalFacturas = iTotalAlbaranes = 0;
                    String lcMoneda = Convert.ToString(loDicMoneda.Key);
                    String lcNombreMoneda =  Convert.ToString(loDicMoneda.Value["nombre"]).Trim();

                    List<DataRow> loRowsTiquets = (from loRowTiquets in this._dtVentas_Tiquets.AsEnumerable()
                                                   where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                   select loRowTiquets).ToList();

                    foreach (DataRow row in loRowsTiquets)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.VentasTickets));
                        iTotalTickets += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsAlbaranes = (from loRowTiquets in this._dtVentas_Albaranes.AsEnumerable()
                                                     where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                     select loRowTiquets).ToList();

                    foreach (DataRow row in loRowsAlbaranes)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.VentasAlbaranes));
                        iTotalAlbaranes += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsFacturas = (from loRowTiquets in this._dtVentas_Facturas.AsEnumerable()
                                                    where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                    select loRowTiquets).ToList();

                    foreach (DataRow row in loRowsFacturas)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.VentasFacturas));
                        iTotalFacturas += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                   Decimal lnTotal = iTotalFacturas + iTotalAlbaranes + iTotalTickets;
                   if (llShowTotal)
                   {
                       _oDtArqueo.Rows.Add(_addRow(new Object[] { "", String.Format("Total ({0}) . . .", lcNombreMoneda), String.Format(lcCadenaFormat, lnTotal), 2, Navegacion.No }));
                       _AddBlank();
                   }
                }
                
                //Operaciones caja
                _oDtArqueo.Rows.Add(_addRow(new Object[] { "II.", "OPERACIONES CAJA", "", 1, Navegacion.No }));

                //T115439 Diferenciamos por moneda
                foreach (var loDicMoneda in _dicMonedas)
                {
                    String lcMoneda = Convert.ToString(loDicMoneda.Key);
                    String lcNombreMoneda = Convert.ToString(loDicMoneda.Value["nombre"]).Trim();
                    llShowTotal = false;

                    List<DataRow> loRowsReposiciones = (from loRowTiquets in this._dtOperCaja_Reposiciones.AsEnumerable()
                                                   where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                   select loRowTiquets).ToList();

                    iTotal = 0;
                    //Reposiciones caja
                    foreach (DataRow row in loRowsReposiciones)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaReposiciones));
                        iTotal += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsCobrosTickets = (from loRowTiquets in this._dtOperCaja_Cobros_Tiquets.AsEnumerable()
                                                        where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                        select loRowTiquets).ToList();

                    //Cobros facturas simplificadas            
                    foreach (DataRow row in loRowsCobrosTickets)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaCobrosTickets));
                        iTotal += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsVales = (from loRowTiquets in this._dtOperCaja_Vales_Efectuados.AsEnumerable()
                                                         where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                         select loRowTiquets).ToList();

                    foreach (DataRow row in loRowsVales)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaValesEjecutados));
                        iTotal += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsEntregasAlbaranes = (from loRowTiquets in this._dtOperCaja_Entregas_Cuenta_Albaranes.AsEnumerable()
                                                 where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                 select loRowTiquets).ToList();

                    //ENTREGAS A CUENTA
                    foreach (DataRow row in loRowsEntregasAlbaranes)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaEntregasCuentaAlbaranes));
                        iTotal += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsEntregasPedidos = (from loRowTiquets in this._dtOperCaja_Entregas_Cuenta_Pedidos.AsEnumerable()
                                                    where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                    select loRowTiquets).ToList();

                    //ENTREGAS A CUENTA (PEDIDOS) - 91929
                    foreach (DataRow row in loRowsEntregasPedidos)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaEntregasCuentaPedidos));
                        iTotal += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsCobrosVarios = (from loRowTiquets in this._dtOperCaja_Cobros_Varios.AsEnumerable()
                                                           where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                           select loRowTiquets).ToList();

                    //COBROS VAIOS
                    foreach (DataRow row in loRowsCobrosVarios)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaCobrosVarios));
                        iTotal += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsCobrosFacturas = (from loRowTiquets in this._dtOperCaja_Cobros_Facturas.AsEnumerable()
                                                        where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                        select loRowTiquets).ToList();

                    //COBROS FACTURAS     
                    foreach (DataRow row in loRowsCobrosFacturas)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaCobrosFacturas));
                        iTotal += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsPagosVarios = (from loRowTiquets in this._dtOperCaja_Pagos_Varios.AsEnumerable()
                                                          where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                          select loRowTiquets).ToList();

                    //COBROS VARIOS       
                    foreach (DataRow row in loRowsPagosVarios)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaPagosVarios));
                        iTotal += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsPagosFacturas = (from loRowTiquets in this._dtOperCaja_Pagos_Facturas.AsEnumerable()
                                                     where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                     select loRowTiquets).ToList();

                    //RETIROS CAJA
                    foreach (DataRow row in loRowsPagosFacturas)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaPagosFacturas));
                        iTotal += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    List<DataRow> loRowsRetiros = (from loRowTiquets in this._dtOperCaja_Retiradas.AsEnumerable()
                                                         where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                         select loRowTiquets).ToList();

                    foreach (DataRow row in loRowsRetiros)
                    {
                        _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaRetiradas));
                        iTotal += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    if (llShowTotal)
                    {
                        _oDtArqueo.Rows.Add(_addRow(new Object[] { "", String.Format("Total ({0}) . . .", lcNombreMoneda), String.Format(lcCadenaFormat, iTotal), 2, Navegacion.No }));
                        _AddBlank();
                    }
                }

                //Arqueo caja
                _AddBlank();
                _oDtArqueo.Rows.Add(_addRow(new Object[] { "III.", "ARQUEO CAJA", "", 1, Navegacion.No }));

                //T115439 Diferenciamos por moneda
                foreach (var loDicMoneda in _dicMonedas)
                {
                    String lcMoneda = Convert.ToString(loDicMoneda.Key);
                    String lcNombreMoneda = Convert.ToString(loDicMoneda.Value["nombre"]).Trim();
                    llShowTotal = false;
   
                    List<DataRow> loRowsTotalFormaCobro = (from loRowTiquets in this._dtArqueo_Caja.AsEnumerable()
                                                   where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                   select loRowTiquets).ToList();
                    
                    iRetirosCaja = 0;
                    foreach (DataRow row in loRowsTotalFormaCobro)
                    {
                        // 88164
                        if (row[0].ToString() == "__")
                            _oDtArqueo.Rows.Add(_addRow(row, Navegacion.OperCajaValesEjecutados));
                        else
                            _oDtArqueo.Rows.Add(_addRow(row, Navegacion.Caja));
                        // fi 88164

                        iRetirosCaja += Convert.ToDecimal(row["importediv"]);
                        llShowTotal = true;
                    }

                    if (llShowTotal)
                    {
                        _oDtArqueo.Rows.Add(_addRow(new Object[] { "", String.Format("Total ({0}) . . .", lcNombreMoneda), String.Format(lcCadenaFormat, iRetirosCaja), 2, Navegacion.No }));
                        if (lcMoneda != EW_GLOBAL._Empresa._Moneda ) _oDtArqueo.Rows.Add(_addRow(new Object[] { "", "", "", 0, Navegacion.No }));
                    }

                    if (lcMoneda == EW_GLOBAL._Empresa._Moneda)
                    {
                        iImporteTecleado = this._Afegir_Total_Tecleado_Diferencia(ref _oDtArqueo, lcCadenaFormat);
                        this._ImporteRepEnCaja = this._ImporteRepEnCaja;
                        this._ImporteTecleado = iImporteTecleado;
                        _AddBlank();                 
                    }
                }

                // PE-89939 - Mostrar el desglose por familias según la propiedad
                if (this._DesgloseFamilias)
                {
                     _AddBlank();
                    _oDtArqueo.Rows.Add(_addRow(new Object[] { "IV.", "DESGLOSE POR FAMILIAS", "", 1, Navegacion.No }));

                    //T115439 Diferenciamos por moneda
                    foreach (var loDicMoneda in _dicMonedas)
                    {
                         String lcMoneda = Convert.ToString(loDicMoneda.Key);
                         String lcNombreMoneda = Convert.ToString(loDicMoneda.Value["nombre"]).Trim();
                      
                         //Desglose por familia
                         iTotalDesgloseFamilia = 0;
                         llShowTotal = false;

                         List<DataRow> loRowsFamilia = (from loRowTiquets in this._dtDesg_Familias.AsEnumerable()
                                                                where Convert.ToString(loRowTiquets["moneda"]) == Convert.ToString(lcMoneda)
                                                                select loRowTiquets).ToList();

                         foreach (DataRow row in loRowsFamilia)
                         {
                             _oDtArqueo.Rows.Add(_addRow(row, Navegacion.Familias));
                             iTotalDesgloseFamilia += Convert.ToDecimal(row["importediv"]);
                             llShowTotal = true;
                         }

                         if (llShowTotal)
                         {
                             _oDtArqueo.Rows.Add(_addRow(new Object[] { "", String.Format("Total ({0}) . . .", lcNombreMoneda), String.Format(lcCadenaFormat, iTotalDesgloseFamilia), 2, Navegacion.No }));
                             _AddBlank();
                         }
                     }
                }
            }

            //gridCierreCaja.AutoGenerateColumns = false;
            //gridCierreCaja.DataSource = dtArqueo;

            this._Addons_MontaArqueo(TipoExecute.After);

            return _oDtArqueo;
        }


        public virtual decimal _Afegir_Total_Tecleado_Diferencia(ref DataTable tdtTable, string tcCadenaFormat)
        {
            tdtTable.Rows.Add(_addRow(new Object[] { "", "Tecleado", String.Format(tcCadenaFormat, this._ImporteTecleado), 2, Navegacion.No }));
            tdtTable.Rows.Add(_addRow(new Object[] { "", "Diferencia", String.Format(tcCadenaFormat, this._ImporteTecleado - this._ImporteEfectivoArqueo), 2, Navegacion.No }));    //PE-90300

            return this._ImporteTecleado;
        }


        public virtual bool _DesArquear()
        {
            bool llRetorno = false;
            DataTable ldt_Cursor = new DataTable();
            DataTable ldt_CurMax = new DataTable();
            //string lcAuxi1 = "", lcAuxi2 = "", lcAuxi3 = "", lcAuxi4 = "";
            //int lnAuxi1 = 0, lnAuxi2 = 0, lnLinea = 0;
            //DateTime ldAuxi1;
            string lcOperarioTpv = Convert.ToString(EW_GLOBAL._GetVariable("wc_operariotpv"));

            this._Error = false;
            this._Mensaje_Error = "";

            this._Addons_DesArquear(TipoExecute.Before);

            // 90188
            //if (!this._lArqueoCargado)
            //{
            //    this._MessageBox("No se puede desarquear un arqueo sin haber carga anter un arqueo ya existente.");
            //    return false;
            //}
            // fi 90188

            // Comproobar que estamos en un arqueo con número, es decir, cerrado con anterioridad ...
            if (this._nNumero == 0)
            {
                this._MessageBox("No se puede desarquear un arqueo sin haber asignado número al arqueo. Debe estar situado en un arqueo ya cerrado con anterioridad.");
                return false;
            }

            // Comprobar que el usuario tenga permisos para desarquear ...
            if (this._lcUsuario != "SUPERVISOR")
            {
                if (!string.IsNullOrWhiteSpace(lcOperarioTpv))
                {
                    if (!Convert.ToBoolean(DB.SQLValor("opc_user", "opctpv='08' and operario", lcOperarioTpv, "valor", "comunes")))
                    {
                        this._MessageBox("El operario de TPV '" + lcOperarioTpv + "' no tiene permisos para desarquear.","",MessageBoxButtons.OK,MessageBoxIcon.Exclamation);
                        return false;
                    }
                }
            }

            _UpdateOffLine(2); //CCR128982

            // Desmarcar registros de TPV!C_ALBVEN
            llRetorno = DB.SQLExec("update " + DB.SQLDatabase("tpv", "c_albven") + " " +
                                   "set usuario = " + DB.SQLString(this._lcUsuarioTablas) + ", " +
                                   "arqueo=0 " +
                                   "where arqueo=" + DB.SQLString(this._nNumero) + " " +
                                   "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                   "and empresa=" + DB.SQLString(this._lcEmpresaActiva));
            if (!llRetorno)
            {
                this._MessageBox("(_Desarquear) Error al poner a 0 el campo ARQUEO de tpv!c_albven.");
                return false;
            }

            // Desmarcar registros de TPV!TIKETS                    
            llRetorno = DB.SQLExec("update " + DB.SQLDatabase("tpv", "tikets") + " " +
                                    "set usuario = " + DB.SQLString(this._lcUsuarioTablas) + ", " +
                                    "arqueo=0 " +
                                    "where arqueo=" + DB.SQLString(this._nNumero) + " " +
                                    "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and empresa=" + DB.SQLString(this._lcEmpresaActiva));
            if (!llRetorno)
            {
                this._MessageBox("(_Desarquear) Error al poner a 0 el campo ARQUEO de tpv!tikets.");
            }


            // Desmarcar registros de TPV!VALES
            llRetorno = DB.SQLExec("update " + DB.SQLDatabase("tpv", "vales") + " " +
                                    "set usuario = " + DB.SQLString(this._lcUsuarioTablas) + ", " +
                                    "arqueo=0 " +
                                    "where arqueo=" + DB.SQLString(this._nNumero) + " " +
                                    "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and empresa=" + DB.SQLString(this._lcEmpresaActiva));
            if (!llRetorno)
            {
                this._MessageBox("(_Desarquear) Error al poner a 0 el campo ARQUEO de tpv!vales.");
            }

            /*

            // Desmarcar registros de TPV!REPOSI, en este caso no es tan facil pues al dejar el campo ARQUEO a 0, podria petar el indice primario, por tal como está
            // construida la clave primaria de esta tabla (EMPRESA,CAJA,MONEDA,OPERARIO,LINEA,ARQUEO,FECHA)
            llRetorno = DB.SQLExec("select * from " + DB.SQLDatabase("tpv", "reposi") + " " +
                                    "where arqueo=" + DB.SQLString(this._nNumero) + " " +
                                    "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and empresa=" + DB.SQLString(this._lcEmpresaActiva), ref ldt_Cursor);
            if (!llRetorno)
            {
                this._MessageBox("(_Desarquear) Error al seleccionar las reposiciones a actualizar de tpv!reposi.");
            }


            // A todas las reposiciones correspondientes al arqueo hay que actualizar el campo LINEA antes de poner el campo ARQUEO a 0, para prevenir posibles petadas
            // del índice primario.
            foreach (DataRow r in ldt_Cursor.Rows)
            {
                lcAuxi1 = Convert.ToString(r["empresa"]);
                lcAuxi2 = Convert.ToString(r["caja"]);
                lcAuxi3 = Convert.ToString(r["moneda"]);
                lcAuxi4 = Convert.ToString(r["operario"]);
                lnAuxi1 = Convert.ToInt32(r["linea"]);
                lnAuxi2 = Convert.ToInt32(r["arqueo"]);
                ldAuxi1 = Convert.ToDateTime(r["fecha"]);

                lnLinea = lnAuxi1;

                ldt_CurMax.Reset();

                llRetorno = DB.SQLExec("select max(linea) as linea from " + DB.SQLDatabase("tpv", "reposi") + " " +
                                        "where empresa=" + DB.SQLString(lcAuxi1) + " " +
                                        "and caja=" + DB.SQLString(lcAuxi2) + " " +
                                        "and moneda=" + DB.SQLString(lcAuxi3) + " " +
                                        "and operario=" + DB.SQLString(lcAuxi4) + " " +
                                        "and fecha=" + DB.SQLString(ldAuxi1), ref ldt_CurMax);
                if (!llRetorno)
                {
                    this._MessageBox("(_Desarquear) Error al seleccionar la máxima linia en las reposiciones de tpv!reposi.");
                }

                lnLinea = ldt_CurMax.Rows.Count > 0 ? Convert.ToInt32(ldt_CurMax.Rows[0]["linea"]) + 1 : 1;

                // Actualizar el campo LINEA del registro de TPV!REPOSI
                llRetorno = DB.SQLExec("update " + DB.SQLDatabase("tpv", "reposi") + " " +
                                        "set usuario = " + DB.SQLString(this._lcUsuarioTablas) + ", " +
                                        "linea=" + DB.SQLString(lnLinea) + " " +
                                        "where empresa=" + DB.SQLString(lcAuxi1) + " " +
                                        "and caja=" + DB.SQLString(lcAuxi2) + " " +
                                        "and moneda=" + DB.SQLString(lcAuxi3) + " " +
                                        "and operario=" + DB.SQLString(lcAuxi4) + " " +
                                        "and fecha=" + DB.SQLString(ldAuxi1) + " " +
                                        "and linea=" + DB.SQLString(lnAuxi1) + " " +
                                        "and arqueo=" + DB.SQLString(lnAuxi2));
                if (!llRetorno)
                {
                    this._MessageBox("(_Desarquear) Error al actualizar el campo LINIA de las reposiciones de tpv!reposi.");
                }
            }
            */

            // Ahora sí, ya podemos poner el campo ARQUEO a 0 en TPV!REPOSI que seguro que ya no petará el índice.
            llRetorno = DB.SQLExec("update " + DB.SQLDatabase("tpv", "reposi") + " " +
                                    "set usuario = " + DB.SQLString(this._lcUsuarioTablas) + ", " +
                                    "arqueo=0 " +
                                    "where arqueo=" + DB.SQLString(this._nNumero) + " " +
                                    "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and empresa=" + DB.SQLString(this._lcEmpresaActiva));
            if (!llRetorno)
            {
                this._MessageBox("(_Desarquear) Error al poner a 0 el campo ARQUEO de tpv!reposi.");
            }

            // Continuamos con las siguientes tablas ...

            // Desmarcar registros de TPV!COB_PAGO
            llRetorno = DB.SQLExec("update " + DB.SQLDatabase("tpv", "cob_pago") + " " +
                                    "set usuario = " + DB.SQLString(this._lcUsuarioTablas) + ", " +
                                    "arqueo=0 " +
                                    "where arqueo=" + DB.SQLString(this._nNumero) + " " +
                                    "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and empresa=" + DB.SQLString(this._lcEmpresaActiva));
            if (!llRetorno)
            {
                this._MessageBox("(_Desarquear) Error al poner a 0 el campo ARQUEO de tpv!cob_pago.");
            }

            // Borrar registro de tpv!d_arqueo
            llRetorno = DB.SQLExec("delete from " + DB.SQLDatabase("tpv", "d_arqueo") + " " +
                                    "where empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                    "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and arqueo=" + DB.SQLString(this._nNumero));
            if (!llRetorno)
            {
                this._MessageBox("(_Desarquear) Error al borrar registros de tpv!d_arqueo.");
            }


            // Borrar registro de TPV!ARQUEOS
            llRetorno = DB.SQLExec("delete from " + DB.SQLDatabase("tpv", "arqueos") + " " +
                                    "where empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                    "and ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                    "and numero=" + DB.SQLString(this._nNumero));
            if (!llRetorno)
            {
                this._MessageBox("(_Desarquear) Error al borrar registro de tpv!arqueos.");
            }

            // Si no hubo ningún error intento retroceder el número ...
            if (this._Error == false)
                FUNCTIONS._RestaNumero(this._lcEmpresaActiva, this._nNumero, "arqueo", "conftick", "tpv");

            this._Addons_DesArquear(TipoExecute.After);

            return (this._Error == false);
        }


        public virtual void _Obtener_DataTable_Arqueo_Caja()
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            DataTable ldt_tmp_tic = new DataTable();
            DataTable ldt_tmp_rep = new DataTable();
            DataTable ldt_tmp_ret = new DataTable();
            bool llConsulta1_Ok = false;
            bool llConsulta2_Ok = false;
            bool llConsulta3_Ok = false;
            int lnDecimales_MonedaEmpresa = Convert.ToInt32(DB.SQLValor("moneda", "codigo", this._lcMoneda_Empresa, "DECIMALES"));
            decimal lnTotal = 0.0M;

            this._Addons_Obtener_DataTable_Arqueo_Caja(TipoExecute.Before);

            // Inicializar propiedad del objeto que guarda el importe del arqueo y el importe del total efectivo en caja ...
            this._nImporteArqueo = 0.0M;
            this._nImporteEfectivoArqueo = 0.0M;

            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;

            object[,] la_array_cursor = { { "fcobro", "string", 2, "Y" }, { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            this._dtArqueo_Caja = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and tikets.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and tikets.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and tikets.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and tikets.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("tikets", "tikets.arqueo=" + DB.SQLString(this._nNumero) + (this._nNumero == 0 ? " and tikets.fecha<=" + DB.SQLString(this._dFecha) + " and tikets.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            // Consulta de cobros en caja en efectivo ...
            llConsulta1_Ok = DB.SQLExec("select tikets.forma_cob as fcobro, tikets.moneda, " +
                                        "Sum(tikets.entrega-tikets.cambio_e) as importediv,  " +
                                        "max(" + DB.SQLNvl("fcobros.efectivo", "0") + ") as efectivo, " +
                                        DB.SQLNvl("Sum(Round(" + DB.SQLIif("moneda.cme=1", "(tikets.entrega-tikets.cambio_e)/tikets.cotizacion", "(tikets.entrega-tikets.cambio_e)*tikets.cotizacion") + "," + lnDecimales_MonedaEmpresa.ToString() + "))", 0) + "  as importe " +
                                        "from ((" + DB.SQLDatabase("tpv", "tikets") + " inner join " + DB.SQLDatabase("gestion", "moneda") + " on tikets.moneda=moneda.codigo) " +
                                        "left join " + DB.SQLDatabase("tpv", "f_cobros") + " fcobros on tikets.forma_cob = fcobros.codigo) " +
                                        "where tikets.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                        "and tikets.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                        lcCondicion +
                                        "group by tikets.forma_cob,tikets.moneda", ref ldt_tmp_tic);
            if (!llConsulta1_Ok)
            {
                this._MessageBox("(_Load) Error en consulta de cobros en efectivo en _Obtener_DataTable_Arqueo_Caja().");
            }

            // 87748
            lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and reposi.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and reposi.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and reposi.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and reposi.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("reposi", "reposi.arqueo=" + DB.SQLString(this._nNumero) + (this._nNumero == 0 ? " and reposi.fecha<=" + DB.SQLString(this._dFecha) + " and reposi.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            // Consulta de reposiciones ...
            llConsulta2_Ok = DB.SQLExec("select " + DB.SQLNvl("f_cobros.codigo", "space(2)") + " as fcobro, reposi.moneda, " +
                                        "max(" + DB.SQLNvl("f_cobros.efectivo", "0") + ") as efectivo, " +
                                        "Sum(reposi.reposicion) as importediv, " +
                                        DB.SQLNvl("Sum(" + DB.SQLIif("moneda.cme=1", "reposi.reposicion/reposi.cambio", "reposi.reposicion*reposi.cambio") + ")", 0) + " as importe " +
                                        "from ((" + DB.SQLDatabase("tpv", "reposi") + " inner join " + DB.SQLDatabase("gestion", "moneda") + " on reposi.moneda=moneda.codigo) " +
                                        "left join " + DB.SQLDatabase("tpv", "f_cobros") + " on f_cobros.moneda = reposi.moneda and f_cobros.efectivo=1) " +
                                        "where reposi.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                        "and reposi.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                        lcCondicion +
                                        "group by f_cobros.codigo, reposi.moneda", ref ldt_tmp_rep);
            if (!llConsulta2_Ok)
            {
                this._MessageBox("(_Load) Error en consulta de reposiciones en _Obtener_DataTable_Arqueo_Caja().");
            }

            // 87748
            lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and cob_pago.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and cob_pago.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and cob_pago.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and cob_pago.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("cob_pago", "cob_pago.arqueo=" + DB.SQLString(this._nNumero) + (this._nNumero == 0 ? " and cob_pago.fecha<=" + DB.SQLString(this._dFecha) + " and cob_pago.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            // Consulta de retiradas ...
            llConsulta3_Ok = DB.SQLExec("select " + DB.SQLNvl("f_cobros.codigo", "space(2)") + " as fcobro, cob_pago.moneda, " +
                                        "max(" + DB.SQLNvl("f_cobros.efectivo", "0") + ") as efectivo, " +
                                        "Sum(cob_pago.importediv)*-1 as importediv, " +
                                        "Sum(cob_pago.importe)*-1 as importe " +
                                        "from (" + DB.SQLDatabase("tpv", "cob_pago") + " " +
                                        "left join " + DB.SQLDatabase("tpv", "f_cobros") + " on f_cobros.moneda = cob_pago.moneda and f_cobros.efectivo=1 ) " +
                                        "where cob_pago.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                        "and cob_pago.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                        "and cob_pago.operacion='R' " +
                                        lcCondicion +
                                        "group by f_cobros.codigo,cob_pago.moneda", ref ldt_tmp_ret);
            if (!llConsulta3_Ok)
            {
                this._MessageBox("(_Load) Error en consulta de retiradas en _Obtener_DataTable_Arqueo_Caja().");
            }

            if (llConsulta1_Ok == true && llConsulta2_Ok == true && llConsulta3_Ok == true)
            {
                decimal lnEfectivoTickets = ldt_tmp_tic.AsEnumerable().Where(lin => lin["importe"] != null && Convert.ToInt32(lin["efectivo"]) == 1 && Convert.ToString(lin["moneda"]) == EW_GLOBAL._Empresa._Moneda).Sum(lin => Convert.ToDecimal(lin["importe"]));
                decimal lnEfectivoReposiciones = ldt_tmp_rep.AsEnumerable().Where(lin => lin["importe"] != null && Convert.ToString(lin["moneda"]) == EW_GLOBAL._Empresa._Moneda).Sum(lin => Convert.ToDecimal(lin["importe"]));

                // Este importe ya viene en negativo al ser una retirada ...
                decimal lnEfectivoRetiros = ldt_tmp_ret.AsEnumerable().Where(lin => lin["importe"] != null && Convert.ToString(lin["moneda"]) == EW_GLOBAL._Empresa._Moneda).Sum(lin => Convert.ToDecimal(lin["importe"]));

                // Total import en efectivo en caja ...
                decimal lnImporteEfectivo = lnEfectivoTickets + lnEfectivoReposiciones + lnEfectivoRetiros;

                this._nImporteEfectivoArqueo = lnImporteEfectivo;

                // Primero haremos el FULLJOIN de tmp_tic i tmp_rep, el resultado del  mismo lo guardaremos en el DataTable temporal ldt_PrimerFullJoin
                DataTable ldt_PrimerFullJoin = ldt_tmp_tic.Clone();

                // Creamos también el DataTable que guardaremos el resultado del FULL JOIN total ...
                DataTable ldt_ResFullJoin = ldt_tmp_tic.Clone();

                try
                {

                    // Para hacer un FULL JOIN de dos tablas comn LINK, primero haremos el LEFT JOIN de la primera con la segunda, y luego para simular el RIGHT JOIN de la segunda con la primera
                    // haremos otro LEFT JOIN invirtiendo el orden de las dos tablas, la que estaba a la izquierda pasa a la derecha y la que estaba a la derecha pasa a la izquierda. 
                    // Una vez tenemos los dos resultados los unimos con un UNION y tenemos el resultado del FULL JOIN de las dos primeras tablas.
                    var loPrimerFullJoinLeft = from tic in ldt_tmp_tic.AsEnumerable()
                                               join rep in ldt_tmp_rep.AsEnumerable()
                                               on new { a = tic.Field<string>("fcobro"), b = tic.Field<string>("moneda") } equals
                                               new { a = rep.Field<string>("fcobro"), b = rep.Field<string>("moneda") } into temp
                                               from itemright in temp.DefaultIfEmpty()
                                               select new
                                               {
                                                   fcobro = tic.Field<string>("fcobro"),
                                                   moneda = tic.Field<string>("moneda"),
                                                   importediv = tic.Field<decimal>("importediv") + (itemright == null ? 0.0M : itemright.Field<decimal>("importediv")),
                                                   importe = tic.Field<decimal>("importe") + (itemright == null ? 0.0M : itemright.Field<decimal>("importe"))
                                               };

                    // Este segundo JOIN es identico al primero excepto que hemos "girado" el orden de las tablas, la de la izquierda pasa a la derecha y la de la derecha pasa a la izquierda ...
                    var loPrimerFullJoinRight = from rep in ldt_tmp_rep.AsEnumerable()
                                                join tic in ldt_tmp_tic.AsEnumerable()
                                                on new { a = rep.Field<string>("fcobro"), b = rep.Field<string>("moneda") } equals
                                                new { a = tic.Field<string>("fcobro"), b = tic.Field<string>("moneda") } into temp
                                                from itemright in temp.DefaultIfEmpty()
                                                select new
                                                {
                                                    fcobro = rep.Field<string>("fcobro"),
                                                    moneda = rep.Field<string>("moneda"),
                                                    importediv = rep.Field<decimal>("importediv") + (itemright == null ? 0.0M : itemright.Field<decimal>("importediv")),
                                                    importe = rep.Field<decimal>("importe") + (itemright == null ? 0.0M : itemright.Field<decimal>("importe"))
                                                };

                    // Aqui unimos los resultados de las dos consultas anteriores y tenemos ya el resultado del primer FULL JOIN, recordar que el Union() de Linq excluye del resultado
                    // los registros duplicados.
                    var loPrimerFullJoin = loPrimerFullJoinLeft.Union(loPrimerFullJoinRight);

                    // Guardamos los resultados de este primer FULL JOIN en el DataTable ldt_PrimerFullJoin. 
                    foreach (var r in loPrimerFullJoin)
                    {
                        row = ldt_PrimerFullJoin.NewRow();
                        row["fcobro"] = r.fcobro;
                        row["moneda"] = r.moneda;
                        row["importediv"] = r.importe;
                        row["importe"] = r.importediv;
                        ldt_PrimerFullJoin.Rows.Add(row);
                    }
                }
                catch (Exception oE)
                {
                    this._MessageBox("(_Load) Error en primer FULL JOIN en _Obtener_DataTable_Arqueo_Caja().\n\n" + oE.Message);
                }

                // Hasta aqui tenemos hecho el primer FULL JOIN de las dos primeras tablas tmp_tic i tmp_rep, y tenemos us resultado en el DataTable ldt_PrimerFullJoin, haremos
                // el FULL JOIN de este datatable con el tmp_ret

                // LEFT JOIN entre los DataTable ldt_PrimerFullJoin y ldt_tmp_ret
                try
                {
                    var loSegundoFullJoinLeft = from ticrep in ldt_PrimerFullJoin.AsEnumerable()
                                                join ret in ldt_tmp_ret.AsEnumerable()
                                                on new { a = ticrep.Field<string>("fcobro"), b = ticrep.Field<string>("moneda") } equals
                                                new { a = ret.Field<string>("fcobro"), b = ret.Field<string>("moneda") } into temp
                                                from itemright in temp.DefaultIfEmpty()
                                                select new
                                                {
                                                    fcobro = ticrep.Field<string>("fcobro"),
                                                    moneda = ticrep.Field<string>("moneda"),
                                                    importediv = ticrep.Field<decimal>("importediv") + (itemright == null ? 0.0M : itemright.Field<decimal>("importediv")),
                                                    importe = ticrep.Field<decimal>("importe") + (itemright == null ? 0.0M : itemright.Field<decimal>("importe"))
                                                };

                    // RIGHT JOIN entre los DataTable ldt_PrimerFullJoin y ldt_tmp_ret, para ellos hacemos un LEFT JOIN entre ldt_tmp_ret y ldt_PrimerFullJoin ...
                    var loSegundoFullJoinRight = from ret in ldt_tmp_ret.AsEnumerable()
                                                 join ticrep in ldt_PrimerFullJoin.AsEnumerable()
                                                 on new { a = ret.Field<string>("fcobro"), b = ret.Field<string>("moneda") } equals
                                                 new { a = ticrep.Field<string>("fcobro"), b = ticrep.Field<string>("moneda") } into temp
                                                 from itemright in temp.DefaultIfEmpty()
                                                 select new
                                                 {
                                                     fcobro = ret.Field<string>("fcobro"),
                                                     moneda = ret.Field<string>("moneda"),
                                                     importediv = ret.Field<decimal>("importediv") + (itemright == null ? 0.0M : itemright.Field<decimal>("importediv")),
                                                     importe = ret.Field<decimal>("importe") + (itemright == null ? 0.0M : itemright.Field<decimal>("importe"))
                                                 };

                    // Unimos los resultados de las dos consultas anteriores, recordar que el Union() de Linq excluye del resultado
                    // los registros duplicados
                    var loSegundoFullJoin = loSegundoFullJoinLeft.Union(loSegundoFullJoinRight);

                    // Añadir registros de la consulta al DataTable ldt_ResFullJoin donde guardamos el resultado del FULL JOIN de los tres DataTables que teniamos originalmente ...
                    foreach (var r in loSegundoFullJoin)
                    {
                        row = ldt_ResFullJoin.NewRow();
                        row["fcobro"] = r.fcobro;
                        row["moneda"] = r.moneda;
                        row["importediv"] = r.importe;
                        row["importe"] = r.importediv;
                        ldt_ResFullJoin.Rows.Add(row);
                    }
                }
                catch (Exception oE)
                {
                    this._MessageBox("(_Load) Error en segundo FULL JOIN en _Obtener_DataTable_Arqueo_Caja().\n\n" + oE.Message);
                }

                try
                {

                    if (ldt_ResFullJoin.Rows.Count > 0)
                    {
                        foreach (DataRow r in ldt_ResFullJoin.Rows)
                        {                            
                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda))
                                lcMoneda = this._lcMoneda_Empresa;

                            //PE-77346 
                            //loDicMoneda = DB.SQLREGValor("moneda", "codigo", lcMoneda);
                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            row = this._dtArqueo_Caja.NewRow();

                            row["descripcion"] = Convert.ToString(DB.SQLValor("f_cobros", "codigo", Convert.ToString(r["fcobro"]), "nombre", "tpv"));

                            row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);

                            row["moneda"] = lcMoneda;

                            //PE-77346 
                            //row["importe"] = Divisa._DivExacto(Divisa._Ultima_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);
                            row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                            row["fcobro"] = Convert.ToString(r["fcobro"]);
                            this._dtArqueo_Caja.Rows.Add(row);
                            lnTotal = lnTotal + Convert.ToDecimal(r["importe"]);                         
                        }
                    }


                    // Consulta de valoes si no la hemos hecho antes ...
                    if (this._dtOperCaja_Vales_Efectuados.Rows.Count == 0)
                    {
                        String lcMsgError = "";
                        decimal lnTotalVales = 0.0M;
                        this._dtOperCaja_Vales_Efectuados = this._Obtener_DataTable_OperCaja_Vales_Efectuados(ref lnTotalVales, ref lcMsgError);
                        this._MessageBox(lcMsgError);
                    }


                    // Vales efectuados ...
                    foreach (DataRow r in this._dtOperCaja_Vales_Efectuados.Rows)
                    {
                        if (Convert.ToDecimal(r["importe"]) != 0)
                        {
                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda)) lcMoneda = this._lcMoneda_Empresa;
                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            row = this._dtArqueo_Caja.NewRow();
                            row["descripcion"] = "Vales efectuados";
                            row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);
                            row["moneda"] = lcMoneda;

                            //PE-77346 
                            //row["importe"] = Divisa._DivExacto(Divisa._Ultima_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);
                            row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);
                            row["fcobro"] = "__";

                            this._dtArqueo_Caja.Rows.Add(row);
                            lnTotal = lnTotal + Convert.ToDecimal(r["importe"]);
                        }
                    }

                    // Actualizar el campo ImporteArqueo del objeto arqueo ...
                    this._nImporteArqueo = lnTotal;
                }
                catch (Exception oE)
                {
                    this._MessageBox("(_Load) Error en procesos finales en _Obtener_DataTable_Arqueo_Caja().\n\n" + oE.Message);
                }
            }

            this._Addons_Obtener_DataTable_Arqueo_Caja(TipoExecute.After);

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif
        }


        public void _Print(TiposDeArqueos teTipoDeArqueo, string tcFileXMLDatos, string tcCaption = "")
        {
            ArqueoTpv loArqueo = new ArqueoTpv();
            String lcArqueos = "";
            String lcArqueosFecha = "";
            Dictionary<string, object> loDicRegArqueo;
            DateTime ldFechaArqueo = new DateTime();

            this._Addons_Print(TipoExecute.Before, teTipoDeArqueo, tcFileXMLDatos, tcCaption);

            // PE-90528 - Pasar los números y fechas de los arqueos
            foreach (KeyValuePair<string, string> itemNum in this._Numeros)
            {

                // Esto lo hacemos para evitar tener que hacer el loArqueo._Numero = Convert.ToInt32(itemNum.Value); que habia hasta ahora, 
                // lo que hacia que para obtener solo la fecha del arqueo (poco más abajo), cargase todo el arqueo por lo que tardaba muchisimo.
                loDicRegArqueo = loArqueo._Obtener_DatosGen_Arqueo_Cerrado(this._lcEjercicioActivo, this._lcEmpresaActiva, Convert.ToInt32(itemNum.Value));
                
                ldFechaArqueo = Convert.ToDateTime(loDicRegArqueo["fecha"]);

                lcArqueos += itemNum.Value + "|";
                lcArqueosFecha += ldFechaArqueo.ToString("d") + "|";
            }


            if (this._Numeros.Count == 0 && this._Numero > 0)
            {
                lcArqueos += this._Numero + "|";
                lcArqueosFecha += this._Fecha.ToString("d") + "|";
            }

            //PE-91451
            string lcFileXmlIvas = _Obtener_XML_desglose_iva();


            //PE-93563 Convertim la data a cadena
            string lcFecha_Final = _dFecha_Final.ToString("dd/MM/yyyy");

            // PE-94823 - Pasar la selección de dispositivo a un método
            int lnDispositivo = this._Seleccionar_Dispositivo("¿ Desea imprimir por impresora o por ticket ?", tcCaption);

            if (lnDispositivo < 0)
                return;

            // Preparem els paràmtres per a imprimir l'arqueo
            object[] loParameImp = new object[15] 
            {
                _Numero,                            // Número de arqueo
                _Caja,                              // Caja
                Convert.ToInt16(teTipoDeArqueo),    // Tipo de arqueo 1 = Consula. 2 = Definitivo.
                "000",                              // Moneda
                1,                                  // Todas las monedas
                lcFecha_Final,                      // Fecha final del arqueo
                _ImporteRepEnCaja,                  // Reposición en caja
                _ImporteRetirado,                   // Importe retirado
                _ImporteTecleado,                   // Importe tecleado
                tcFileXMLDatos,                     // Nombre del fichero XML con los datos del arqueo
                lcArqueos,                          // Listado con los números de arqueo
                lcArqueosFecha,                     // Listado con las fechas de los arqueos
                tcCaption,                          // Caption de la opción
                lcFileXmlIvas,                      // Nombre del fichero XML con los datos de iva
                lnDispositivo                       // Impresion por impresora (1) o por tickets (2)
            };

            NETVFP._Ejecutar_Funcion_VFP("Imprimir_Arqueo_Net", loParameImp);

            this._Addons_Print(TipoExecute.After, teTipoDeArqueo, tcFileXMLDatos, tcCaption);

            return;
        }


        public void _Print_Consolida(string tcFileXMLDatos, string tcCaption, string tcCajaIni, string tcCajaFin, DateTime dFechaIni, DateTime dFechaFin, Boolean tlTodasCajas = false)
        {
            //PE-91451
            string lcFileXmlIvas = _Obtener_XML_desglose_iva();

            //PE-93563 Convertim la data a cadena
            string lcFechaIni = dFechaIni.ToString("dd/MM/yyyy");
            string lcFechaFin = dFechaFin.ToString("dd/MM/yyyy");

            // PE-94823 - Pasar la selección de dispositivo a un método
            int lnDispositivo = this._Seleccionar_Dispositivo("¿ Desea imprimir por impresora o por ticket ?", tcCaption);

            this._Addons_Print_Consolida(TipoExecute.Before, tcFileXMLDatos, tcCaption, tcCajaIni, tcCajaFin, dFechaIni, dFechaFin, tlTodasCajas);

            if (lnDispositivo < 0)
                return;

            // Preparem els paràmtres per a imprimir l'arqueo
            object[] loParameImp = new object[9] 
                {
                    tcFileXMLDatos,                     // Nombre del fichero XML con los datos del arqueo
                    tcCaption,                          // Caption de la opción
                    tcCajaIni,                          // Caja inicial
                    tcCajaFin,                          // Caja final
                    lcFechaIni,                         // Fecha inicial
                    lcFechaFin,                         // Fecha final
                    tlTodasCajas,                       // Todas las cajas
                    lcFileXmlIvas,                      // Nombre del fichero XML con los datos de iva
                    lnDispositivo                       // Impresion por impresora (1) o por tickets (2)

                };
            NETVFP._Ejecutar_Funcion_VFP("Imprimir_Consolida_Net", loParameImp);

            this._Addons_Print_Consolida(TipoExecute.After, tcFileXMLDatos, tcCaption, tcCajaIni, tcCajaFin, dFechaIni, dFechaFin, tlTodasCajas);

            return;
        }


        public void _MessageBox(string tcMensaje, string tcTitulo = "", MessageBoxButtons toButtons = MessageBoxButtons.OK, MessageBoxIcon toIcon = MessageBoxIcon.Error, MessageBoxDefaultButton toDefaultButton = MessageBoxDefaultButton.Button1)
        {
            if (string.IsNullOrEmpty(tcMensaje)) 
                return;
            
            this._Error = true;

            if (string.IsNullOrWhiteSpace(tcTitulo))
                tcTitulo = this._TituloMantenimiento;

            if (this._oLinkForm == null)
                this._Mensaje_Error = tcMensaje;
            else
                if (this._lMostrarMensajes == true)
                    this._oLinkForm._MessageBox(tcMensaje, toButtons, toIcon, toDefaultButton, DialogResult.OK);
            
        }


        public string _CreateFileTemporalXML(string tcFileName, DataTable ldTable)
        {
            string lcFileNameIva = tcFileName;

            // Obtener la ruta de inicio
            string lcDir = EW_GLOBAL._GetVariable("wc_PathInicio").ToString();

            // Si la ruta está vacía cogemos la carpeta temp
            if (String.IsNullOrEmpty(lcDir))
            {
                lcDir = System.IO.Path.GetTempPath();
                lcFileNameIva = lcDir + lcFileNameIva;
            }
            else
                lcDir = Path.Combine(lcDir + "\\temp\\");

            // Volcar el datatable en el fichero XML
            ldTable.WriteXml(lcDir + tcFileName, XmlWriteMode.IgnoreSchema);

            // Devolver el fichero
            return lcFileNameIva;
        }


        public ewDocIva getDocIva(String lcEmpresa, String lcNumero, String lcLetra)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif
            String tcClave;
            ewDocIva DocIva;

            using (ewDocVentaTPV loEwDocVentaTpv = new ewDocVentaTPV())
            {
                loEwDocVentaTpv._Load(lcEmpresa, lcNumero, lcLetra);

                //loEwDocVentaTpv = getDocVenta(lcEmpresa, lcNumero, lcLetra);
                tcClave = String.Format("{0}_{1}_{2}", lcEmpresa, lcNumero, lcLetra);

                if (this._nDocsIva.ContainsKey(tcClave))
                {
                    DocIva = this._nDocsIva[tcClave];
                }
                else
                {
                    DocIva = new ewDocIva();
                    DocIva.ldt_TablaIva = loEwDocVentaTpv._Calcular_Iva(ref DocIva.lnTotalSinIva, ref DocIva.lnTotalConIva, ref DocIva.lnTotalPronto, ref DocIva.lnTotalRecFinan, ref DocIva.lnRetencionDoc, ref DocIva.lnTotalPuntoVerde, ref DocIva.leTipoRetFiscNoFisc, ref DocIva.lnRetencionDocPorcen, false);
                    this._nDocsIva.Add(tcClave, DocIva);
                }

                //T115439
                if (!_lAvisoIva) _lAvisoIva = loEwDocVentaTpv._Cabecera._Divisa != EW_GLOBAL._Empresa._Moneda;
            }
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif
            return DocIva;
        }


        public virtual void _Show()
        {
            frmArqueo loForm = new frmArqueo();

            loForm._LoadArqueoOnLoad = false;
            loForm._Listados = false;
            loForm._Arqueo = this;

            // Si tenemos números de arqueos y cajas, definir la propiedad en modo consulta
            this._Estado_Consulta = this._Numeros.Count > 0 && this._Cajas.Count > 0;

            loForm._ShowDialog();  //Bug 114218 Cambiar .ShowDialog() por ._ShowDialog() 
        }


        public virtual void _Navegar_Tickets(String tcDivisa = "")
        {
            //this._detalle_arqueo("l_cajas", 1);
            this._detalle_arqueo("Tickets", string.Empty, "L_CAJAS", tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Albaranes(String tcDivisa = "")
        {
            // this._detalle_arqueo("l_cajas", 2);
            this._detalle_arqueo("Albaranes", string.Empty, "L_CAJAS", tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Facturas(String tcDivisa = "")
        {
            //this._detalle_arqueo("l_cajas", 3);
            this._detalle_arqueo("Facturas", string.Empty, "L_CAJAS", tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Reposiciones(String tcDivisa = "")
        {
            //this._detalle_arqueo("l_reposi");
            this._detalle_arqueo("Reposiciones", string.Empty, "L_REPOSI", tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Cobros_Tickets(String tcDivisa = "")
        {
            //this._detalle_arqueo("l_opcaja");
            this._detalle_arqueo("Cobros Tickets", string.Empty, "L_OPCAJA", 1, tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Vales_Efectuados()
        {
            //this._detalle_arqueo("l_opcaja", 9);
            this._detalle_arqueo("Vales efectuad.", string.Empty, "L_OPCAJA", 9);
        }


        public virtual void _Navegar_Entregas_Cuenta_Albaranes(String tcDivisa = "")
        {
            //this._detalle_arqueo("l_opcaja", 2);
            this._detalle_arqueo("Entregas a cta.", string.Empty, "L_OPCAJA", 2, tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Entregas_Cuenta_Pedidos(String tcDivisa = "")
        {
            //this._detalle_arqueo("l_opcaja", 10);
            this._detalle_arqueo("Entregas a cta. Pedidos", string.Empty, "L_OPCAJA", 10, tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Cobros_Facturas(String tcDivisa = "")
        {
            //this._detalle_arqueo("l_opcaja", 4);
            this._detalle_arqueo("Cobros Facturas", string.Empty, "L_OPCAJA", 4, tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Cobros_Varios()
        {
            //this._detalle_arqueo("l_opcaja", 3);
            this._detalle_arqueo("Cobros Varios", string.Empty, "L_OPCAJA", 3);
        }


        public virtual void _Navegar_Pagos_Facturas(String tcDivisa = "")
        {
            //this._detalle_arqueo("l_opcaja", 10);
            this._detalle_arqueo("Pagos Facturas", string.Empty, "L_OPCAJA", 6, tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Pagos_Varios()
        {
            //this._detalle_arqueo("l_opcaja", 5);
            this._detalle_arqueo("Pagos Varios", string.Empty, "L_OPCAJA", 5);
        }


        public virtual void _Navegar_Retiros(String tcDivisa = "")
        {
            //this._detalle_arqueo("l_retiros");
            this._detalle_arqueo("Retiros", string.Empty, "L_RETIROS", tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Ventas_Familias(string tcDescripcion, String tcDivisa = "")
        {
            //this._detalle_arqueo("ven_ca");
            this._detalle_arqueo("Ventas Familia", tcDescripcion, "VEN_CA", tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Operaciones_Caja(string tcDescripcion, String tcDivisa = "")
        {
            this._detalle_arqueo("Caja", tcDescripcion, "L_OPCAJA", 0, tcDivisa: tcDivisa);
        }


        public virtual void _Navegar_Creditos()
        {
            this._detalle_arqueo("Credit", string.Empty, "CREDIT_TPV");
        }


        public virtual void _Navegar_Abonos()
        {
            this._detalle_arqueo("Abonos", string.Empty, "L_ABONOS");
        }


        public string _ObtenerCaja(String tcCampo = "", String tcEmpresa = "")
        {
            DataTable ldt_Cursor = new DataTable();
            String lcRetorno = "";
            tcCampo = String.IsNullOrEmpty(tcCampo) ? "caja" : tcCampo;
            tcEmpresa = String.IsNullOrEmpty(tcEmpresa) ? this._lcEmpresaActiva : tcEmpresa;

            String lcSql = "select " + tcCampo + " as codigo from " + DB.SQLDatabase("tpv", "caj_fcob") + " where empresa=" + DB.SQLString(tcEmpresa);
            bool llRetorno = DB.SQLExec(lcSql, ref ldt_Cursor);
            if (llRetorno)
                lcRetorno = Convert.ToString(ldt_Cursor.Rows[0]["codigo"]);

            return lcRetorno;
        }


        #endregion METODOS PUBLICOS


        #region MÉTODOS PROTECTED


        protected virtual int _Obtener_Numero_Tiquets(ref string tnNumTicIni, ref string tnNumTicFin, ref string tcMsgError, ref string tnLetraTicIni, ref string tnLetraTicFin)
        {
            int lnNumTic = 0;
            DataTable ldt_Cursor = new DataTable();
            bool llConsulta_Ok = false;

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and t.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and t.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and g.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and g.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("t", "t.arqueo = " + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? "and t.aparcado=0 and g.fecha<=" + DB.SQLString(this._dFecha) + " and t.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and t.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            if (string.IsNullOrWhiteSpace(_CajaDesde) && string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and t.caja !='' ";

            llConsulta_Ok = DB.SQLExec("select t.empresa,t.letra, t.numero " +
                                       "from ((" + DB.SQLDatabase("gestion", "c_albven") + " g inner join " + DB.SQLDatabase("tpv", "c_albven") + " t " +
                                       "on g.empresa=t.empresa and g.numero=t.numero and g.letra=t.letra " + lcEjercicio + ") " + // 104028
                                       " inner join " + DB.SQLDatabase("gestion", "d_albven") + " d " +
                                       "on g.empresa=d.empresa and g.numero=d.numero and g.letra=d.letra) " +
                                       "where t.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcEjercicio + // 104028
                                       lcCondicion +    // 87748
                                       "and t.tipo_doc=1 " +
                                       "group by t.empresa, t.letra, t.numero " +
                                       "order by t.empresa, t.letra, t.numero ", ref ldt_Cursor);

            if (llConsulta_Ok == true)
            {
                lnNumTic = ldt_Cursor.Rows.Count;
                if (ldt_Cursor.Rows.Count > 0)
                {
                    tnNumTicIni = Convert.ToString(ldt_Cursor.Rows[0]["numero"]);
                    tnNumTicFin = Convert.ToString(ldt_Cursor.Rows[ldt_Cursor.Rows.Count - 1]["numero"]);

                    tnLetraTicIni = Convert.ToString(ldt_Cursor.Rows[0]["letra"]);
                    tnLetraTicFin = Convert.ToString(ldt_Cursor.Rows[ldt_Cursor.Rows.Count - 1]["letra"]);
                }
                else
                {
                    tnNumTicIni = new String(' ', 12);
                    tnNumTicFin = new String(' ', 12);
                    tnLetraTicIni = new String(' ', 2);
                    tnLetraTicFin = new String(' ', 2);
                }
            }
            else
            {
                lnNumTic = 0;
                tnNumTicIni = new String(' ', 12);
                tnNumTicFin = new String(' ', 12);
                tnLetraTicIni = new String(' ', 2);
                tnLetraTicFin = new String(' ', 2);

                tcMsgError = "(_Load) Error en consulta de _Obtener_Numero_Tiquets().";
            }

            return lnNumTic;
        }


        protected virtual void _Obtener_DataTables_Importe_Tiquets_Albaranes_Facturas(ref DateTime tdFechaIni, ref DateTime tdFechaFin, ref string tcMsgError)
        {
            DataTable ldt_tmp_AlbD = new DataTable();
            bool llConsulta_Ok = false;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            DataRow row;
            String tcDivisa, tcMoneda;
            tdFechaIni = DateTime.Today;
            tdFechaFin = DateTime.Today;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            this._nImporteTotalVentas = 0;

            this._dtVentas_Tiquets = DBfunctions._Crear_DtTable(la_array_cursor);
            this._dtVentas_Albaranes = DBfunctions._Crear_DtTable(la_array_cursor);
            this._dtVentas_Facturas = DBfunctions._Crear_DtTable(la_array_cursor);
            _dicMoneda = new Dictionary<string, string>();

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and t.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and t.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and g.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and g.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("t", "t.arqueo = " + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? "and t.aparcado=0 and g.fecha<=" + DB.SQLString(this._dFecha) + " and t.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and t.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            if (string.IsNullOrWhiteSpace(_CajaDesde) && string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and t.caja !='' ";

            //String tcSql = "select t.Tipo_Doc, g.Empresa, g.Numero, g.Letra, g.Divisa, g.cambio, g.pronto, g.iva_inc, cli.recargo, g.Fecha, " +
            //                           "d.impdiviva as importediv, d.importeiva as importe , g.Totaldoc, g.Totaldiv " +
            //                           "from " + DB.SQLDatabase("gestion", "c_albven") + " g inner join " + DB.SQLDatabase("tpv", "c_albven") + " t " +
            //                           "on g.Empresa=t.empresa and g.Numero=t.numero and g.Letra=t.Letra " + lcEjercicio + // 104028
            //                           "inner join " + DB.SQLDatabase("gestion", "d_albven") + " d ON g.Empresa=d.empresa and g.Numero=d.numero and g.letra=d.letra " +
            //                           "inner join " + DB.SQLDatabase("gestion", "clientes") + " cli on g.cliente=cli.codigo " +
            //                           "where t.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
            //                           lcCondicion + // 87748
            //                           lcEjercicio; // 104028

            String tcSql = "select t.Tipo_Doc, g.Empresa, g.Numero, g.Letra, g.Divisa, g.Totaldoc as importe, g.Totaldiv as importediv, g.Fecha " +
                                     "from " + DB.SQLDatabase("gestion", "c_albven") + " g inner join " + DB.SQLDatabase("tpv", "c_albven") + " t " +
                                     "on g.Empresa=t.empresa and g.Numero=t.numero and g.Letra=t.Letra " + lcEjercicio + // 104028
                                     "inner join " + DB.SQLDatabase("gestion", "clientes") + " cli on g.cliente=cli.codigo " +
                                     "where t.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                     lcCondicion + // 87748
                                     lcEjercicio; // 104028

            llConsulta_Ok = DB.SQLExec(tcSql, ref ldt_tmp_AlbD);

            if (llConsulta_Ok == true)
            {
                try
                {
                    tdFechaIni = ldt_tmp_AlbD.Rows.Count > 0 ? ldt_tmp_AlbD.AsEnumerable().Min(lin => Convert.ToDateTime(lin["fecha"])) : this._dFecha;
                    tdFechaFin = ldt_tmp_AlbD.Rows.Count > 0 ? ldt_tmp_AlbD.AsEnumerable().Max(lin => Convert.ToDateTime(lin["fecha"])) : this._dFecha;

                    if (ldt_tmp_AlbD.Rows.Count > 0)
                    {
                        DataTable ldt_TmpAlb = ldt_tmp_AlbD.Clone();

                        var lc_Consulta = from venta in ldt_tmp_AlbD.AsEnumerable()
                                          group venta by new
                                          {
                                              tipo_doc = venta["tipo_doc"],
                                              empresa = venta["empresa"],
                                              numero = venta["numero"],
                                              letra = venta["letra"],
                                              divisa = venta["divisa"],
                                              //cambio = venta["cambio"],
                                              //pronto = venta["pronto"],
                                              //iva_inc = venta["iva_inc"],
                                              //recargo = venta["recargo"],
                                              //fecha = venta["fecha"]
                                          } into g
                                          select new
                                          {
                                              tipo_doc = g.Key.tipo_doc,
                                              empresa = g.Key.empresa,
                                              numero = g.Key.numero,
                                              letra = g.Key.letra,
                                              divisa = g.Key.divisa,
                                              //cambio = g.Key.cambio,
                                              //pronto = g.Key.pronto,
                                              //iva_inc = g.Key.iva_inc,
                                              //recargo = g.Key.recargo,
                                              //fecha = g.Key.fecha,
                                              importediv = g.Sum(venta => venta.Field<decimal>("importediv")),
                                              importe = g.Sum(venta => venta.Field<decimal>("importe"))
                                          };

                        var la_registros = lc_Consulta.ToArray();

                        foreach (var r in la_registros)
                        {
                            row = ldt_TmpAlb.NewRow();
                            row["tipo_doc"] = r.tipo_doc;
                            row["empresa"] = r.empresa;
                            row["numero"] = r.numero;
                            row["letra"] = r.letra;
                            row["divisa"] = r.divisa;
                            //row["cambio"] = r.cambio;
                            //row["pronto"] = r.pronto;
                            //row["iva_inc"] = r.iva_inc;
                            //row["recargo"] = r.recargo;
                            //row["fecha"] = r.fecha;
                            row["importediv"] = r.importediv;
                            row["importe"] = r.importe;
                            ldt_TmpAlb.Rows.Add(row);
                        }

                        //this._Importe_Documento(ldt_TmpAlb, "Importe", "ImporteDiv");

                        var lc_Consulta2 = from venta in ldt_TmpAlb.AsEnumerable()
                                           group venta by new
                                           {
                                               tipo_doc = venta["tipo_doc"],
                                               divisa = venta["divisa"]
                                           } into g
                                           select new
                                           {
                                               tipo_doc = g.Key.tipo_doc,
                                               divisa = g.Key.divisa,
                                               importediv = g.Sum(venta => venta.Field<decimal>("importediv")),
                                               importe = g.Sum(venta => venta.Field<decimal>("importe"))
                                           };

                        var la_registros2 = lc_Consulta2.ToArray();


                        // Generar DataTable de ventas de tiquets con la siguiente información (moneda, definicion, importediv, importe)


                        foreach (var r in la_registros2)
                        {

                            if (Convert.ToDecimal(r.importe) != 0)
                            {
                                string lcMoneda = Convert.ToString(r.divisa);
                                if (string.IsNullOrWhiteSpace(lcMoneda)) lcMoneda = this._lcMoneda_Empresa;
                                //PE-77346, Llamaba varias veces dentro del mismo bucle a la funcion, asi que se guarda el valor, y se utiliza tantas veces como se necesite

                                loDicMoneda = _Moneda(lcMoneda);
                                lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                                tcDivisa = Convert.ToString(r.divisa);
                                tcMoneda = getSimboloMoneda(loDicMoneda);//Convert.ToString(loDicMoneda["moneda"]).Trim();
                                if (!_dicMoneda.ContainsKey(tcDivisa)) _dicMoneda.Add(tcDivisa, tcMoneda);

                                if (Convert.ToInt32(r.tipo_doc) == 1)
                                {
                                    row = this._dtVentas_Tiquets.NewRow();

                                    row["descripcion"] = String.Format("Importe factura simplificada ({0})", tcMoneda);
                                    row["importediv"] = FUNCTIONS._Round(r.importediv, lnDecimalesMascara);
                                    row["moneda"] = tcDivisa;
                                    row["importe"] = r.importe;
                                    this._dtVentas_Tiquets.Rows.Add(row);

                                    this._nImporteTotalVentas = this._nImporteTotalVentas + Convert.ToDecimal(row["importe"]);
                                }
                                else if (Convert.ToInt32(r.tipo_doc) == 2)
                                {
                                    row = this._dtVentas_Albaranes.NewRow();
                                    row["descripcion"] = String.Format("Importe albaranes ({0})", tcMoneda);
                                    row["importediv"] = FUNCTIONS._Round(r.importediv, lnDecimalesMascara);
                                    row["moneda"] = tcDivisa;
                                    row["importe"] = r.importe;
                                    this._dtVentas_Albaranes.Rows.Add(row);

                                    this._nImporteTotalVentas = this._nImporteTotalVentas + Convert.ToDecimal(row["importe"]);
                                }
                                else if (Convert.ToInt32(r.tipo_doc) == 3)
                                {
                                    row = this._dtVentas_Facturas.NewRow();

                                    row["descripcion"] = String.Format("Importe facturas ({0})", tcMoneda);
                                    row["importediv"] = FUNCTIONS._Round(r.importediv, lnDecimalesMascara);
                                    row["moneda"] = tcDivisa;
                                    row["importe"] = r.importe;
                                    this._dtVentas_Facturas.Rows.Add(row);

                                    this._nImporteTotalVentas = this._nImporteTotalVentas + Convert.ToDecimal(row["importe"]);
                                }
                            }

                        }
                    }
                }
                catch (Exception oE)
                {
                    tcMsgError = "(_Load) Error en procesos internos en _Obtener_DataTables_Importe_Tiquets_Albaranes_Facturas().\n\n" + oE.Message;
                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta de _Obtener_DataTables_Importe_Tiquets_Albaranes_Facturas().";
            }
        }


        protected virtual DataTable _Obtener_DataTable_OperCaja_Reposiciones(ref decimal lnTotalRepo, ref string tcMsgError)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            DataTable ldt_CurReposi = new DataTable();
            DataTable ldtReposiciones = new DataTable();
            bool llConsulta_Ok = false;
            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            decimal lnTotal = 0.0M;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            ldtReposiciones = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and rep.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and rep.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and rep.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and rep.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("rep", "rep.arqueo=" + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? "and rep.fecha<=" + DB.SQLString(this._dFecha) + " and rep.caja=" + DB.SQLString(this._lcCajaActiva) : "") + " ");
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and rep.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            llConsulta_Ok = DB.SQLExec("select sum(rep.reposicion) as importediv, rep.moneda, sum(rep.reposicion/rep.cambio) as importe " +
                                       "from " + DB.SQLDatabase("tpv", "reposi") + " rep " +
                                       "where rep.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcEjercicio + // 104028
                                       lcCondicion +
                                       "group by rep.moneda", ref ldt_CurReposi);
            if (llConsulta_Ok == true)
            {
                if (ldt_CurReposi.Rows.Count > 0)
                {
                    try
                    {
                        // Generar DataTable de reposiciones con la siguiente información (moneda, definicion, importediv, importe)
                        foreach (DataRow r in ldt_CurReposi.Rows)
                        {
                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda))
                                lcMoneda = this._lcMoneda_Empresa;
                            loDicMoneda = DB.SQLREGValor("moneda", "codigo", lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            if (Convert.ToDecimal(r["importe"]) != 0)
                            {
                                row = ldtReposiciones.NewRow();

                                //Bug 116469
                                //row["descripcion"] = "Reposiciones caja (" + Convert.ToString(loDicMoneda["moneda"]).Trim() + ")";
                                row["descripcion"] = "Reposiciones caja (" + getSimboloMoneda(loDicMoneda) + ")";

                                row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);

                                row["moneda"] = lcMoneda;

                                row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                                ldtReposiciones.Rows.Add(row);

                                lnTotal = lnTotal + Convert.ToDecimal(r["importe"]);

                            }
                        }
                    }
                    catch (Exception oE)
                    {
                        tcMsgError = "(_Load) Error en procesos internos _Obtener_DataTable_OperCaja_Reposiciones()..\n\n" + oE.Message;
                    }
                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta en _Obtener_DataTable_OperCaja_Reposiciones().";
            }
            lnTotalRepo = lnTotal;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return ldtReposiciones;
        }

        protected virtual DataTable _Obtener_DataTable_OperCaja_Vales_Efectuados(ref decimal tnTotalVales, ref string tcMsgError)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif


            DataTable ldt_CurVales = new DataTable();
            DataTable ltdVales = new DataTable();
            bool llConsulta_Ok = false;
            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            decimal lnTotal = 0.0M;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            ltdVales = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and vales.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and vales.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and vales.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and vales.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("vales", " vales.arqueo=" + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? "and vales.fecha<=" + DB.SQLString(this._dFecha) + " and vales.caja=" + DB.SQLString(this._lcCajaActiva) : " and vales.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)))) + " ";
            // FI 87748

            llConsulta_Ok = DB.SQLExec("select vales.empresa, sum(vales.importe) as importediv, sum(vales.importe) as importe " +
                                       "from " + DB.SQLDatabase("tpv", "vales") + " " +
                                       "where vales.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       "and vales.arqueo != -1 " +  // 95025
                                       lcCondicion +
                                       "group by vales.empresa", ref ldt_CurVales);

            if (llConsulta_Ok == true)
            {
                if (ldt_CurVales.Rows.Count > 0)
                {
                    try
                    {
                        // Generar DataTable de vales la siguiente información (moneda, definicion, importediv, importe), en los vales son siempre en la moneda de  la empresa ...
                        foreach (DataRow r in ldt_CurVales.Rows)
                        {
                            string lcMoneda = Convert.ToString(this._lcMoneda_Empresa);
                            //pe-77346
                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            if (Convert.ToDecimal(r["importe"]) != 0)
                            {
                                row = ltdVales.NewRow();

                                //Bug 116469
                                //row["descripcion"] = "Vales efectuados (" + Convert.ToString(loDicMoneda["moneda"]).Trim() + ")";
                                row["descripcion"] = "Vales efectuados (" + getSimboloMoneda(loDicMoneda) + ")";

                                row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]) * -1, lnDecimalesMascara);

                                row["moneda"] = lcMoneda;

                                row["importe"] = Divisa._DivExacto(Divisa._Ultima_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                                ltdVales.Rows.Add(row);

                                lnTotal = lnTotal + Convert.ToDecimal(row["importe"]);
                            }
                        }
                    }
                    catch (Exception oE)
                    {
                        tcMsgError = "(_Load) Error en procesos internos en _Obtener_DataTable_OperCaja_Vales_Efectuados().\n\n" + oE.Message;
                    }
                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta en _Obtener_DataTable_OperCaja_Vales_Efectuados().";
            }
            tnTotalVales = lnTotal;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return ltdVales;
        }


        protected virtual DataTable _Obtener_DataTable_OperCaja_Cobros_Tiquets(ref decimal tnTotalCobros, ref string tcMsgError)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif


            DataTable ldt_Tikets = new DataTable();
            DataTable ldtCobrosTiquets = new DataTable();
            bool llConsulta_Ok = false;
            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            decimal lnTotal = 0.0M;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            ldtCobrosTiquets = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and tikets.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and tikets.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and tikets.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and tikets.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("tikets", " tikets.arqueo = " + this._nNumero + (this._nNumero == 0 ? " and tikets.fecha<=" + DB.SQLString(this._dFecha) + " and tikets.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and tikets.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            llConsulta_Ok = DB.SQLExec("select Sum(tikets.entrega-tikets.cambio_e) as importediv, tikets.moneda, tikets.tipo, " +
                                       DB.SQLNvl("Sum((tikets.entrega-tikets.cambio_e)/tikets.cotizacion)", 0) + " as importe " +
                                       "from " + DB.SQLDatabase("tpv", "tikets") + " " +
                                       "where tikets.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcEjercicio + // 104028
                                       "and tikets.tipo=1 " +
                                       lcCondicion +
                                       "group by tikets.tipo,tikets.moneda", ref ldt_Tikets);
            if (llConsulta_Ok == true)
            {
                if (ldt_Tikets.Rows.Count > 0)
                {
                    try
                    {
                        // Generar DataTable de retiradas con la siguiente información (moneda, definicion, importediv, importe)
                        foreach (DataRow r in ldt_Tikets.Rows)
                        {
                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda))
                                lcMoneda = this._lcMoneda_Empresa;
                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));
                            
                            row = ldtCobrosTiquets.NewRow();

                            //Bug 116469
                            //row["descripcion"] = "Cobros Facturas Simplif. (" + Convert.ToString(loDicMoneda["moneda"]).Trim() + ")";
                            row["descripcion"] = "Cobros Facturas Simplif. (" + getSimboloMoneda(loDicMoneda) + ")";

                            row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);

                            row["moneda"] = lcMoneda;

                            row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                            ldtCobrosTiquets.Rows.Add(row);

                            lnTotal = lnTotal + Convert.ToDecimal(r["importe"]);                            
                        }
                    }
                    catch (Exception oE)
                    {
                        tcMsgError = "(_Load) Error en procesos internos en _Obtener_DataTable_OperCaja_Cobros_Tiquets().\n\n" + oE.Message;
                    }
                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta en _Obtener_DataTable_OperCaja_Cobros_Tiquets().";
            }
            tnTotalCobros = lnTotal;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return ldtCobrosTiquets;
        }


        protected virtual DataTable _Obtener_DataTable_OperCaja_Entregas_Cuenta_Albaranes(ref decimal tnTotalEntAlbaran, ref string tcMsgError)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            DataTable ldt_Entregas = new DataTable();
            DataTable ltdEntAlbaran = new DataTable();
            bool llConsulta_Ok = false;
            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            decimal lnTotal = 0.0M;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            ltdEntAlbaran = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and tikets.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and tikets.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and tikets.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and tikets.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("tikets", " tikets.arqueo=" + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? " and tikets.fecha<=" + DB.SQLString(this._dFecha) + " and tikets.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and tikets.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            llConsulta_Ok = DB.SQLExec("select Sum(tikets.entrega-tikets.cambio_e) as importediv, tikets.moneda, tikets.tipo, " +
                                       DB.SQLNvl("Sum((tikets.entrega-tikets.cambio_e)/tikets.cotizacion)", 0) + " as importe " +
                                       "from " + DB.SQLDatabase("tpv", "tikets") + " " +
                                       "where tikets.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcEjercicio + // 104028
                                       "and tikets.tipo=2 " +
                                       lcCondicion +
                                       "group by tikets.tipo,tikets.moneda", ref ldt_Entregas);
            if (llConsulta_Ok == true)
            {
                if (ldt_Entregas.Rows.Count > 0)
                {
                    try
                    {
                        // Generar DataTable de retiradas con la siguiente información (moneda, definicion, importediv, importe)
                        foreach (DataRow r in ldt_Entregas.Rows)
                        {

                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda))
                                lcMoneda = this._lcMoneda_Empresa;

                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            if (Convert.ToDecimal(r["importe"]) != 0)
                            {
                                row = ltdEntAlbaran.NewRow();

                                //Bug 116469
                                //row["descripcion"] = "Entregas a cuenta (" + Convert.ToString(loDicMoneda["moneda"]).Trim() + ")";
                                row["descripcion"] = "Entregas a cuenta (" + getSimboloMoneda(loDicMoneda) + ")";

                                row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);

                                row["moneda"] = lcMoneda;

                                row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                                ltdEntAlbaran.Rows.Add(row);

                                lnTotal = lnTotal + Convert.ToDecimal(r["importe"]);
                            }
                        }
                    }
                    catch (Exception oE)
                    {
                        tcMsgError = "(_Load) Error en procesos internos en _Obtener_DataTable_OperCaja_Entregas_Cuenta_Albaranes().\n\n" + oE.Message;
                    }

                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta en _Obtener_DataTable_OperCaja_Entregas_Cuenta_Albaranes().";
            }
            tnTotalEntAlbaran = lnTotal;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return ltdEntAlbaran;
        }


        protected virtual DataTable _Obtener_DataTable_OperCaja_Entregas_Cuenta_Pedidos(ref decimal tnTotalEntPedidos, ref string tcMsgError)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            DataTable ldt_Entregas = new DataTable();
            DataTable ltdEntPedidos = new DataTable();
            bool llConsulta_Ok = false;
            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            decimal lnTotal = 0.0M;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            ltdEntPedidos = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and tikets.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and tikets.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and tikets.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and tikets.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("tikets", " tikets.arqueo=" + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? " and tikets.fecha<=" + DB.SQLString(this._dFecha) + " and tikets.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and tikets.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            llConsulta_Ok = DB.SQLExec("select Sum(tikets.entrega-tikets.cambio_e) as importediv, tikets.moneda, tikets.tipo, " +
                                       DB.SQLNvl("Sum((tikets.entrega-tikets.cambio_e)/tikets.cotizacion)", 0) + " as importe " +
                                       "from " + DB.SQLDatabase("tpv", "tikets") + " " +
                                       "where tikets.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcEjercicio + // 104028
                                       "and tikets.tipo=10 " +
                                       lcCondicion +
                                       "group by tikets.tipo,tikets.moneda", ref ldt_Entregas);
            if (llConsulta_Ok == true)
            {
                if (ldt_Entregas.Rows.Count > 0)
                {
                    try
                    {
                        foreach (DataRow r in ldt_Entregas.Rows)
                        {
                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda))
                                lcMoneda = this._lcMoneda_Empresa;
                            //PE-77346
                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            if (Convert.ToDecimal(r["importe"]) != 0)
                            {
                                row = ltdEntPedidos.NewRow();

                                //Bug 116469
                                //row["descripcion"] = "Entregas a cuenta pedidos (" + Convert.ToString(loDicMoneda["moneda"]).Trim() + ")";
                                row["descripcion"] = "Entregas a cuenta pedidos (" + getSimboloMoneda(loDicMoneda) + ")";

                                row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);

                                row["moneda"] = lcMoneda;

                                row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                                ltdEntPedidos.Rows.Add(row);

                                lnTotal = lnTotal + Convert.ToDecimal(r["importe"]);
                            }
                        }
                    }
                    catch (Exception oE)
                    {
                        tcMsgError = "(_Load) Error en procesos internos en _Obtener_DataTable_OperCaja_Entregas_Cuenta_Pedidos().\n\n" + oE.Message;
                    }
                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta en _Obtener_DataTable_OperCaja_Entregas_Cuenta_Pedidos().";
            }
            tnTotalEntPedidos = lnTotal;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return ltdEntPedidos;
        }


        protected virtual DataTable _Obtener_DataTable_OperCaja_Pagos_Facturas(ref decimal tnTotalPagosFacturas, ref string tcMsgError)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            DataTable ldt_PagosFacturas = new DataTable();
            DataTable ltdPagosFacturas = new DataTable();
            bool llConsulta_Ok = false;
            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            decimal lnTotal = 0.0M;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            ltdPagosFacturas = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and tikets.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and tikets.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and tikets.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and tikets.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("tikets", "tikets.arqueo=" + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? " and tikets.fecha<=" + DB.SQLString(this._dFecha) + " and tikets.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and tikets.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            llConsulta_Ok = DB.SQLExec("select Sum(tikets.entrega-tikets.cambio_e) as importediv, tikets.moneda, tikets.tipo, " +
                                       DB.SQLNvl("Sum((tikets.entrega-tikets.cambio_e)/tikets.cotizacion)", 0) + " as importe " +
                                       "from " + DB.SQLDatabase("tpv", "tikets") + " " +
                                       "where tikets.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcEjercicio + // 104028
                                       "and tikets.tipo=6 " +
                                       lcCondicion +
                                       "group by tikets.tipo,tikets.moneda", ref ldt_PagosFacturas);
            if (llConsulta_Ok == true)
            {
                if (ldt_PagosFacturas.Rows.Count > 0)
                {
                    try
                    {
                        foreach (DataRow r in ldt_PagosFacturas.Rows)
                        {
                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda))
                                lcMoneda = this._lcMoneda_Empresa;
                            //PE-77346
                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            if (Convert.ToDecimal(r["importe"]) != 0)
                            {
                                row = ltdPagosFacturas.NewRow();

                                //Bug 116469
                                //row["descripcion"] = "Pagos facturas (" + Convert.ToString(loDicMoneda["moneda"]).Trim() + ")";
                                row["descripcion"] = "Pagos facturas (" + getSimboloMoneda(loDicMoneda) + ")";

                                row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);

                                row["moneda"] = lcMoneda;

                                row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                                ltdPagosFacturas.Rows.Add(row);

                                lnTotal = lnTotal + Convert.ToDecimal(r["importe"]);
                            }
                        }
                    }
                    catch (Exception oE)
                    {
                        tcMsgError = "(_Load) Error en procesos internos en _Obtener_DataTable_OperCaja_Pagos_Facturas().\n\n" + oE.Message;
                    }
                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta en _Obtener_DataTable_OperCaja_Pagos_Facturas().";
            }
            tnTotalPagosFacturas = lnTotal;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return ltdPagosFacturas;
        }


        protected virtual DataTable _Obtener_DataTable_OperCaja_Cobros_Facturas(ref decimal tnTotalCobrosFacturas, ref string tcMsgError)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            DataTable ldt_CobrosFacturas = new DataTable();
            DataTable ltdCobrosFacturas = new DataTable();
            bool llConsulta_Ok = false;
            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            decimal lnTotal = 0.0M;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            ltdCobrosFacturas = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and tikets.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and tikets.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and tikets.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and tikets.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("tikets", " tikets.arqueo=" + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? " and tikets.fecha<=" + DB.SQLString(this._dFecha) + " and tikets.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and tikets.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            llConsulta_Ok = DB.SQLExec("select Sum(tikets.entrega-tikets.cambio_e) as importediv, tikets.moneda, tikets.tipo, " +
                                       DB.SQLNvl("Sum((tikets.entrega-tikets.cambio_e)/tikets.cotizacion)", 0) + " as importe " +
                                       "from " + DB.SQLDatabase("tpv", "tikets") + " " +
                                       "where tikets.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcEjercicio + // 104028
                                       "and tikets.tipo=4 " +
                                       lcCondicion +
                                       "group by tikets.tipo,tikets.moneda", ref ldt_CobrosFacturas);
            if (llConsulta_Ok == true)
            {
                if (ldt_CobrosFacturas.Rows.Count > 0)
                {
                    try
                    {
                        foreach (DataRow r in ldt_CobrosFacturas.Rows)
                        {
                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda))
                                lcMoneda = this._lcMoneda_Empresa;
                            //PE-77346
                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            if (Convert.ToDecimal(r["importe"]) != 0)
                            {
                                row = ltdCobrosFacturas.NewRow();

                                //Bug 116469
                                //row["descripcion"] = "Cobros facturas (" + Convert.ToString(loDicMoneda["moneda"]).Trim() + ")";
                                row["descripcion"] = "Cobros facturas (" + getSimboloMoneda(loDicMoneda) + ")";

                                row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);

                                row["moneda"] = lcMoneda;

                                row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                                ltdCobrosFacturas.Rows.Add(row);

                                lnTotal = lnTotal + Convert.ToDecimal(r["importe"]);
                            }
                        }
                    }
                    catch (Exception oE)
                    {
                        tcMsgError = "(_Load) Error en procesos internso en _Obtener_DataTable_OperCaja_Cobros_Facturas().\n\n" + oE.Message;
                    }
                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta en _Obtener_DataTable_OperCaja_Cobros_Facturas().";
            }
            tnTotalCobrosFacturas = lnTotal;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return ltdCobrosFacturas;
        }


        protected virtual DataTable _Obtener_DataTable_OperCaja_Cobros_Varios(ref decimal tnTotalCobrosVarios, ref string tcMsgError)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            DataTable ldt_CobrosVarios = new DataTable();
            DataTable ldtCobrosVarios = new DataTable();
            bool llConsulta_Ok = false;
            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            decimal lnTotal = 0.0M;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            ldtCobrosVarios = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and tikets.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and tikets.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and tikets.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and tikets.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("tikets", "tikets.arqueo  =" + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? " and tikets.fecha<=" + DB.SQLString(this._dFecha) + " and tikets.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and tikets.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            llConsulta_Ok = DB.SQLExec("select Sum(tikets.entrega-tikets.cambio_e) as importediv, tikets.moneda, tikets.tipo, " +
                                       DB.SQLNvl("Sum((tikets.entrega-tikets.cambio_e)/tikets.cotizacion)", 0) + " as importe " +
                                       "from " + DB.SQLDatabase("tpv", "tikets") + " " +
                                       "where tikets.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcEjercicio + // 104028
                                       "and tikets.tipo=3 " +
                                       lcCondicion +
                                       "group by tikets.tipo,tikets.moneda", ref ldt_CobrosVarios);
            if (llConsulta_Ok == true)
            {
                if (ldt_CobrosVarios.Rows.Count > 0)
                {
                    try
                    {
                        foreach (DataRow r in ldt_CobrosVarios.Rows)
                        {
                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda))
                                lcMoneda = this._lcMoneda_Empresa;
                            //PE-77346
                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            if (Convert.ToDecimal(r["importe"]) != 0)
                            {
                                row = ldtCobrosVarios.NewRow();

                                //Bug 116469
                                //row["descripcion"] = "Cobros varios (" + Convert.ToString(loDicMoneda["moneda"]).Trim() + ")";
                                row["descripcion"] = "Cobros varios (" + getSimboloMoneda(loDicMoneda) + ")";

                                row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);

                                row["moneda"] = lcMoneda;

                                row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                                ldtCobrosVarios.Rows.Add(row);

                                lnTotal = lnTotal + Convert.ToDecimal(r["importe"]);
                            }
                        }
                    }
                    catch (Exception oE)
                    {
                        tcMsgError = "(_Load) Error en procesos internos en _Obtener_DataTable_OperCaja_Cobros_Varios().\n\n" + oE.Message;
                    }
                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta en _Obtener_DataTable_OperCaja_Cobros_Varios().";
            }
            tnTotalCobrosVarios = lnTotal;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return ldtCobrosVarios;
        }


        protected virtual DataTable _Obtener_DataTable_OperCaja_Pagos_Varios(ref decimal tnTotalPagosVarios, ref string tcMsgError)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            DataTable ldt_PagosVarios = new DataTable();
            DataTable ldtPagosVarios = new DataTable();
            bool llConsulta_Ok = false;
            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            decimal lnTotal = 0.0M;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            ldtPagosVarios = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and tikets.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and tikets.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and tikets.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and tikets.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("tikets", " tikets.arqueo=" + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? " and tikets.fecha<=" + DB.SQLString(this._dFecha) + " and tikets.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and tikets.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            llConsulta_Ok = DB.SQLExec("select Sum(tikets.entrega-tikets.cambio_e) as importediv, tikets.moneda, tikets.tipo, " +
                                       DB.SQLNvl("Sum((tikets.entrega-tikets.cambio_e)/tikets.cotizacion)", 0) + " as importe " +
                                       "from " + DB.SQLDatabase("tpv", "tikets") + " " +
                                       "where tikets.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcEjercicio + // 104028
                                       "and tikets.tipo=5 " +
                                       lcCondicion +
                                       "group by tikets.tipo,tikets.moneda", ref ldt_PagosVarios);
            if (llConsulta_Ok == true)
            {
                if (ldt_PagosVarios.Rows.Count > 0)
                {
                    try
                    {
                        foreach (DataRow r in ldt_PagosVarios.Rows)
                        {
                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda))
                                lcMoneda = this._lcMoneda_Empresa;
                            //PE-77346
                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            if (Convert.ToDecimal(r["importe"]) != 0)
                            {
                                row = ldtPagosVarios.NewRow();

                                //Bug 116469
                                //row["descripcion"] = "Pagos varios (" + Convert.ToString(loDicMoneda["moneda"]).Trim() + ")";
                                row["descripcion"] = "Pagos varios (" + getSimboloMoneda(loDicMoneda) + ")";

                                row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);

                                row["moneda"] = lcMoneda;

                                row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                                ldtPagosVarios.Rows.Add(row);

                                lnTotal = lnTotal + Convert.ToDecimal(r["importe"]);
                            }
                        }
                    }
                    catch (Exception oE)
                    {
                        tcMsgError = "(_Load) Error en procesos internos en _Obtener_DataTable_OperCaja_Pagos_Varios().\n\n" + oE.Message;
                    }
                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta en _Obtener_DataTable_OperCaja_Pagos_Varios().";
            }
            tnTotalPagosVarios = lnTotal;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return ldtPagosVarios;
        }


        protected virtual DataTable _Obtener_DataTable_OperCaja_Retiros(ref decimal tnTotalRetiros, ref string tcMsgError)
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif


            DataTable ldt_Retiros = new DataTable();
            DataTable ldtRetiros = new DataTable();
            bool llConsulta_Ok = false;
            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            decimal lnTotal = 0.0M;

            object[,] la_array_cursor = { { "descripcion", "string", 50, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            ldtRetiros = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and cpag.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and cpag.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and cpag.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and cpag.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("cpag", " cpag.arqueo=" + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? " and cpag.fecha<=" + DB.SQLString(this._dFecha) + " and cpag.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            string lcEjercicio = string.Empty;
            if (!_llejercicioautomatico) lcEjercicio = " and cpag.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " "; // 104028

            llConsulta_Ok = DB.SQLExec("select cpag.Moneda, Sum(cpag.importediv) as importediv, " +
                                       "Sum(cpag.importe) as importe " +
                                       "from " + DB.SQLDatabase("tpv", "cob_pago") + " cpag " +
                                       "where cpag.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcEjercicio + // 104028
                                       "and cpag.operacion='R' " +
                                       lcCondicion +
                                       "group by cpag.moneda", ref ldt_Retiros);
            if (llConsulta_Ok == true)
            {
                if (ldt_Retiros.Rows.Count > 0)
                {
                    try
                    {
                        foreach (DataRow r in ldt_Retiros.Rows)
                        {
                            string lcMoneda = Convert.ToString(r["moneda"]);
                            if (string.IsNullOrWhiteSpace(lcMoneda))
                                lcMoneda = this._lcMoneda_Empresa;
                            //PE-77346
                            loDicMoneda = _Moneda(lcMoneda);
                            lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));

                            if (Convert.ToDecimal(r["importe"]) != 0)
                            {
                                row = ldtRetiros.NewRow();

                                //Bug 116469
                                //row["descripcion"] = "Retiros caja (" + Convert.ToString(loDicMoneda["moneda"]).Trim() + ")";
                                row["descripcion"] = "Retiros caja (" + getSimboloMoneda(loDicMoneda) + ")";

                                row["importediv"] = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara) * -1;

                                row["moneda"] = lcMoneda;

                                row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                                ldtRetiros.Rows.Add(row);

                                lnTotal = lnTotal + Convert.ToDecimal(row["importe"]);
                            }
                        }
                    }
                    catch (Exception oE)
                    {
                        tcMsgError = "(_Load) Error en procesos internos en _Obtener_DataTable_OperCaja_Retiros().\n\n" + oE.Message;
                    }
                }
            }
            else
            {
                tcMsgError = "(_Load) Error en consulta en _Obtener_DataTable_OperCaja_Retiros().";
            }
            tnTotalRetiros = lnTotal;

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return ldtRetiros;
        }


        protected virtual decimal _Obtener_DataTable_Desg_Familias()
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            decimal lnTotal = 0.0M;
            DataTable ldt_tmp_AlbD = new DataTable();
            bool llConsulta_Ok = false;

            object[,] la_array_cursor = { { "descripcion", "string", 100, "Y" }, { "moneda", "string", 3, "Y" }, { "importe", "decimal", 0, "y" }, { "importediv", "decimal", 0, "Y" } };
            this._nImporteDesgFamilias = 0.0M;
            this._dtDesg_Familias = DBfunctions._Crear_DtTable(la_array_cursor);

            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and t.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and t.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and g.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and g.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("t", "t.arqueo=" + DB.SQLString(this._nNumero) + (this._nNumero == 0 ? " and g.fecha<=" + DB.SQLString(this._dFecha) + " and t.aparcado=0 and t.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            if (string.IsNullOrWhiteSpace(_CajaDesde) && string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion += " and t.caja !='' ";

            //PE-77346 Se añade el nombre de la familia para ahorrarnos un consulta
            String tcSql = "select MAX(d.familia) AS familia, MAX(f.nombre) AS nombre,  MAX(g.Divisa) As divisa, sum(d.impdiviva) as importediv, sum(d.importeiva) as importe, " +
                                       " g.empresa, g.numero, g.letra, MAX(g.pronto) AS pronto, MAX(d.dto1) AS dto1, MAX(d.dto2) AS dto2, MAX(d.precioiva) AS precio, MAX(d.prediviva) AS preciodiv, " +
                                       " MAX(d.unidades) AS unidades, MAX(d.peso) AS peso, MAX(d.cajas) AS cajas, MAX(d.tipoprec) AS tipoprec " +
                                       "from " + DB.SQLDatabase("gestion", "c_albven") + " g inner join " + DB.SQLDatabase("tpv", "c_albven") + " t " +
                                       "on g.Empresa=t.empresa and g.Numero=t.numero and g.Letra=t.Letra and t.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                       "inner join " + DB.SQLDatabase("gestion", "d_albven") + " d ON g.Empresa=d.empresa and g.Numero=d.numero and g.letra=d.letra " +
                                       "left join " + DB.SQLDatabase("gestion", "familias") + " f ON f.codigo = d.familia " +
                                       "where t.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       "and t.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                       "and d.tipo_iva != '  ' " +
                                       lcCondicion +
                                       "group by g.empresa, g.numero, g.letra, d.linia";

            llConsulta_Ok = DB.SQLExec(tcSql, ref ldt_tmp_AlbD);

            if (llConsulta_Ok == true)
            {

                if (ldt_tmp_AlbD.Rows.Count > 0)
                {
                    try
                    {
                        lnTotal = DesgloseFamilias(ldt_tmp_AlbD);
                    }
                    catch (Exception oE)
                    {
                        this._MessageBox("(_Load) Error en procesos internos en _Obtener_DataTable_Desg_Familias().\n\n" + oE.Message);
                    }
                }
            }
            else
            {
                this._MessageBox("(_Load) Error en consulta de reposiciones en _Obtener_DataTable_Desg_Familias().");
            }

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif

            return lnTotal;
        }


        protected virtual void _Obtener_DataTable_Desg_Iva_Tiquets()
        {
#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Inicio);
#endif

            DataTable ldt_Cursor = new DataTable();
            bool llConsulta_Ok = false, llExisteTipoIva = false;
            DataRow rowPeuIva;
            string lcEmpresa = "", lcNumero = "", lcLetra = "", lcCodigoIva = "";
            DataRow[] la_Rows;

            this._nDesgIvaTic_TotalBases = 0.0M;
            this._nDesgIvaTic_TotalIvas = 0.0M;
            this._nDesgIvaTic_TotalTotal = 0.0M;

            // Crear datatable que retornaremos ...
            object[,] la_array_cursor = { { "codigo", "string", 2, "Y" }, { "baseiva", "decimal", 0, "Y" }, { "iva_tan", "decimal", 0, "y" }, { "impiva", "decimal", 0, "y" },
                                              { "imptotal", "decimal", 0, "Y" } };
            this._dtDesg_Iva = DBfunctions._Crear_DtTable(la_array_cursor);


            // 87748
            string lcCondicion = string.Empty;
            if (!string.IsNullOrWhiteSpace(_CajaDesde))
                lcCondicion = lcCondicion + " and tpv.caja >= " + DB.SQLString(_CajaDesde);

            if (!string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and tpv.caja <= " + DB.SQLString(_CajaHasta);

            if (_FechaDesde != null)
                lcCondicion = lcCondicion + " and ges.fecha >= " + DB.SQLString(_FechaDesde);

            if (_FechaHasta != null)
                lcCondicion = lcCondicion + " and ges.fecha <= " + DB.SQLString(_FechaHasta);

            if (string.IsNullOrWhiteSpace(lcCondicion))
                lcCondicion = "and " + _makeId("tpv", "tpv.arqueo=" + DB.SQLString(this._nNumero) + " " + (this._nNumero == 0 ? " and ges.fecha<=" + DB.SQLString(this._dFecha) + " and tpv.aparcado=0 and tpv.caja=" + DB.SQLString(this._lcCajaActiva) : "")) + " ";
            // fi 87748

            if (string.IsNullOrWhiteSpace(_CajaDesde) && string.IsNullOrWhiteSpace(_CajaHasta))
                lcCondicion = lcCondicion + " and tpv.caja !='' ";

            // Consulta de tiquets ...
            String tcSql = "select ges.empresa, ges.numero, ges.letra " +
                                       "from " + DB.SQLDatabase("gestion", "c_albven") + " ges inner join " + DB.SQLDatabase("tpv", "c_albven") + " tpv " +
                                       "on ges.empresa=tpv.empresa and ges.numero=tpv.numero and ges.letra=tpv.letra and tpv.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                       "where tpv.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                       "and tpv.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       lcCondicion +
                                       "and tpv.tipo_doc=1 ";
            llConsulta_Ok = DB.SQLExec(tcSql, ref ldt_Cursor);

            if (llConsulta_Ok == true)
            {
                try
                {
                    ewDocIva docIva;

                    // Vamos recorriendo el DataTable de tiquets ...
                    foreach (DataRow r in ldt_Cursor.Rows)
                    {
                        lcEmpresa = Convert.ToString(r["empresa"]);
                        lcNumero = Convert.ToString(r["numero"]);
                        lcLetra = Convert.ToString(r["letra"]);

#if ewTools
                        EwTools._WriteTrace(EwTools.eMethodStatus.Procesando, "Empresa: "+lcEmpresa + " " + lcLetra + " - " + lcNumero);
#endif

                        docIva = this.getDocIva(lcEmpresa, lcNumero, lcLetra);

                        // Recorremos el DataTable del pie de IVA del documento de venta y acumulamos cada registro de tipo de IVA detectado en el DataTable que retornamos ...
                        foreach (DataRow r2 in docIva.ldt_TablaIva.Rows)
                        {
                            lcCodigoIva = Convert.ToString(r2["codigo"]);

                            // Buscamos el código de IVA en el DataTable de retorno ...
                            la_Rows = this._dtDesg_Iva.Select("codigo=" + DB.SQLString(lcCodigoIva));

                            llExisteTipoIva = (la_Rows.Length != 0) ? true : false;

                            if (!llExisteTipoIva)
                            {
                                // Si no existe, creamos el registro ...
                                rowPeuIva = this._dtDesg_Iva.NewRow();
                                rowPeuIva["codigo"] = r2["codigo"];
                                rowPeuIva["iva_tan"] = r2["iva_tan"];
                            }
                            else
                                // Si el tipo de IVA ya existe, obtenemos una referencia a la fila del DataTable de retorno que contiene dicho tipo de IVA ...
                                rowPeuIva = la_Rows[0];

                            // Acumulamos base,iva,importe total
                            rowPeuIva["baseiva"] = Convert.ToDecimal(rowPeuIva["baseiva"]) + Convert.ToDecimal(r2["baseiva"]);
                            rowPeuIva["impiva"] = Convert.ToDecimal(rowPeuIva["impiva"]) + Convert.ToDecimal(r2["impiva"]);
                            rowPeuIva["imptotal"] = Convert.ToDecimal(rowPeuIva["imptotal"]) + Convert.ToDecimal(r2["baseiva"]) + Convert.ToDecimal(r2["impiva"]);

                            // Actualizar las propiedades del objeto que 
                            this._nDesgIvaTic_TotalBases = this._nDesgIvaTic_TotalBases + Convert.ToDecimal(r2["baseiva"]);
                            this._nDesgIvaTic_TotalIvas = this._nDesgIvaTic_TotalIvas + Convert.ToDecimal(r2["impiva"]);
                            this._nDesgIvaTic_TotalTotal = this._nDesgIvaTic_TotalTotal + Convert.ToDecimal(r2["baseiva"]) + Convert.ToDecimal(r2["impiva"]); ;

                            if (!llExisteTipoIva)
                                // Si el tipo de IVA no existia, añadimos el registro ...
                                this._dtDesg_Iva.Rows.Add(rowPeuIva);
                        }

#if ewTools
                        EwTools._WriteTrace(EwTools.eMethodStatus.Procesando, "Fin Empresa: " + lcEmpresa + " " + lcLetra + " - " + lcNumero);
#endif
                    }
                }
                catch (Exception oE)
                {
                    this._MessageBox("(_Load) Error en procesos internos en _Obtener_DataTable_Desg_Iva_Tiquets().\n\n" + oE.Message);
                }
            }
            else
            {
                this._MessageBox("(_Load) Error en consulta de reposiciones en _Obtener_DataTable_Desg_Iva_Tiquets().");
            }

#if ewTools
            EwTools._WriteTrace(EwTools.eMethodStatus.Fin);
#endif
        }


        protected virtual string _Obtener_XML_desglose_iva()
        {
            //Creo un datatable de strings
            DataTable ldtCopyDatatableIva = new DataTable();
            ldtCopyDatatableIva.TableName = "DesgloseIva";
            Type loTipoString = typeof(String);
            ldtCopyDatatableIva.Columns.Add(new DataColumn("codigo", loTipoString));
            ldtCopyDatatableIva.Columns.Add(new DataColumn("baseiva", loTipoString));
            ldtCopyDatatableIva.Columns.Add(new DataColumn("iva_tan", loTipoString));
            ldtCopyDatatableIva.Columns.Add(new DataColumn("impiva", loTipoString));
            ldtCopyDatatableIva.Columns.Add(new DataColumn("imptotal", loTipoString));

            foreach (DataRow ldrFilaIva in this._dtDesg_Iva.Rows)
            {
                DataRow ldrNewRow = ldtCopyDatatableIva.NewRow();
                ldrNewRow["codigo"] = "@!" + ldrFilaIva["codigo"].ToString();
                ldrNewRow["baseiva"] = "@!" + ldrFilaIva["baseiva"].ToString().Replace(".", "").Replace(',', '.');
                ldrNewRow["iva_tan"] = "@!" + ldrFilaIva["iva_tan"].ToString().Replace(".", "").Replace(',', '.');
                ldrNewRow["impiva"] = "@!" + ldrFilaIva["impiva"].ToString().Replace(".", "").Replace(',', '.');
                ldrNewRow["imptotal"] = "@!" + ldrFilaIva["imptotal"].ToString().Replace(".", "").Replace(',', '.');
                ldtCopyDatatableIva.Rows.Add(ldrNewRow);
            }

            // Volcamos los datos a un fichero XML temporal para que Eurowin los pueda capturar
            //string lcFileNameIva = System.IO.Path.GetTempPath() + "Arqueo_desglose_iva_tmp.xml";
            //ldtCopyDatatableIva.WriteXml(lcDir + "Arq_iva.xml", XmlWriteMode.IgnoreSchema);

            // PE-94078 - Crear el fichero XML en la carpeta <euroterm>\temp
            string lcFileNameIva = this._CreateFileTemporalXML("Arq_iva.xml", ldtCopyDatatableIva);
            return lcFileNameIva;
        }


        protected object[] _addRow(object[] row)
        {
            //DataRowView listItem;
            //String tcCodigo;
            //Object[] arr;

            //tcCodigo = "*";

            //int i = 5;
            //if (tcCodigo == "*")
            //{
            //    arr = new Object[i + this._Monedas.Count];
            //}
            //else
            //{
            //    arr = new Object[i + 1];

            //}

            Object[] arr = new Object[6];

            arr[0] = row[0];
            arr[1] = row[1];
            arr[2] = row[2];
            arr[3] = row[3];
            arr[4] = Convert.ToInt16(row[4]);
            arr[5] = "";

            //foreach (KeyValuePair<string, string> moneda in this._Monedas)
            //{
            //    if (tcCodigo == "*" || tcCodigo == moneda.Key)
            //    {
            //        arr[i++] = "";
            //    }
            //}

            return arr;
        }


        protected object[] _addRow(DataRow toRow, Navegacion toNav)
        {
            //DataRowView listItem;
            //String tcCodigo;
            //Object[] arr;

            //ewMascara _oMascaraImport = new ewbase.ewMascara(ew.global.EW_GLOBAL._GetMascara("wc_total"));
            //ewMascara _oMascaraPorcent = new ewbase.ewMascara(ew.global.EW_GLOBAL._GetMascara("wc_tpc"));

            //String lcCadenaFormat = "{0:" + _oMascaraImport._Mascara_Net + "}";

            //tcCodigo = "*";

            //int i = 5;
            //if (tcCodigo == "*")
            //{
            //    arr = new Object[i + this._Monedas.Count];
            //}
            //else
            //{
            //    arr = new Object[i + 1];

            //}

            //arr[0] = "";
            //arr[1] = row["descripcion"];
            //arr[2] = String.Format(lcCadenaFormat, row["importe"]);
            //arr[3] = 0;
            //arr[4] = Convert.ToInt16(nav);

            //foreach (KeyValuePair<string, string> moneda in this._Monedas)
            //{
            //    if (tcCodigo == "*" || tcCodigo == moneda.Key)
            //    {
            //        arr[i++] = (Convert.ToString(row["moneda"]) == Convert.ToString(moneda.Key)) ? String.Format(lcCadenaFormat, row["importediv"]) : "";
            //    }
            //}

            String lcCadenaFormat;
            ewMascara _oMascaraImport;
            Dictionary<string, object> loDicMoneda;
            Object[] arr = new Object[6];
            String lcDivisa = Convert.ToString(toRow["moneda"]).Trim();

            if (String.IsNullOrEmpty(lcDivisa)) lcDivisa = EW_GLOBAL._Empresa._Moneda;
            loDicMoneda = _Moneda(lcDivisa);

            String lcMascara = Convert.ToString(loDicMoneda["grantotal"]).Trim();
            if (String.IsNullOrEmpty(lcMascara)) EW_GLOBAL._GetMascara(KeyDiccionarioMascara.wc_total);

            _oMascaraImport = new ewbase.ewMascara(lcMascara);
            lcCadenaFormat = "{0:" + _oMascaraImport._Mascara_Net + "}";

            arr[0] = "";
            arr[1] = toRow["descripcion"];
            arr[2] = String.Format(lcCadenaFormat, toRow["importediv"]);
            arr[3] = 0;
            arr[4] = Convert.ToInt16(toNav);
            arr[5] = lcDivisa;

            return arr;
        }


        protected void _Addons_Cargar()
        {
            // Si no hay addons cargados en el diccionario de la global, salimos
            if (!AddonsController.Instance.AddonsManager.HasAddonsLoaded())
                return;

            //if (_Addons.Count > 0)
            //    return;

            // Recorrido por los addons disponibles para ir cargando sus extensiones en el diccionario de extensiones para el documento actual
            AddonsController
                .Instance
                .Commands
                .CargarExtensionesArqueoTpv(this, "arqueotpv");
        }


        protected void _Addons_Messagebox(string tcAddon, string tcMetodo, string tcMessage)
        {
            FUNCTIONS._MessageBox("Se ha producido la siguiente incidencia en la ejecución del método " + tcMetodo + " del addon " + tcAddon + ": " + Environment.NewLine + Environment.NewLine + tcMessage, MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1, DialogResult.OK);
        }


        protected void _Addons_Arquear(TipoExecute teBeforeAfter)
        {
            _ExtensionArqueoTpv loExtension = null;

            // Recorrido por los addons disponibles, para ejecutar el método deseado en las extensiones
            foreach (KeyValuePair<string, object> loItem in this._Addons)
            {
                try
                {
                    if (loItem.Value is _ExtensionArqueoTpv)
                    {
                        // Obtenemos el objeto de extensiones y lo configuramos
                        loExtension = (_ExtensionArqueoTpv)loItem.Value;
                        loExtension._eBeforeAfter = teBeforeAfter;
                        loExtension._Arquear();
                    }
                }
                catch (Exception loEx)
                {
                    DB.Registrar_Error(loEx);
                    this._Addons_Messagebox(loItem.Key, "Arquear", loEx.Message);
                }
            }

            return;
        }


        protected void _Addons_DesArquear(TipoExecute teBeforeAfter)
        {
            _ExtensionArqueoTpv loExtension = null;

            // Recorrido por los addons disponibles, para ejecutar el método deseado en las extensiones
            foreach (KeyValuePair<string, object> loItem in this._Addons)
            {
                try
                {
                    if (loItem.Value is _ExtensionArqueoTpv)
                    {
                        // Obtenemos el objeto de extensiones y lo configuramos
                        loExtension = (_ExtensionArqueoTpv)loItem.Value;
                        loExtension._eBeforeAfter = teBeforeAfter;
                        loExtension._DesArquear();
                    }
                }
                catch (Exception loEx)
                {
                    DB.Registrar_Error(loEx);
                    this._Addons_Messagebox(loItem.Key, "DesArquear", loEx.Message);
                }
            }

            return;
        }


        protected bool _Addons_Load(TipoExecute teBeforeAfter)
        {
            _ExtensionArqueoTpv loExtension = null;

            // Recorrido por los addons disponibles, para ejecutar el método deseado en las extensiones
            foreach (KeyValuePair<string, object> loItem in this._Addons)
            {
                try
                {
                    if (loItem.Value is _ExtensionArqueoTpv)
                    {
                        // Obtenemos el objeto de extensiones y lo configuramos
                        loExtension = (_ExtensionArqueoTpv)loItem.Value;
                        loExtension._eBeforeAfter = teBeforeAfter;
                        if (!loExtension._Load())
                        {
                            if (!string.IsNullOrWhiteSpace(loExtension._Error_Message))
                                this._Mensaje_Error = loExtension._Error_Message;
                            return false;
                        }
                    }
                }
                catch (Exception loEx)
                {
                    DB.Registrar_Error(loEx);
                    this._Addons_Messagebox(loItem.Key, "Load", loEx.Message);
                }
            }

            return true;
        }


        protected bool _Addons_Save(TipoExecute teBeforeAfter)
        {
            _ExtensionArqueoTpv loExtension = null;

            // Recorrido por los addons disponibles, para ejecutar el método deseado en las extensiones
            foreach (KeyValuePair<string, object> loItem in this._Addons)
            {
                try
                {
                    if (loItem.Value is _ExtensionArqueoTpv)
                    {
                        // Obtenemos el objeto de extensiones y lo configuramos
                        loExtension = (_ExtensionArqueoTpv)loItem.Value;
                        loExtension._eBeforeAfter = teBeforeAfter;
                        if (!loExtension._Save())
                        {
                            if (!string.IsNullOrWhiteSpace(loExtension._Error_Message))
                                this._Mensaje_Error = loExtension._Error_Message;
                            return false;
                        }
                    }
                }
                catch (Exception loEx)
                {
                    DB.Registrar_Error(loEx);
                    this._Addons_Messagebox(loItem.Key, "Save", loEx.Message);
                }
            }

            return true;
        }


        protected bool _Addons_DescargarDatos(TipoExecute teBeforeAfter)
        {
            _ExtensionArqueoTpv loExtension = null;

            // Recorrido por los addons disponibles, para ejecutar el método deseado en las extensiones
            foreach (KeyValuePair<string, object> loItem in this._Addons)
            {
                try
                {
                    if (loItem.Value is _ExtensionArqueoTpv)
                    {
                        // Obtenemos el objeto de extensiones y lo configuramos
                        loExtension = (_ExtensionArqueoTpv)loItem.Value;
                        loExtension._eBeforeAfter = teBeforeAfter;
                        loExtension._DescargarDatos();
                    }
                }
                catch (Exception loEx)
                {
                    DB.Registrar_Error(loEx);
                    this._Addons_Messagebox(loItem.Key, "DescargarDatos", loEx.Message);
                }
            }

            return true;
        }


        protected DataTable _Addons_MontaArqueo(TipoExecute teBeforeAfter)
        {
            DataTable ldtDataTable = null;
            _ExtensionArqueoTpv loExtension = null;

            // Recorrido por los addons disponibles, para ejecutar el método deseado en las extensiones
            foreach (KeyValuePair<string, object> loItem in this._Addons)
            {
                try
                {
                    if (loItem.Value is _ExtensionArqueoTpv)
                    {
                        // Obtenemos el objeto de extensiones y lo configuramos
                        loExtension = (_ExtensionArqueoTpv)loItem.Value;
                        loExtension._eBeforeAfter = teBeforeAfter;
                        loExtension._MontaArqueo();
                    }
                }
                catch (Exception loEx)
                {
                    DB.Registrar_Error(loEx);
                    this._Addons_Messagebox(loItem.Key, "MontarArqueo", loEx.Message);
                }
            }

            return ldtDataTable;
        }


        protected void _Addons_Obtener_DataTable_Arqueo_Caja(TipoExecute teBeforeAfter)
        {
            _ExtensionArqueoTpv loExtension = null;

            // Recorrido por los addons disponibles, para ejecutar el método deseado en las extensiones
            foreach (KeyValuePair<string, object> loItem in this._Addons)
            {
                try
                {
                    if (loItem.Value is _ExtensionArqueoTpv)
                    {
                        // Obtenemos el objeto de extensiones y lo configuramos
                        loExtension = (_ExtensionArqueoTpv)loItem.Value;
                        loExtension._eBeforeAfter = teBeforeAfter;
                        loExtension._Obtener_DataTable_Arqueo_Caja();
                    }
                }
                catch (Exception loEx)
                {
                    DB.Registrar_Error(loEx);
                    this._Addons_Messagebox(loItem.Key, "Obtener_DataTable_Arqueo_Caja", loEx.Message);
                }
            }

            return;
        }


        protected void _Addons_Print(TipoExecute teBeforeAfter, TiposDeArqueos teTipoDeArqueo, string tcFileXMLDatos, string tcCaption)
        {
            _ExtensionArqueoTpv loExtension = null;

            // Recorrido por los addons disponibles, para ejecutar el método deseado en las extensiones
            foreach (KeyValuePair<string, object> loItem in this._Addons)
            {
                try
                {
                    if (loItem.Value is _ExtensionArqueoTpv)
                    {
                        // Obtenemos el objeto de extensiones y lo configuramos
                        loExtension = (_ExtensionArqueoTpv)loItem.Value;
                        loExtension._eBeforeAfter = teBeforeAfter;
                        loExtension._Print(teTipoDeArqueo, tcFileXMLDatos, tcCaption);
                    }
                }
                catch (Exception loEx)
                {
                    DB.Registrar_Error(loEx);
                    this._Addons_Messagebox(loItem.Key, "Print", loEx.Message);
                }
            }

            return;
        }


        protected void _Addons_Print_Consolida(TipoExecute teBeforeAfter, string tcFileXMLDatos, string tcCaption,
                                               string tcCajaIni, string tcCajaFin, DateTime dFechaIni, DateTime dFechaFin,
                                               Boolean tlTodasCajas)
        {
            _ExtensionArqueoTpv loExtension = null;

            // Recorrido por los addons disponibles, para ejecutar el método deseado en las extensiones
            foreach (KeyValuePair<string, object> loItem in this._Addons)
            {
                try
                {
                    if (loItem.Value is _ExtensionArqueoTpv)
                    {
                        // Obtenemos el objeto de extensiones y lo configuramos
                        loExtension = (_ExtensionArqueoTpv)loItem.Value;
                        loExtension._eBeforeAfter = teBeforeAfter;
                        loExtension._Print_Consolida(tcFileXMLDatos, tcCaption, tcCajaIni, tcCajaFin, dFechaIni, dFechaFin, tlTodasCajas);
                    }
                }
                catch (Exception loEx)
                {
                    DB.Registrar_Error(loEx);
                    this._Addons_Messagebox(loItem.Key, "Print_Consolida", loEx.Message);
                }
            }

            return;
        }


        #endregion MÉTODOS PROTECTED


        #region METODOS PRIVADOS


        private void _detalle_arqueo(String tcTipo, Int16 tiTipo = 0)
        {
            // Preparem els paràmtres per navegar 
            object[] loParameImp;
            if (tiTipo == 0)
            {
                loParameImp = new object[5] { tcTipo, this._dFecha_Inicial, this._dFecha_Final, this._Caja, this._Caja };
            }
            else
            {
                loParameImp = new object[6] { tcTipo, this._dFecha_Inicial, this._dFecha_Final, this._Caja, this._Caja, tiTipo };
            }

            //PE-86776
            NETVFP._Abrir_Formulario_VFP(tcTipo, loParameImp);

        }


        private void _detalle_arqueo(string tcNavegacion, string tcDescripcion, string tcListado = "", int tcOpCajaOpcion = 0, String tcDivisa = "")
        {
            // 88164
            string lcMoneda; ;
            object[] loParameImp;
            string lcListaArqueos = string.Empty;
            string lcDolar = string.Empty;

            //T115439
            lcMoneda = String.IsNullOrEmpty(tcDivisa.Trim()) ? EW_GLOBAL._GetVariable("wc_moneda").ToString() : tcDivisa;

            if (_FechaDesde == null && _FechaHasta == null)
            {
                // Inicialitzo els valors
                if (tcNavegacion == "Credit" || tcNavegacion == "Abonos")
                {
                    _FechaDesde = Convert.ToDateTime(EW_GLOBAL._GetVariable("wd_PeriodoIni"));
                    _FechaHasta = _Fecha;
                }
                else
                {
                    // 88818
                    if (_Fecha.Year.ToString() == Convert.ToString(EW_GLOBAL._GetVariable("wc_any")))
                    {
                        _FechaDesde = _Fecha;
                        _FechaHasta = _Fecha;
                    }
                    else
                    {
                        _FechaDesde = Convert.ToDateTime(EW_GLOBAL._GetVariable("wd_PeriodoIni"));
                        _FechaHasta = Convert.ToDateTime(EW_GLOBAL._GetVariable("wd_PeriodoFin"));

                    }

                    // fi 88818
                }


                // PE-90460 - Para el listado de abonos y créditos se tiene de pasar el array de arqueos.
                // PE-90454 - Pasar el parámetro con la lista de arqueos
                foreach (KeyValuePair<string, string> itemNum in _Numeros)
                {
                    lcListaArqueos = lcListaArqueos + lcDolar + itemNum.Value;

                    if (string.IsNullOrWhiteSpace(lcDolar)) lcDolar = "$";

                }


                // Arqueig de caixa
                loParameImp = new object[10]
                {
                    tcNavegacion,                               // tipo de navegacion
                    _Numero,                                    // numero de arqueo
                    _Caja,                                      // Caja Inicial
                    _Caja,                                      // Caja final
                    false,                                      // Todas las cajas
                    tcDescripcion,                              // Descripción
                    _FechaDesde,                                // Fecha Inicial
                    _FechaHasta,                                // Fecha Final
                    lcMoneda,                                   // Moneda
                    lcListaArqueos                                     // Array de arqueos
                };

                // Restauro els valors
                _FechaDesde = null;
                _FechaHasta = null;
            }
            else
            {
                // Consolidació d'aquejos
                loParameImp = new object[10]
                {
                    tcNavegacion,                               // tipo de navegacion
                    false,                                      // numero de arqueo
                    _CajaDesde,                                 // Caja Inicial
                    _CajaHasta,                                 // Caja final
                    _TodasCajas,                                // Todas las cajas
                    tcDescripcion,                              // Descripción
                    _FechaDesde,                                // Fecha Inicial
                    _FechaHasta,                                // Fecha Final
                    lcMoneda,                                   // Moneda
                    ""                                          // Array de arqueos
                };
            }

            if (String.IsNullOrEmpty(tcListado))
                NETVFP._Ejecutar_Funcion_VFP("Navegacion_Arqueo_Net", loParameImp);
            else
                // PE-91609 - Imprimir listado arqueos .NET
                this._detalle_arqueo_net(tcListado, loParameImp, tcOpCajaOpcion);

            // fi 88164

        }


        private void _detalle_arqueo_net(string tcListado, object[] toParameImp, int tcOpCajaOpcion)
        {
            DateTime ldFechaDesde, ldFechaHasta;
            string lcCajaDesde, lcCajaHasta, lcListaArqueos, lcDescripcion;
            bool llTodasCajas = false;
            int lnNumero = -1;
            Dictionary<string, object> _DicArqueos = new Dictionary<string, object>();
            List<string> loLista = new List<string>();

            String lcNavegacion = Convert.ToString(toParameImp[0]);
            lnNumero = toParameImp[1] is bool ? -1 : Convert.ToInt16(toParameImp[1]);
            lcCajaDesde = Convert.ToString(toParameImp[2]);
            lcCajaHasta = Convert.ToString(toParameImp[3]);
            llTodasCajas = Convert.ToBoolean(toParameImp[4]);
            lcDescripcion = Convert.ToString(toParameImp[5]);
            ldFechaDesde = Convert.ToDateTime(toParameImp[6]);
            ldFechaHasta = Convert.ToDateTime(toParameImp[7]);
            lcListaArqueos = Convert.ToString(toParameImp[9]);

            String lcDivisa = Convert.ToString(toParameImp[8]);

            // Definir un diccionario con lo arqueos
            if (!String.IsNullOrEmpty(lcListaArqueos))
            {
                loLista = lcListaArqueos.Split('$').ToList();
                if (loLista.Count > 0)
                    _DicArqueos.Add("ArqueoLista", loLista);
            }


            // Crear un objeto con el listado
            FormListado loListado = new FormListado(tcListado.Trim().ToUpper());


            if (!String.IsNullOrEmpty(lcDivisa) && lcDivisa != Convert.ToString(EW_GLOBAL._GetVariable("wc_moneda")) && loListado._Opciones.ContainsKey("cmbdivisa"))
            {
                ((sage.ew.txtbox.txtDivisaBase)loListado._Opciones["cmbdivisa"])._Codigo = lcDivisa;
            }

            // Definir los filtros y opciones según el listado
            switch (tcListado)
            {
                case "L_CAJAS":
                    ((sage.ew.listados.Listados.VentasCajas)loListado._Listado)._nArqueo = lnNumero;
                    ((sage.ew.listados.Listados.VentasCajas)loListado._Listado)._nArqueos = _DicArqueos;
                    ((sage.ew.listados.Listados.VentasCajas)loListado._Listado)._lIvaIncluido = true;

                    if (loListado._Opciones.ContainsKey("chTicket") && loListado._Opciones.ContainsKey("chAlbaran") && loListado._Opciones.ContainsKey("chFactura"))
                    {
                        ((sage.ew.objetos.ewcheckbox)loListado._Opciones["chTicket"]).Checked = false;
                        ((sage.ew.objetos.ewcheckbox)loListado._Opciones["chAlbaran"]).Checked = false;
                        ((sage.ew.objetos.ewcheckbox)loListado._Opciones["chFactura"]).Checked = false;

                        // Marcar la opción según si és ticke, albaran o factura
                        switch (lcNavegacion)
                        {
                            case "Tickets":
                                ((sage.ew.objetos.ewcheckbox)loListado._Opciones["chTicket"]).Checked = true;
                                break;
                            case "Albaranes":
                                ((sage.ew.objetos.ewcheckbox)loListado._Opciones["chAlbaran"]).Checked = true;
                                break;
                            case "Facturas":
                                ((sage.ew.objetos.ewcheckbox)loListado._Opciones["chFactura"]).Checked = true;
                                break;

                        }
                    }

                    if (loListado._Opciones.ContainsKey("chIncluirticketsapar"))
                    {
                        ((sage.ew.objetos.ewcheckbox)loListado._Opciones["chIncluirticketsapar"]).Checked = false;
                    }

                    break;

                case "L_OPCAJA":  // operaciones caja
                    ((sage.ew.listados.Listados.OperacionesCaja)loListado._Listado)._nArqueo = lnNumero;
                    ((sage.ew.listados.Listados.OperacionesCaja)loListado._Listado)._nArqueos = _DicArqueos;

                    // Añadir el filtro según la forma de cobro
                    if (loListado._Filtros.ContainsKey("txtFormaCobroDesdeHasta") && !String.IsNullOrEmpty(lcDescripcion))
                    {
                        ((sage.ew.listados.Listados.OperacionesCaja)loListado._Listado)._llIncluirVales = false;

                        String lcCodigo = Convert.ToString(DB.SQLValor("F_COBROS", "NOMBRE", Convert.ToString(lcDescripcion), "CODIGO", "TPV"));
                        if (!String.IsNullOrEmpty(lcCodigo))
                        {
                            ConfiguradorFiltroVisual loFiltroCobro = new ConfiguradorFiltroVisual();
                            loFiltroCobro._Unico = Convert.ToString(lcCodigo);

                            ((IEwFiltro)loListado._Filtros["txtFormaCobroDesdeHasta"])._SetValuesFrom_ConfiguradorFiltroVisual(loFiltroCobro);
                        }
                    }


                    if (loListado._Filtros.ContainsKey("txtSeleccionTipoDesdeHasta") && tcOpCajaOpcion > 0)
                    {
                        ConfiguradorFiltroVisual loFiltroTipo = new ConfiguradorFiltroVisual();
                        loFiltroTipo._Unico = Convert.ToString(tcOpCajaOpcion);

                        ((IEwFiltro)loListado._Filtros["txtSeleccionTipoDesdeHasta"])._SetValuesFrom_ConfiguradorFiltroVisual(loFiltroTipo);
                    }


                    break;

                case "L_REPOSI":  // reposiciones
                    ((sage.ew.listados.Listados.Reposiciones)loListado._Listado)._nArqueo = lnNumero;
                    ((sage.ew.listados.Listados.Reposiciones)loListado._Listado)._nArqueos = _DicArqueos;

                    if (loListado._Opciones.ContainsKey("cmbOperarioCajacombo"))
                        ((sage.ew.objetos.ewcombobox)loListado._Opciones["cmbOperarioCajacombo"]).SelectedIndex = 1;

                    break;


                case "L_RETIROS":  // retiros
                    ((sage.ew.listados.Listados.Retiros)loListado._Listado)._nArqueo = lnNumero;
                    ((sage.ew.listados.Listados.Retiros)loListado._Listado)._nArqueos = _DicArqueos;

                    // Opción caja
                    if (loListado._Opciones.ContainsKey("cmbOperarioCajacombo"))
                        ((sage.ew.objetos.ewcombobox)loListado._Opciones["cmbOperarioCajacombo"]).SelectedIndex = 1;  // Caja

                    break;


                case "VEN_CA":  // Ventas Familia 

                    VentasClienteArticulo loVentasClienteArticulo = (VentasClienteArticulo)loListado._Listado;
                    loVentasClienteArticulo._nArqueo = lnNumero;
                    loVentasClienteArticulo._nArqueos = _DicArqueos;
                    loVentasClienteArticulo._lMostrarSoloArtSinCodif = false;
                    loVentasClienteArticulo._DescuentoProntoPago = true; // Activamos la opción para que tenga en cuenta el pronto pago al calcular los importes

                    // Definir el filtro de la familia
                    if (loListado._Filtros.ContainsKey("txtFamiliaDesdeHasta") && !String.IsNullOrEmpty(lcDescripcion))
                    {
                        int lnLenFamilia = Convert.ToInt32(EW_GLOBAL._GetLenCampo(KeyDiccionarioLenCampos.wn_familia));  //PE-94117
                        String lcCodigo = lcDescripcion.Substring(0, lnLenFamilia);
                        if (!String.IsNullOrEmpty(lcCodigo))
                        {
                            // PE-94944
                            string lcFamiliaArtSinCodif = "SIN CODIFICAR";
                            if (lcCodigo != lcFamiliaArtSinCodif.Substring(0, lnLenFamilia))
                            {
                                // Si la familia sobre la que estamos situado es una familia concreta, acotaremos el listado de ventas cliente/artículo por familias
                                ConfiguradorFiltroVisual loFiltroCobro = new ConfiguradorFiltroVisual();
                                loFiltroCobro._Unico = Convert.ToString(lcCodigo);

                                ((IEwFiltro)loListado._Filtros["txtFamiliaDesdeHasta"])._SetValuesFrom_ConfiguradorFiltroVisual(loFiltroCobro);
                            }
                            else
                            {
                                // Si la familia sobre la que estamos situado es "SIN CODIFICAR" el importe mostrado corresponde al importe acumulado en ventas de artículos sin codificar por tanto marcaremos en el objeto
                                // de negocio del listado de ventas cliente/articulo que estamos en este caso especial (recordar que visualmente no se puede acotar este listado de esta manera, no es posible
                                // decirle visualmente que únicamente se muestren las ventas de artículos sin codificar).
                                loVentasClienteArticulo._lMostrarSoloArtSinCodif = true;
                            }

                        }
                    }

                    // Añadir el filtro de caja para poder realizar la acotación
                    if (!loListado._Filtros.ContainsKey("txtCajaDesdeHasta"))
                    {
                        sage.ew.txtbox.UserControls.txtCajaDesdeHasta loCaja = new txtbox.UserControls.txtCajaDesdeHasta();
                        loListado._Filtros.Add("txtCajaDesdeHasta", loCaja);
                    }

                    // Ordenado por cliente
                    if (loListado._Opciones.ContainsKey("cmbArticuloClienteco"))
                        ((sage.ew.objetos.ewcombobox)loListado._Opciones["cmbArticuloClienteco"]).SelectedIndex = 1;  // cliente

                    // Iva incluido
                    if (loListado._Opciones.ContainsKey("txtSelIva"))
                        ((sage.ew.txtbox.UserControls.txtSelIva)loListado._Opciones["txtSelIva"])._lIvaIncluido = true;

                    break;


                case "CREDIT_TPV":  // crédito
                    ((sage.ew.listados.Listados.VentasCredito)loListado._Listado)._nArqueo = lnNumero;
                    ((sage.ew.listados.Listados.VentasCredito)loListado._Listado)._nArqueos = _DicArqueos;
                    ((sage.ew.listados.Listados.VentasCredito)loListado._Listado)._lIvaIncluido = true;
                    ((sage.ew.listados.Listados.VentasCredito)loListado._Listado)._nAcreditoAparcados = 0;

                    if (loListado._Opciones.ContainsKey("chTicket") && loListado._Opciones.ContainsKey("chAlbaran") && loListado._Opciones.ContainsKey("chFactura"))
                    {
                        ((sage.ew.objetos.ewcheckbox)loListado._Opciones["chTicket"]).Checked = true;
                        ((sage.ew.objetos.ewcheckbox)loListado._Opciones["chAlbaran"]).Checked = true;
                        ((sage.ew.objetos.ewcheckbox)loListado._Opciones["chFactura"]).Checked = false;
                    }

                    break;


                case "L_ABONOS":  // abonos
                    ((sage.ew.listados.Listados.LineasAbonos)loListado._Listado)._nArqueo = lnNumero;
                    ((sage.ew.listados.Listados.LineasAbonos)loListado._Listado)._nArqueos = _DicArqueos;
                    ((sage.ew.listados.Listados.LineasAbonos)loListado._Listado)._lIvaIncluido = true;

                    if (loListado._Opciones.ContainsKey("cmbOperarioCajacombo"))
                        ((sage.ew.objetos.ewcombobox)loListado._Opciones["cmbOperarioCajacombo"]).SelectedIndex = 0;   // Operario


                    break;


            }

            // Opción desglosado
            if (loListado._Opciones.ContainsKey("cmbAgrupadoDesglosad"))
                ((sage.ew.objetos.ewcombobox)loListado._Opciones["cmbAgrupadoDesglosad"]).SelectedIndex = 1;  // Desglosado


            // Definir el filtro de caja
            ConfiguradorFiltroVisual loFiltroCaja = new ConfiguradorFiltroVisual();
            if (!String.IsNullOrEmpty(lcCajaDesde) && lcCajaDesde == lcCajaHasta)
                loFiltroCaja._Unico = lcCajaDesde;
            else
            {
                loFiltroCaja._Desde = lcCajaDesde;
                loFiltroCaja._Hasta = lcCajaHasta;
            }

            // Definir el filtro de fecha
            ConfiguradorFiltroVisual loFiltroFecha = new ConfiguradorFiltroVisual();
            if (ldFechaDesde == ldFechaHasta)
                loFiltroFecha._Unico = Convert.ToString(ldFechaDesde);
            else
            {
                loFiltroFecha._Desde = Convert.ToString(ldFechaDesde);
                loFiltroFecha._Hasta = Convert.ToString(ldFechaHasta);
            }


            // Definir el filtro de caja
            if (loListado._Filtros.ContainsKey("txtCajaDesdeHasta"))
            {
                ((IEwFiltro)loListado._Filtros["txtCajaDesdeHasta"])._SetValuesFrom_ConfiguradorFiltroVisual(loFiltroCaja);
                sage.ew.txtbox.UserControls.txtCajaDesdeHasta loControlCaja = (sage.ew.txtbox.UserControls.txtCajaDesdeHasta)loListado._Filtros["txtCajaDesdeHasta"];
                loControlCaja._Todos = llTodasCajas;
            }

            // Definir el filtro de fecha
            if (loListado._Filtros.ContainsKey("txtFechaDesdeHasta"))
                ((IEwFiltro)loListado._Filtros["txtFechaDesdeHasta"])._SetValuesFrom_ConfiguradorFiltroVisual(loFiltroFecha);

            loListado._ShowResult();
        }


        private String _makeId(string tcPrefix, String tcDefault, String tcFieldName = "arqueo")
        {
            String lcNumeros = String.Empty;
            String lcCajas = String.Empty;

            if (_Cajas.Count > 0 || _Numeros.Count > 0)
            {
                if (!String.IsNullOrEmpty(tcPrefix)) tcPrefix = String.Format("{0}.", tcPrefix);
                foreach (KeyValuePair<string, string> item in _Cajas)
                {
                    if (!String.IsNullOrEmpty(lcCajas)) lcCajas += " OR ";
                    lcCajas += String.Format("{0}caja = '{1}' ", tcPrefix, item.Value);
                    foreach (KeyValuePair<string, string> itemNum in _Numeros)
                    {
                        if (!String.IsNullOrEmpty(lcNumeros)) lcNumeros += " OR ";
                        lcNumeros += String.Format("{0}{1} = '{2}' ", tcPrefix, tcFieldName, itemNum.Value);
                    }
                    lcCajas = String.Format("{0} AND ({1})", lcCajas, lcNumeros);
                    lcNumeros = String.Empty;
                }
                lcCajas = String.Format("({0})", lcCajas);
            }
            else
            {
                lcCajas = tcDefault;
            }
            return lcCajas;
        }


        private void _UpdateOffLine(Int32 tnEstado)
        {
            String lcSql = "";

            //Marcar registros de TPV!C_ALBVEN
            if (DB.SQLExisteCampo("TPV", "C_ALBVEN", "COM_ESTADO"))
            {
                lcSql = string.Format("UPDATE {0} SET COM_ESTADO = {6} , COM_FECHA = CURRENT_TIMESTAMP FROM {0} a INNER JOIN {1} b ON a.EMPRESA = b.EMPRESA AND a.NUMERO = b.NUMERO AND a.LETRA = b.LETRA AND a.EJERCICIO = {2} WHERE a.COM_ESTADO = 1 AND a.ARQUEO = {3} AND a.EMPRESA = {4} AND a.CAJA = {5} ", DB.SQLDatabase("TPV", "C_ALBVEN"), DB.SQLDatabase("GESTION", "C_ALBVEN"), DB.SQLString(this._lcEjercicioActivo.PadRight(15)), DB.SQLString(this._nNumero), DB.SQLString(this._lcEmpresaActiva), DB.SQLString(this._lcCajaActiva), tnEstado);
                DB.SQLExec(lcSql);
            }

            //Marcar registros de TPV!TIKETS
            if (DB.SQLExisteCampo("TPV", "TIKETS", "COM_ESTADO"))
            {
                lcSql = string.Format("UPDATE {0} SET COM_ESTADO = {5} , COM_FECHA = CURRENT_TIMESTAMP WHERE COM_ESTADO = 1 AND ARQUEO = {1} AND EMPRESA = {2} AND CAJA = {3} AND EJERCICIO = {4} ", DB.SQLDatabase("TPV", "TIKETS"), DB.SQLString(this._nNumero), DB.SQLString(this._lcEmpresaActiva), DB.SQLString(this._lcCajaActiva), DB.SQLString(this._lcEjercicioActivo.PadRight(15)), tnEstado);
                DB.SQLExec(lcSql);
            }

            //Marcar registros de TPV!VALES
            if (DB.SQLExisteCampo("TPV", "VALES", "COM_ESTADO"))
            {
                lcSql = string.Format("UPDATE {0} SET COM_ESTADO = {5} , COM_FECHA = CURRENT_TIMESTAMP WHERE COM_ESTADO = 1 AND ARQUEO = {1} AND EMPRESA = {2} AND CAJA = {3} AND EJERCICIO = {4} ", DB.SQLDatabase("TPV", "VALES"), DB.SQLString(this._nNumero), DB.SQLString(this._lcEmpresaActiva), DB.SQLString(this._lcCajaActiva), DB.SQLString(this._lcEjercicioActivo.PadRight(15)), tnEstado);
                DB.SQLExec(lcSql);
            }

            //Marcar registros de TPV!REPOSI
            if (DB.SQLExisteCampo("TPV", "REPOSI", "COM_ESTADO"))
            {
                lcSql = string.Format("UPDATE {0} SET COM_ESTADO = {5} , COM_FECHA = CURRENT_TIMESTAMP WHERE COM_ESTADO = 1 AND ARQUEO = {1} AND EMPRESA = {2} AND CAJA = {3} AND EJERCICIO = {4} ", DB.SQLDatabase("TPV", "REPOSI"), DB.SQLString(this._nNumero), DB.SQLString(this._lcEmpresaActiva), DB.SQLString(this._lcCajaActiva), DB.SQLString(this._lcEjercicioActivo.PadRight(15)), tnEstado);
                DB.SQLExec(lcSql);
            }

            // Marcar registros de TPV!COB_PAGO
            if (DB.SQLExisteCampo("TPV", "COB_PAGO", "COM_ESTADO"))
            {
                lcSql = string.Format("UPDATE {0} SET COM_ESTADO = {5}, COM_FECHA = CURRENT_TIMESTAMP WHERE COM_ESTADO = 1 AND ARQUEO = {1} AND EMPRESA = {2} AND CAJA = {3} AND EJERCICIO = {4} AND OPERACION ='R' ", DB.SQLDatabase("TPV", "COB_PAGO"), DB.SQLString(this._nNumero), DB.SQLString(this._lcEmpresaActiva), DB.SQLString(this._lcCajaActiva), DB.SQLString(this._lcEjercicioActivo.PadRight(15)), tnEstado);
                DB.SQLExec(lcSql);
            }
        }


        private void _AddBlank(Boolean tlValidate = true)
        {
            Boolean lOk = true;

            if (tlValidate)
            {
                if (_oDtArqueo.Rows.Count > 0)
                {
                    lOk = Convert.ToString(_oDtArqueo.Rows[_oDtArqueo.Rows.Count - 1][0]) != "" || Convert.ToString(_oDtArqueo.Rows[_oDtArqueo.Rows.Count - 1][1]) != "" || Convert.ToString(_oDtArqueo.Rows[_oDtArqueo.Rows.Count - 1][2]) != "" || Convert.ToInt32(_oDtArqueo.Rows[_oDtArqueo.Rows.Count - 1][3]) != 0;
                }
            }

            if (lOk) _oDtArqueo.Rows.Add(_addRow(new Object[] { "", "", "", 0, Navegacion.No }));
        }


        private void AgruparVentas(ref DataTable tdtDetalleVentasArqueo)
        {
            var query = from gventas in tdtDetalleVentasArqueo.AsEnumerable()
                        orderby gventas.Field<string>("FAMILIA"),
                        gventas.Field<string>("NOMBRE"),
                        gventas.Field<string>("DIVISA")
                        group gventas by new
                        {
                            familia = gventas.Field<string>("FAMILIA"),
                            nombre = gventas.Field<string>("NOMBRE"),
                            divisa = gventas.Field<string>("DIVISA")
                        } into gnventas
                        select new
                        {
                            familia = gnventas.Key.familia,
                            nombre = gnventas.Key.nombre,
                            divisa = gnventas.Key.divisa,
                            importe = gnventas.Sum(sum => sum.Field<decimal>("IMPORTE")),
                            importediv = gnventas.Sum(sum => sum.Field<decimal>("IMPORTEDIV"))
                        };

            tdtDetalleVentasArqueo = query.__CopyToDataTable();
        }


        private decimal DesgloseFamilias(DataTable tdtDetalleVentasArqueo)
        {
            decimal lnTotal = 0.0M, lnTotalDiv = 0.0M, lnImporteDiv = 0.0M;

            DataRow row;
            Dictionary<string, object> loDicMoneda = new Dictionary<string, object>();
            int lnDecimalesMascara;
            string lcFamilia;
            string lcMonedaEmp = Convert.ToString(_lcMoneda_Empresa);
            loDicMoneda = _Moneda(lcMonedaEmp);
            string lcMascara = Convert.ToString(loDicMoneda["grantotal"]);

            FUNCTIONS._CalcularVentasProntoPago(ref tdtDetalleVentasArqueo, lcMascara, new List<string>() { "divisa", "preciodiv", "importediv" });

            AgruparVentas(ref tdtDetalleVentasArqueo);

            foreach (DataRow r in tdtDetalleVentasArqueo.Rows)
            {
                if (Convert.ToDecimal(r["importe"]) != 0)
                {
                    string lcMoneda = Convert.ToString(r["divisa"]);

                    if (string.IsNullOrWhiteSpace(lcMoneda)) lcMoneda = this._lcMoneda_Empresa;
                    //PE-77346 Se guardan los valores de la moneda en memoria pues la sql se repite constantemente
                    loDicMoneda = _Moneda(lcMoneda);
                    lnDecimalesMascara = Divisa._Decimals_Mascara(Convert.ToString(loDicMoneda["grantotal"]));
                    lcFamilia = Convert.ToString(r["familia"]);

                    row = this._dtDesg_Familias.NewRow();

                    if (string.IsNullOrWhiteSpace(lcFamilia))
                        row["descripcion"] = "SIN CODIFICAR";
                    else
                        row["descripcion"] = String.Format("{0} {1} {2}", lcFamilia, Convert.ToString(r["nombre"]).Trim(), "(" + getSimboloMoneda(loDicMoneda) + ")");

                    row["moneda"] = r["divisa"];

                    lnImporteDiv = FUNCTIONS._Round(Convert.ToDecimal(r["importediv"]), lnDecimalesMascara);
                    row["importediv"] = lnImporteDiv;

                    //PE-77346 Se guardan los valores de la cotización en memoria pues la sql se repite constantemente
                    row["importe"] = Divisa._DivExacto(_Cotizacion(lcMoneda), Convert.ToDecimal(row["importediv"]), lcMoneda);

                    this._dtDesg_Familias.Rows.Add(row);

                    lnTotal = lnTotal + Convert.ToDecimal(row["importe"]);
                    lnTotalDiv = lnTotalDiv + lnImporteDiv;
                }
            }

            // Esto de cuadrar las ventas por familias con las ventas totales sumandos tiquets, albaranes, facturas el standar solo lo hace cuando estamos
            // consultando lo pendiente de arquear. Cuando consultamos un arqueo ya cerrado no lo hace, por tanto, seguiremos el mismo criterio.
            if (_Numeros.Count == 0)
                // Controlar y corregir descuadres entre total ventas y total desglose familias ...
                if (_nImporteTotalVentas != lnTotal && lnTotal != 0)
                {
                    decimal lnDif = Math.Abs(this._nImporteTotalVentas - lnTotal);
                    if (this._nImporteTotalVentas < lnTotal)
                        lnDif = lnDif * -1;
                    decimal lnImporte2 = Convert.ToDecimal(_dtDesg_Familias.Rows[_dtDesg_Familias.Rows.Count - 1]["importe"]) + lnDif;

                    _dtDesg_Familias.Rows[_dtDesg_Familias.Rows.Count - 1]["importe"] = lnImporte2;

                    if (_llDivisa)
                    {
                        decimal _nImporteTotalVentasDiv = _nImporteTotalVentas;
                        decimal lnDifDiv = Math.Abs(_nImporteTotalVentasDiv - lnTotalDiv);

                        if (_nImporteTotalVentasDiv < lnTotalDiv)
                            lnDifDiv = lnDifDiv * -1;

                        decimal lnImporteDivisaDif = Convert.ToDecimal(_dtDesg_Familias.Rows[_dtDesg_Familias.Rows.Count - 1]["importediv"]) + lnDifDiv;
                    }
                    else
                        _dtDesg_Familias.Rows[_dtDesg_Familias.Rows.Count - 1]["importediv"] = lnImporte2;

                    lnTotal = lnTotal + lnDif;
                }

            return lnTotal;
        }


        private bool _Importe_Documento(DataTable ldt_Cursor, string tcCampoImporteDiv, string tcCampoImporte = "")
        {
            string lcEmpresa = "", lcNumero = "", lcLetra = "";
            bool llRetorno = true;
            ewDocIva docIva;
            
            foreach (DataRow r in ldt_Cursor.Rows)
            {
                lcEmpresa = Convert.ToString(r["empresa"]);
                lcNumero = Convert.ToString(r["numero"]);
                lcLetra = Convert.ToString(r["letra"]);

                if (Convert.ToDecimal(r["pronto"]) > 0.0M || !Convert.ToBoolean(r["iva_inc"]) || Convert.ToBoolean(r["recargo"]) || lcNumero.Substring(lcNumero.Length - 1, 1).ToUpper() != "T")
                {

                    docIva = this.getDocIva(lcEmpresa, lcNumero, lcLetra);
                    r[tcCampoImporteDiv] = docIva.lnTotalConIva;

                    if (!string.IsNullOrWhiteSpace(tcCampoImporte))
                        r[tcCampoImporte] = Divisa._DivExacto(Convert.ToDecimal(r["cambio"]), docIva.lnTotalConIva, Convert.ToString(r["divisa"]));

                    if (this._llDivisa && !string.IsNullOrWhiteSpace(tcCampoImporte) && tcCampoImporte.ToLower().Trim() == "importediv" && Convert.ToString(r["divisa"]) != this._lcMoneda_Empresa)
                    {
                        docIva.lnImporteDiv = Convert.ToDecimal(r[tcCampoImporteDiv]);
                        r[tcCampoImporte] = docIva.lnTotalConIva;
                        r[tcCampoImporteDiv] = docIva.lnImporteDiv;
                    }

                }
            }

            return llRetorno;
        }


        private int _Numero_Tiquets_Aparcados()
        {
            int lnNumTic = 0;

            //DateTime ldFechaActual = System.DateTime.Today;
            lnNumTic = this._Numero_Tiquets_Aparcados(this._Fecha); // 90570

            return lnNumTic;
        }


        private int _Numero_Tiquets_Aparcados(DateTime tdFechaFin)
        {
            int lnNumTic = 0;
            DataTable ldt_Cursor = new DataTable();
            bool llConsulta_Ok = false;

            String lcSql = "select count(a.numero) as total from " + DB.SQLDatabase("tpv", "c_albven") + " a inner join " + DB.SQLDatabase("gestion", "c_albven") + " b " +
                                       "on a.empresa=b.empresa and a.numero=b.numero and a.letra=b.letra and a.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                       "where a.ejercicio=" + DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + " " +
                                       "and a.empresa=" + DB.SQLString(this._lcEmpresaActiva) + " " +
                                       "and a.caja=" + DB.SQLString(this._lcCajaActiva) + " " +
                                       "and b.fecha<=" + DB.SQLString(tdFechaFin) + " " +
                                       "and a.aparcado=1";

            llConsulta_Ok = DB.SQLExec(lcSql, ref ldt_Cursor);
            if (llConsulta_Ok == true)
                lnNumTic = ldt_Cursor.Rows.Count > 0 ? Convert.ToInt32(ldt_Cursor.Rows[0]["total"]) : 0;

            return lnNumTic;
        }


        private bool _Guardar_Arqueo(DataTable dtVentas, String tcTipo)
        {
            bool llRetorno = true;
            tcTipo = tcTipo.PadLeft(3);
            
            // Registros de ventas de tiquets en las diferentes monedas detectadas ...
            foreach (DataRow r in dtVentas.Rows)
            {
                llRetorno = DB.SQLExec("insert into " + DB.SQLDatabase("tpv", "d_arqueo") + " " +
                                        "(usuario,arqueo,ejercicio,empresa,importe,importediv,moneda,tipo) values (" +
                                        DB.SQLString(this._lcUsuarioTablas) + ", " +
                                        DB.SQLString(this._nNumero) + ", " +
                                        DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + ", " +
                                        DB.SQLString(this._lcEmpresaActiva) + ", " +
                                        DB.SQLString(Convert.ToDecimal(r["importe"])) + ", " +
                                        DB.SQLString(Convert.ToDecimal(r["importediv"])) + ", " +
                                        DB.SQLString(Convert.ToString(r["moneda"])) + ", "+
                                        DB.SQLString(tcTipo)+")");
                if (!llRetorno)
                    return false;
            }
            return llRetorno;
        }


        private bool _Guardar_Formas_Cobro()
        {
            bool llRetorno = true;

            foreach (DataRow r in this._dtArqueo_Caja.Rows)
            {
                llRetorno = DB.SQLExec("insert into " + DB.SQLDatabase("tpv", "d_arqueo") + " " +
                                        "(usuario,arqueo,ejercicio,empresa,importe,importediv,moneda,tipo) values (" +
                                        DB.SQLString(this._lcUsuarioTablas) + ", " +
                                        DB.SQLString(this._nNumero) + ", " +
                                        DB.SQLString(this._lcEjercicioActivo.PadRight(15)) + ", " +
                                        DB.SQLString(this._lcEmpresaActiva) + ", " +
                                        DB.SQLString(Convert.ToDecimal(r["importe"])) + ", " +
                                        DB.SQLString(Convert.ToDecimal(r["importediv"])) + ", " +
                                        DB.SQLString(Convert.ToString(r["moneda"])) + " , " +
                                        DB.SQLString("O" + Convert.ToString(r["fcobro"])) + ")");
                if (!llRetorno)
                    return false;
            }
            return llRetorno;
        }


        private int _Seleccionar_Dispositivo(string lcMsg, string lcCaption)
        {
            //PE-90152 Seleccionar impresora
            int lnDispositivo = 0;
            frmSeleccionarImpresora lofrmSeleccionarImpresora = new frmSeleccionarImpresora();

            lofrmSeleccionarImpresora._Label = lcMsg;
            lofrmSeleccionarImpresora._Caption = lcCaption;
            lofrmSeleccionarImpresora._ShowDialog();  //Bug 114218 Cambiar .ShowDialog() por ._ShowDialog() 

            switch (lofrmSeleccionarImpresora.DialogResult)
            {
                case DialogResult.No:   // Impresora
                    this._DialogResult = DialogResult.OK;
                    lnDispositivo = 1;
                    break;

                case DialogResult.Yes:   // Ticket
                    this._DialogResult = DialogResult.OK;
                    lnDispositivo = 2;
                    break;

                case DialogResult.Cancel: // Cancelar -> no fem res
                    this._DialogResult = DialogResult.None;
                    lnDispositivo = -1;
                    break;
            }

            return lnDispositivo;
        }


        private string getSimboloMoneda(Dictionary<string, object> tdicMoneda)
        {
            string lcSimbolo = "";
            if (tdicMoneda.ContainsKey("simbolo"))
            {
                lcSimbolo = Convert.ToString(tdicMoneda["simbolo"]).TrimEnd();
                if(String.IsNullOrWhiteSpace(lcSimbolo) && tdicMoneda.ContainsKey("abrev"))
                    lcSimbolo = Convert.ToString(tdicMoneda["abrev"]).TrimEnd();
            }
            return lcSimbolo;
        }


        #endregion METODOS PRIVADOS


        public class ewDocIva
        {
            public decimal lnTotalSinIva = 0;


            public decimal lnTotalConIva = 0;


            public decimal lnTotalPronto = 0;


            public decimal lnImporteDiv = 0;


            public decimal lnTotalRecFinan = 0;



            public TipoRetencionVentas leTipoRetFiscNoFisc = TipoRetencionVentas.Fiscal;


            public decimal lnRetencionDocPorcen = 0;

            
            public decimal lnRetencionDoc = 0;


            public DataTable ldt_TablaIva = new DataTable();


            public decimal lnTotalPuntoVerde = 0;
        }
    }

    public enum TiposDeArqueos
    {
        Consulta = 1,
        Definitivo = 2
    }


    public enum Navegacion
    {
        No = 0,
        VentasTickets = 1,
        VentasAlbaranes = 2,
        VentasFacturas = 3,
        OperCajaReposiciones = 4,
        OperCajaCobrosTickets = 5,
        OperCajaValesEjecutados = 6,
        OperCajaEntregasCuentaAlbaranes = 7,
        OperCajaCobrosVarios = 8,
        OperCajaCobrosFacturas = 9,
        OperCajaPagosVarios = 10,
        OperCajaPagosFacturas = 11,
        OperCajaRetiradas = 12,
        Caja = 13,
        Familias = 14,
        OperCajaEntregasCuentaPedidos = 15,
        OperCajaListadoCreditos = 16,
        OperCajaListadoAbonos = 17
    }
}