frmPago.cs

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using sage.ew.ewbase;
using sage.ew.global;
using sage.ew.docscompra;
using sage.ew.objetos.UserControls;
using sage.ew.txtbox.UserControls;

// using sage.ew.db;

namespace sage.ew.formul.Forms
{
    public partial class frmPago : FormDialog
    {

        #region PROPIEDADES PUBLICAS

        [DefaultValue(null)]
        public DateTime? _Fecha { get; set; }
        public string _Banco { get; set; }
        public string _Operario { get; set; }
        public string _Fpago { get; set; }
        public decimal _Cambio { get; set; }
        public string _Proveedor = "";
        public bool _lAsiento = false;
        public PrevisionPago prvPago = null;
          
        #endregion


        #region PROPIEDADES PRIVADAS


        private string _lcCajaTPV = Convert.ToString(EW_GLOBAL._GetVariable("wc_cajatpv")).Trim();
        private string _lcOperarioTPV = Convert.ToString(EW_GLOBAL._GetVariable("wc_operariotpv")).Trim();
        private bool _lNoHacerCambio = false;
        private string _lcMonedaEmpresa = Convert.ToString(EW_GLOBAL._GetVariable("wc_moneda")).Trim();
        private DateTime? fechaemision = null;

        #endregion



        #region CONSTRUCTORES

        public frmPago()
        {
            InitializeComponent();

            this._MostrarAccesoFavoritos = false;
            this._MostrarCrearAccesoDirecto = false;
            this._MostrarGestionAccesos = false;

        }

        public frmPago(string tcProveedor = "", bool tlAsiento = false, PrevisionPago prv = null, string tcBanco = "", bool lbUnica = true, DateTime? tdFechaVencim = null)
        {
            InitializeComponent();

            this._MostrarAccesoFavoritos = false;
            this._MostrarCrearAccesoDirecto = false;
            this._MostrarGestionAccesos = false;

            this._Proveedor = tcProveedor;
            this._lAsiento = tlAsiento;
            this.txtBanco._Codigo = "";
            // CCR 153067: La jerarquía del banco a mostrar por defecto en el momento de realizar la acción de Contabilizar pago, 
            // debe ser primero el banco previsión, luego banco del proveedor y por último banco de la empresa
            this.txtBanco._Codigo = tcBanco;
            fechaemision = prv._Fecha_Emision;
            if (prv != null)
            {
                prvPago = prv;
                prvPago._Fecha_Pago = Convert.ToDateTime(txtFecha.Value);
                this.divisaDocumentos1._Documento = prv;
            }
            prv._Fecha_Vencim = tdFechaVencim;

            this.divisaDocumentos1.Visible = true;
            this.divisaDocumentos1._ReadOnlyoCmbDivisa = true;
            if (this.divisaDocumentos1._Divisa == _lcMonedaEmpresa)
            {
                this.divisaDocumentos1.Visible = false;
                this.ewlabel4.Visible = false;
            }

            if (!lbUnica)
                chkFechaVencim.Visible = false;

            _ActualizarCambio();
        }

        #endregion


        #region METODOS PRIVADOS

        protected override void OnShown(EventArgs e)
        {
            string lcCtaCobroEfect = Convert.ToString(EW_GLOBAL._GetVariable("wc_ctacobroefec"));

            base.OnShown(e);

            if (divisaDocumentos1._Divisa == _lcMonedaEmpresa)
            {
                ewfCobro.Top = ewOperario.Top;
                txtFormaCobro.Top = txtOperario1.Top;
                ewOperario.Top = ewBanco.Top;
                txtOperario1.Top = txtBanco.Top;
                ewBanco.Top = divisaDocumentos1.Top + 5;
                txtBanco.Top = divisaDocumentos1.Top + 5;
            }

            // CCR 153067: La jerarquía del banco a mostrar por defecto en el momento de realizar la acción de Contabilizar pago, 
            // debe ser primero el banco previsión, luego banco del proveedor y por último banco de la empresa

            // Se ejecuta una sola vez y lo unico que hace es dar valor a txtProveedor._Codigo y al cambiar el valor ya se desencadena el evento que carga la grid con datos.
            if (string.IsNullOrWhiteSpace(this.txtBanco._Codigo))
            {
                Proveedor loProveed = new Proveedor(this._Proveedor);
                this.txtBanco._Codigo = Convert.ToString(loProveed._Campo("Banco"));
            }

            // Inicialment al banco le damos el valor por defecto en la configuracion de empresa.
            if (string.IsNullOrWhiteSpace(this.txtBanco._Codigo))
                this.txtBanco._Codigo = lcCtaCobroEfect;

            if (!string.IsNullOrWhiteSpace(this._lcCajaTPV))
            {
                // Trabajamos con TPV y caja activa

                // Estos controles operario y forma cobro aparecen solo si se trabaja con TPV
                this.ewOperario.Visible = true;
                this.txtOperario1.Visible = true;
                this.ewfCobro.Visible = true;
                this.txtFormaCobro.Visible = true;

                //T115774
                String lcDivisa;
                lcDivisa = divisaDocumentos1._Divisa;
                if (String.IsNullOrEmpty(lcDivisa)) lcDivisa = _lcMonedaEmpresa;

                txtFormaCobro._PrimeraVez = true;
                txtFormaCobro._Refresh();

                // Ponemos la cuenta de caja por defecto de la aplicación
                this.txtBanco._Codigo = Convert.ToString(EW_GLOBAL._GetVariable("wc_ctacajatpv"));

                // Operario por dfeecto de TPV
                this.txtOperario1._Codigo = this._lcOperarioTPV;

                string lcFormaCobroEfectivo = "";
                string lcCuentaCobroEfectivo = "";

                // Miramos si la caja activa tiene forma de cobro efectivo y si la encontramos la ponemos en txtFormaPago y su cuenta de cobro respectiva
                // la ponemos en txtBanco
                sage.ew.tpv.FormasCobro loFormaCobro = new sage.ew.tpv.FormasCobro();
                loFormaCobro._Devolver_Datos_FCobro_Efectivo_Caja_Activa(ref lcFormaCobroEfectivo, ref lcCuentaCobroEfectivo, lcDivisa);

                if (!string.IsNullOrWhiteSpace(lcCuentaCobroEfectivo))
                    this.txtBanco._Codigo = lcCuentaCobroEfectivo;

                if (!string.IsNullOrWhiteSpace(lcFormaCobroEfectivo))
                    this.txtFormaCobro._Codigo = lcFormaCobroEfectivo;
            }
            else
            {
                // Si no estamos en una caja de TPV se oculta el contorl de forma de cobro y operario.
                this.ewOperario.Visible = false;
                this.txtOperario1.Visible = false;
                this.ewfCobro.Visible = false;
                this.txtFormaCobro.Visible = false;

                this.Height -= 60;
            }

            this.divisaDocumentos1._CambioCotizacion += new objetos.UserControls.DivisaDocumentos._CambioCotizacion_Handler(divisaDocumentos1__CambioCotizacion);
            this.txtFecha.ValueChanged +=new EventHandler(txtFecha_ValueChanged);
       
        }

        private void divisaDocumentos1__CambioCotizacion(object sender, DivisaEventArgs e)
        {
            string divisa = e._Divisa;

            this.divisaDocumentos1._Divisa = divisa;
        }

    
        private void _ActualizarCambio()
        {
            Proveedor loProv = new Proveedor(this._Proveedor);

            if (this.divisaDocumentos1._Divisa != _lcMonedaEmpresa)
            {
                //Cambio
                decimal ldCambio = loProv._CambioPactado(this.divisaDocumentos1._Divisa, Convert.ToDateTime(this.txtFecha.Value));
                this.divisaDocumentos1._Cambio = ldCambio;
                eTipoCambio leTipoCambio = eTipoCambio.Indeterminado;
                decimal lnValCambio = loProv._CambioPactado(this.divisaDocumentos1._Divisa, Convert.ToDateTime(this.txtFecha.Value), out leTipoCambio);
                this.divisaDocumentos1._TipoCambio = leTipoCambio;
                this.divisaDocumentos1._Documento._oDivisa._Codigo = this.divisaDocumentos1._Divisa;
                this.divisaDocumentos1.oNudCotizaValue = divisaDocumentos1._Cambio;
            }
        }


        private void txtBanco__Codigo_Cambiado()
        {
            if (!string.IsNullOrWhiteSpace(this._lcCajaTPV))
                this.Buscar_FormaPago(false, this.txtBanco._Codigo);
        }

        private void txtFormaCobro__Codigo_Cambiado()
        {
            if (!string.IsNullOrWhiteSpace(this._lcCajaTPV))
                this.Buscar_FormaPago(true, this.txtFormaCobro._Codigo);
        }

        private void Buscar_FormaPago(bool tlDesde, string tcCodigo)
        {
            if (string.IsNullOrWhiteSpace(tcCodigo))
                return;

            if (this._lNoHacerCambio)
                return;

            if (tlDesde)
            {
                // A partir de la forma de cobro se tiene que calcular la cuenta
                sage.ew.tpv.FormasCobro loFCob = new sage.ew.tpv.FormasCobro();
                loFCob._Codigo = tcCodigo;
                loFCob._Load();
                string lcCuenta = Convert.ToString(loFCob._Campo("cuenta"));
                if (!string.IsNullOrWhiteSpace(lcCuenta) && !string.IsNullOrWhiteSpace(this.txtBanco._Codigo) && lcCuenta != this.txtBanco._Codigo)
                {
                    DialogResult loResult = this._MessageBox("La cuenta de pago de esta forma de pago es diferente a la introducida.\n¿ Desea cambiarla ?", MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1, DialogResult.No);
                    if (loResult == DialogResult.Yes)
                    {
                        this._lNoHacerCambio = true;
                        this.txtBanco._Codigo = lcCuenta;
                        this._lNoHacerCambio = false;
                    }
                }
            }
            else
            {
                // A partir de la cuenta se tiene que calcular la forma de cobro    

                // Averiguo la primera forma de cobro que encuentre que tenga como cuenta la declarada.
                sage.ew.tpv.FormasCobro loFCob = new sage.ew.tpv.FormasCobro();
                string lcFormaCobro = loFCob._Devolver_FCobro_Cuenta(tcCodigo);
                string lcCuenta = "";
                if (!string.IsNullOrWhiteSpace(lcFormaCobro))
                {
                    this._lNoHacerCambio = true;
                    this.txtFormaCobro._Codigo = lcFormaCobro;
                    this._lNoHacerCambio = false;
                }
                else
                {
                    // Si no se encuentra ninguna forma de cobro con la cuenta declarada, ponemos directamente la forma de cobro de efectivo
                    lcFormaCobro = "";
                    lcCuenta = "";

                    String lcDivisa;
                    lcDivisa = divisaDocumentos1._Divisa;
                    if (String.IsNullOrEmpty(lcDivisa)) lcDivisa = _lcMonedaEmpresa;

                    loFCob._Devolver_Datos_FCobro_Efectivo_Caja_Activa(ref lcFormaCobro, ref lcCuenta, lcDivisa);
                    if (!string.IsNullOrWhiteSpace(lcFormaCobro))
                    {
                        this._lNoHacerCambio = true;
                        this.txtFormaCobro._Codigo = lcFormaCobro;
                        this._lNoHacerCambio = false;
                    }

                }

            }
        }

        private void txtFecha_ValueChanged(object sender, EventArgs e)
        {
            if (chkFechaVencim.Checked && txtFecha.Value != prvPago._Fecha_Vencim)
            {
                chkFechaVencim.Checked = false;
                txtFecha.Value = Convert.ToDateTime(txtFecha.Value);
            }

            _ActualizarCambio();
        }


        private void btDocCancelar1_Click(object sender, EventArgs e)
        {
            _Fecha = null;
            _Banco = "";
            _Operario = "";
            _Fpago = "";
            _Cambio = 0;
            prvPago._Fecha_Emision = fechaemision;
        }


        private void btDocAceptar1_Click(object sender, EventArgs e)
        {
            // Comprobamos que todo esté correcto antes de proceder a asentar.
            if (!this._Comprobaciones_Previas())
            {
                this.DialogResult = DialogResult.None;
                return;
            }

            _Fecha = Convert.ToDateTime(this.txtFecha.Text);
            _Banco = Convert.ToString(this.txtBanco._Codigo);
            _Operario = Convert.ToString(this.txtOperario1._Codigo);
            _Fpago = Convert.ToString(this.txtFormaCobro._Codigo);
            _Cambio = Convert.ToDecimal(this.divisaDocumentos1._Cambio);
        }


        private bool _Comprobaciones_Previas()
        {
            bool llOk = true;
            string lcMensaje = "", lcMensaje2 = "";

            if (!_lAsiento)
            {
                if (string.IsNullOrWhiteSpace(lcMensaje))
                {
                    if (string.IsNullOrWhiteSpace(txtBanco._Codigo))
                        lcMensaje = "Es necesario especificar la cuenta de banco o caja.";
                }

                if (string.IsNullOrWhiteSpace(lcMensaje))
                {
                    if (!string.IsNullOrWhiteSpace(this._lcCajaTPV) && string.IsNullOrWhiteSpace(this.txtOperario1._Codigo))
                        lcMensaje = "No se ha entrado el operario.";
                }

                if (string.IsNullOrWhiteSpace(lcMensaje))
                {
                    if (!string.IsNullOrWhiteSpace(this._lcCajaTPV) && string.IsNullOrWhiteSpace(this.txtFormaCobro._Codigo))
                        lcMensaje = "No se puede generar el pago si no se introduce la forma de pago.";
                }

                if (string.IsNullOrWhiteSpace(lcMensaje))
                {
                    string lcCuentaBanco = Convert.ToString(EW_GLOBAL._GetVariable("wc_banco"));
                    string lcCuentaCaja = Convert.ToString(EW_GLOBAL._GetVariable("wc_caja"));
                    string lcCuentaEfec_dto = EW_GLOBAL._GetVariable("wc_efec_dto").ToString(); // DEUDAS POR EFECTOS DESCONTADOS
                    string lcCtapuente = EW_GLOBAL._GetVariable("wc_ctapuente").ToString(); // CUENTA PUENTE STANDARD

                    if (txtBanco._Codigo.Substring(0, 2) != lcCuentaBanco.Substring(0, 2) && txtBanco._Codigo.Substring(0, 2) != lcCuentaCaja.Substring(0, 2) &&
                        txtBanco._Codigo.Substring(0, 2) != lcCuentaEfec_dto.Substring(0, 2) && txtBanco._Codigo.Substring(0, 2) != lcCtapuente.Substring(0, 2))
                        lcMensaje2 = "Esta cuenta no pertenece a un banco o caja.\n\n¿ Desea continuar con esta cuenta ?";
                    // Preguntaremos si se da por buena o no, es una caso especial
                }
            }

            llOk = string.IsNullOrWhiteSpace(lcMensaje);

            if (!llOk)
                this._MessageBox(lcMensaje, MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1, DialogResult.None);
            else
            {
                llOk = string.IsNullOrWhiteSpace(lcMensaje2);
                if (!llOk)
                {
                    DialogResult loDlgResult = this._MessageBox(lcMensaje2, MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button2, DialogResult.None);
                    llOk = (loDlgResult == DialogResult.Yes);
                }
            }

            return llOk;
        }



        #endregion

        private void chkFechaVencim_Click(object sender, EventArgs e)
        {
            if (chkFechaVencim.Checked)
            {
                txtFecha.Value = Convert.ToDateTime(prvPago._Fecha_Vencim);
            }
            else
            {
                txtFecha.Value = Convert.ToDateTime(DateTime.Now);
            }
            divisaDocumentos1._Documento = prvPago;
        }
    }
}