using Exferia_Aplicacion.General;
using Exferia_Aplicacion.Visualizacion;
using Exferia_EntityFramework;
using Exferia_Formularios;
using Exferia_General;
using Exferia_Personal._1_Modelos;
using Exferia_Personal._2_Datos;
using Exferia_Personal.General;
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Globalization;
using System.Linq;
using System.Reflection;
using System.Text;
using System.Threading;
using System.Threading.Tasks;
using System.Transactions;
using System.Windows.Forms;
using static Exferia_Aplicacion.General.Enumerados;

namespace Exferia_Personal._4_Vistas.Controladora
{
    public class P_NominaPago_Controladora
    {
        #region Variables Generales
        private P_NominaPago g_frm_P_NominaPago;//Variable que enlaza con la pantalla asociada
        private PE_Esperando g_frm_PE_Esperando;//Pantalla de Espera, para cuando se ejecutan tareas pesadas como cargar, guardar, etc

        //Clases de dato necesarias
        private PER_Nominas_Datos g_obj_PER_Nominas_Datos = new PER_Nominas_Datos();
        private PER_NominasPagos_Datos g_obj_PER_NominasPagos_Datos = new PER_NominasPagos_Datos();
        private PER_NominasVencimientos_Datos g_obj_PER_NominasVencimientos_Datos = new PER_NominasVencimientos_Datos();

        //Modelo necesarios
        public PER_NominasPagos g_mdl_PER_NominasPagos = null;
        public GEN_EjerciciosActivos_Empresa g_mdl_GEN_EjerciciosActivos_Empresa = null;
        public INTERNO_PER_Nominas_Modelo g_mdl_INTERNO_PER_Nominas_Modelo = null;
        public INTERNO_PER_NominasVencimientos_Modelo g_mdl_INTERNO_PER_NominasVencimientos_Modelo = null;

        public bool g_bol_Termino_CargaDatos_Inicial = false;//Se utiliza para saber cuando se termina la carga de datos estaticos inciales

        
        //Tarea Asincrona de carga de datos
        private BackgroundWorker g_obj_TareaAsincrona_CargarDatos;

        //Tareea Asincrona de grabar de datos
        public BackgroundWorker g_obj_TareaAsincrona_GrabarDatos;
        public bool g_bol_GrabarDatos_TerminoCorrectamente = true;
        private bool g_bol_VolverAlListado = true;

        //Tareea Asincrona de borrar de datos
        private BackgroundWorker g_obj_TareaAsincrona_BorrarDatos;

        //Tarea Asincrona de Rellenar Nomina
        private BackgroundWorker g_obj_TareaAsincrona_RellenarDatos_Nomina;

        //Tarea Asincrona de Rellenar Vencimiento
        private BackgroundWorker g_obj_TareaAsincrona_RellenarDatos_Vencimiento;

        //Tarea Asincrona para la Actualizacion fecha Confirmacion Pagos
        private BackgroundWorker g_TareaAsincrona_Actualizar_FechaConfirmacion_Pagos;

        //Ejercicio
        public long g_lng_idEjercicio = -1;
        public long g_lng_idDelegacion = -1;
        public long g_lng_idEmpleado = -1;

        //Datos de de Cerrado y Volcado
        public List<CTA_VolcadoCabecera> g_lst_CTA_VolcadoCabecera = null;
        public string g_str_Estado = Variables.G_STR_ESTADO_CONTABILIDAD_ABIERTO;
        public G_ENUM_VALIDACIONFECHAS_TIPOCIERRE g_obj_ENUM_VALIDACIONFECHAS_TIPOCIERRE = G_ENUM_VALIDACIONFECHAS_TIPOCIERRE.Ninguno;


        public bool g_bol_CargandoDatosNomina = false;
        #endregion

        #region Enumerados
        public enum G_ENUM_NIVELES
        {
            Inicio = 0,
            Nomina = 1,
            Vencimento = 2,
            RestoDatos = 3
        }
        public enum G_ENUM_ACCIONES_BLOQUEO
        {
            Bloquear_NoActual = 0,
            Bloquear_SiActual = 1,
            Desbloquear_SiActual = 2
        }
        public enum G_ENUM_ACCIONES_VACIADO
        {
            Vaciar_NoActual = 0,
            Vaciar_SiActual = 1
        }
        #endregion

        #region Constructor
        public P_NominaPago_Controladora(P_NominaPago _frm_P_NominaPago)
        {
            g_frm_P_NominaPago = _frm_P_NominaPago;

            g_bol_Termino_CargaDatos_Inicial = true;
        }
        #endregion

        #region Datos Iniciales
        public void Datos_PorDefecto()
        {
            try
            {
                //Fecha
                g_frm_P_NominaPago.Exferia_FechaSeleccion_Fecha.Exferia_FechaSeleccion_Fecha = g_frm_P_NominaPago.P_Base_FechaTrabajo.ToString("dd/MM/yyyy");

                //Delegacion
                if (g_frm_P_NominaPago.P_Base_ValoresGenerales.Delegacion != null)
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_Id = g_frm_P_NominaPago.P_Base_ValoresGenerales.Delegacion.id;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_Codigo = g_frm_P_NominaPago.P_Base_ValoresGenerales.Delegacion.codigo;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_Descripcion = g_frm_P_NominaPago.P_Base_ValoresGenerales.Delegacion.descripcion;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_FechaBorrado = g_frm_P_NominaPago.P_Base_ValoresGenerales.Delegacion.fechaBorrado;
                }

                //Ejercicio
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Id = g_mdl_GEN_EjerciciosActivos_Empresa.id;
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Codigo = g_mdl_GEN_EjerciciosActivos_Empresa.anioControl;
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_GEN_EjerciciosActivos_Empresa.descripcion;
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_GEN_EjerciciosActivos_Empresa.fechaBorrado;
                g_lng_idEjercicio = g_mdl_GEN_EjerciciosActivos_Empresa.id;


                Bloquea_Desbloquea(G_ENUM_NIVELES.Nomina, G_ENUM_ACCIONES_BLOQUEO.Desbloquear_SiActual);
                Nomina_Actualizar_DatosFiltro();

                //CTA_PredefinidosCabeceras_Cobro
                //Cargamos el ensamblado #########################################################################################################################################################################
                Assembly m_assembly_1 = Assembly.LoadFrom(Variables.G_STR_LIBRERIA_RUTAINICIAL + @"\" + Variables.G_STR_LIBRERIA_CONTABILIDAD + ".dll");
                //Obtenemos el tipo de la clase
                Type m_type_1 = m_assembly_1.GetType("" + Variables.G_STR_LIBRERIA_CONTABILIDAD + "." + Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD);
                //creamos la instancia
                var obj_Clase_1 = Activator.CreateInstance(m_type_1);
                //Cargamos el metodo solicitado
                MethodInfo obj_MethodInfo_1 = obj_Clase_1.GetType().GetMethod(Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD_PROCEDIMIENTO_CTAPREDEFINIDOCABECERA_OBTENERMODELO_POR_DEFECTO, BindingFlags.Instance | BindingFlags.NonPublic);

                //Obtener valores
                object[] arr_Parametros_1 = { Variables.G_PREDEFINIDOFICHEROS_PAGONOMINAS.Id };

                //Pasamos los parametros al metodo y lo ejecutamos
                CTA_PredefinidosCabeceras mdl_CTA_PredefinidosCabeceras_Pago = (CTA_PredefinidosCabeceras)obj_MethodInfo_1.Invoke(obj_Clase_1, arr_Parametros_1);
                //##################################################################################################################################################################################################

                if (mdl_CTA_PredefinidosCabeceras_Pago != null &&
                        mdl_CTA_PredefinidosCabeceras_Pago.idPredefinidoFichero != null &&
                        mdl_CTA_PredefinidosCabeceras_Pago.idPredefinidoFichero.Value.Equals(Variables.G_PREDEFINIDOFICHEROS_PAGONOMINAS.Id))
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Id = mdl_CTA_PredefinidosCabeceras_Pago.id;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Codigo = mdl_CTA_PredefinidosCabeceras_Pago.codigo;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Descripcion = mdl_CTA_PredefinidosCabeceras_Pago.descripcion;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_FechaBorrado = mdl_CTA_PredefinidosCabeceras_Pago.fechaBorrado;
                }
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(Datos_PorDefecto));
            }
            finally
            {
                g_frm_P_NominaPago.P_Base_SeModificoDatosPantalla = false;
            }
        }
        #endregion

        #region Vaciar Datos
        public void Vaciar_Datos(G_ENUM_NIVELES _enum_Nivel, G_ENUM_ACCIONES_VACIADO _enum_Accion, bool _bol_DesbloquearTodo, bool _bol_VaciarHijos)
        {
            //Inicio
            if (G_ENUM_NIVELES.Inicio.Equals(_enum_Nivel))
            {
                g_lng_idEjercicio = -1;
                g_lng_idDelegacion = -1;
                g_lng_idEmpleado = -1;

                g_str_Estado = Variables.G_STR_ESTADO_CONTABILIDAD_ABIERTO;
                g_lst_CTA_VolcadoCabecera = null;
                g_obj_ENUM_VALIDACIONFECHAS_TIPOCIERRE = G_ENUM_VALIDACIONFECHAS_TIPOCIERRE.Ninguno;

                g_mdl_PER_NominasPagos = null;

                //Advertencia Ejercicio
                g_frm_P_NominaPago.Exferia_Label_SinColor_Advertencia_Ejercicio.Text = "";

                //Remesado
                g_frm_P_NominaPago.Exferia_Label_SinColor_Remesado.Text = "";

                //Codigo
                g_frm_P_NominaPago.Exferia_TextBox_Codigo.Text = "";

                //Bloqueo los Controles
                SoloLectura.Empezar(g_frm_P_NominaPago, false);
                g_frm_P_NominaPago.Exferia_Button_Grabar.Enabled = true;
                g_frm_P_NominaPago.Exferia_Button_Borrar.Enabled = true;

                //Ejercicio
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Id = -1;
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Codigo = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Descripcion = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_FechaBorrado = null;

                //Delegacion
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_Id = -1;
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_Codigo = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_Descripcion = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_FechaBorrado = null;

                //Empleado
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Empleado.Exferia_F3_SoloSeleccion_Id = -1;
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Empleado.Exferia_F3_SoloSeleccion_Codigo = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Empleado.Exferia_F3_SoloSeleccion_Descripcion = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Empleado.Exferia_F3_SoloSeleccion_FechaBorrado = null;

                //Predefinido
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Id = -1;
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Codigo = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Descripcion = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_FechaBorrado = null;

                //Desbloquea todo
                if (_bol_DesbloquearTodo)
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Enabled = true;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Enabled = true;
                    g_frm_P_NominaPago.Panel_DatosPantalla.Enabled = true;
                }

                //Vaciar Nomina
                if (_bol_VaciarHijos)
                {
                    Vaciar_Datos(G_ENUM_NIVELES.Nomina, G_ENUM_ACCIONES_VACIADO.Vaciar_SiActual, false, _bol_VaciarHijos);
                }
            }
            //Nomina
            else if (G_ENUM_NIVELES.Nomina.Equals(_enum_Nivel))
            {

                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_RELACIONADOS_Padre_OPCION = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_RELACIONADOS_Padre_ID = -1;

                g_mdl_INTERNO_PER_Nominas_Modelo = null;

                //Vaciar_SiActual
                if (G_ENUM_ACCIONES_VACIADO.Vaciar_SiActual.Equals(_enum_Accion))
                {
                    //F3 de Nomina
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Id = -1;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Codigo = "";
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_FechaBorrado = null;

                    //Actualizar el control de Resumen de Nomina
                    g_frm_P_NominaPago.CTU_Cartera_NominaPago.Rellenar_DataGrid(G_ENUM_CTU_CARTERA_PERSONAL_TIPODOCUMENTOFILTRO.Nomina, -1, true);
                }

                //Vaciar Vencimientos
                if (_bol_VaciarHijos)
                {
                    Vaciar_Datos(G_ENUM_NIVELES.Vencimento, G_ENUM_ACCIONES_VACIADO.Vaciar_SiActual, false, _bol_VaciarHijos);
                }
            }
            //Vencimiento
            else if (G_ENUM_NIVELES.Vencimento.Equals(_enum_Nivel))
            {
                g_mdl_INTERNO_PER_NominasVencimientos_Modelo = null;

                g_frm_P_NominaPago.Exferia_TextBox_Codigo.Text = "";

                //Tesoreria
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Id = -1;
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Codigo = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Descripcion = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_FechaBorrado = null;

                g_frm_P_NominaPago.Exferia_TextBox_Observaciones.Text = "";

                g_frm_P_NominaPago.Exferia_FechaSeleccion_Confirmado.Exferia_FechaSeleccion_Fecha = "";

                //ClaveAnalitica
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Id = -1;
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Codigo = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Descripcion = "";
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_FechaBorrado = null;

                g_frm_P_NominaPago.Exferia_TextBox_Importe.Text = "";

                if (G_ENUM_ACCIONES_VACIADO.Vaciar_SiActual.Equals(_enum_Accion))
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Id = -1;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Codigo = "";
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Descripcion = "";
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_FechaBorrado = null;
                }
            }

            if (_bol_DesbloquearTodo)
            {
                string[] str_Separador = new string[] { " [" };
                //Si ya hay valores de objeto, los elimino para rellenarlos de nuevo
                if (g_frm_P_NominaPago.P_Base_TituloPantalla.Split(str_Separador, StringSplitOptions.None).Count() > 1)
                {
                    g_frm_P_NominaPago.P_Base_TituloPantalla = (g_frm_P_NominaPago.P_Base_TituloPantalla.Split(str_Separador, StringSplitOptions.None))[0];
                }

                //Actualizar el Boton de Seleccion de pantalla ####################################################
                Variables.G_EMS_CONTROL_MENUSUPERIOR.Update_Texto_NombrePantalla(g_frm_P_NominaPago.Tag.ToString());
                //#################################################################################################
            }
        }
        #endregion

        #region Bloquear/Desbloquear
        public void Bloquea_Desbloquea(G_ENUM_NIVELES _enum_Nivel, G_ENUM_ACCIONES_BLOQUEO _enum_Accion)
        {
            //Nomina
            if (G_ENUM_NIVELES.Nomina.Equals(_enum_Nivel))
            {
                //Bloquear_NoActual 
                if (G_ENUM_ACCIONES_BLOQUEO.Bloquear_NoActual.Equals(_enum_Accion))
                {
                    Bloquea_Desbloquea(G_ENUM_NIVELES.Vencimento, G_ENUM_ACCIONES_BLOQUEO.Bloquear_SiActual);

                }
                //Bloquear_SiActual 
                else if (G_ENUM_ACCIONES_BLOQUEO.Bloquear_SiActual.Equals(_enum_Accion))
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Enabled = false;
                    Bloquea_Desbloquea(G_ENUM_NIVELES.Vencimento, G_ENUM_ACCIONES_BLOQUEO.Bloquear_SiActual);

                    Vaciar_Datos(G_ENUM_NIVELES.Nomina, G_ENUM_ACCIONES_VACIADO.Vaciar_SiActual, false, false);
                }
                //Desbloquear_SiActual
                else if (G_ENUM_ACCIONES_BLOQUEO.Desbloquear_SiActual.Equals(_enum_Accion))
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Enabled = true;
                    Bloquea_Desbloquea(G_ENUM_NIVELES.Vencimento, G_ENUM_ACCIONES_BLOQUEO.Bloquear_SiActual);

                    Vaciar_Datos(G_ENUM_NIVELES.Nomina, G_ENUM_ACCIONES_VACIADO.Vaciar_SiActual, false, false);
                }
            }
            //Vancimiento
            else if (G_ENUM_NIVELES.Vencimento.Equals(_enum_Nivel))
            {
                //Bloquear_NoActual 
                if (G_ENUM_ACCIONES_BLOQUEO.Bloquear_NoActual.Equals(_enum_Accion))
                {
                    g_frm_P_NominaPago.Panel_DatosPantalla.Enabled = false;
                }
                //Bloquear_SiActual 
                else if (G_ENUM_ACCIONES_BLOQUEO.Bloquear_SiActual.Equals(_enum_Accion))
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Enabled = false;
                    Bloquea_Desbloquea(G_ENUM_NIVELES.RestoDatos, G_ENUM_ACCIONES_BLOQUEO.Bloquear_SiActual);

                    Vaciar_Datos(G_ENUM_NIVELES.Vencimento, G_ENUM_ACCIONES_VACIADO.Vaciar_SiActual, false, false);
                }
                //Desbloquear_SiActual
                else if (G_ENUM_ACCIONES_BLOQUEO.Desbloquear_SiActual.Equals(_enum_Accion))
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Enabled = true;
                    Bloquea_Desbloquea(G_ENUM_NIVELES.RestoDatos, G_ENUM_ACCIONES_BLOQUEO.Bloquear_SiActual);

                    Vaciar_Datos(G_ENUM_NIVELES.Vencimento, G_ENUM_ACCIONES_VACIADO.Vaciar_SiActual, false, false);
                }
            }
            //Resto de Datos
            else if (G_ENUM_NIVELES.RestoDatos.Equals(_enum_Nivel))
            {
                //Bloquear_NoActual 
                if (G_ENUM_ACCIONES_BLOQUEO.Bloquear_NoActual.Equals(_enum_Accion))
                { }
                //Bloquear_SiActual 
                else if (G_ENUM_ACCIONES_BLOQUEO.Bloquear_SiActual.Equals(_enum_Accion))
                {
                    g_frm_P_NominaPago.Panel_DatosPantalla.Enabled = false;
                }
                //Desbloquear_SiActual
                else if (G_ENUM_ACCIONES_BLOQUEO.Desbloquear_SiActual.Equals(_enum_Accion))
                {
                    g_frm_P_NominaPago.Panel_DatosPantalla.Enabled = true;

                    Vaciar_Datos(G_ENUM_NIVELES.Vencimento, G_ENUM_ACCIONES_VACIADO.Vaciar_NoActual, false, true);
                }
            }
        }
        #endregion

        #region Datos Nominas
        public void Rellenar_Datos_Nomina(long _lng_idNomina)
        {
            try
            {
                //Bloquear el formulario para que no se pueda hacer nada hasta que termine
                g_frm_P_NominaPago.Enabled = false;

                //Mostrar la pantalla de espera
                g_frm_PE_Esperando = new PE_Esperando();

                // Si la tarea asincrona esta en marcha la paro
                if (g_obj_TareaAsincrona_RellenarDatos_Nomina != null)
                {
                    while (g_obj_TareaAsincrona_RellenarDatos_Nomina.IsBusy)
                        Application.DoEvents();
                }
                else
                {
                    g_obj_TareaAsincrona_RellenarDatos_Nomina = new BackgroundWorker();
                    g_obj_TareaAsincrona_RellenarDatos_Nomina.DoWork += new DoWorkEventHandler(TareaAsincrona_RellenarDatos_Nomina_DoWork);
                    g_obj_TareaAsincrona_RellenarDatos_Nomina.RunWorkerCompleted += new RunWorkerCompletedEventHandler(TareaAsincrona_RellenarDatos_Nomina_Completed);
                    g_obj_TareaAsincrona_RellenarDatos_Nomina.WorkerReportsProgress = false;
                }

                //(Tarea Asincrona) Cargar Datos ##################################################################
                g_obj_TareaAsincrona_RellenarDatos_Nomina.RunWorkerAsync(_lng_idNomina);
                //#################################################################################################

                g_frm_PE_Esperando.Show();
            }
            catch (Exception ex)
            {
                g_frm_P_NominaPago.Enabled = true;

                if (g_frm_PE_Esperando != null)
                {
                    g_frm_PE_Esperando.Close();
                    g_frm_PE_Esperando = null;
                }

                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(Rellenar_Datos_Nomina));
            }
        }
        private void TareaAsincrona_RellenarDatos_Nomina_DoWork(object sender, DoWorkEventArgs e)
        {
            try
            {
                long lng_id = (long)e.Argument;

                //Cargar Nomina
                e.Result = RellenarDatos_Nomina_Final(lng_id,false);
            }
            catch (ThreadAbortException ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_RellenarDatos_Nomina_DoWork));
                e.Result = false;
            }
            catch (Control_Errores)
            {
                e.Result = false;
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_RellenarDatos_Nomina_DoWork));
                e.Result = false;
            }
        }
        private void TareaAsincrona_RellenarDatos_Nomina_Completed(object sender, RunWorkerCompletedEventArgs e)
        {
            bool bol_ValorDevuelto = false;

            if (g_frm_PE_Esperando != null)
            {
                g_frm_PE_Esperando.Close();
                g_frm_PE_Esperando = null;
            }

            try
            {
                bol_ValorDevuelto = (bool)e.Result;

                //Mostrar si tuviera algun mensaje
                if (bol_ValorDevuelto == false)
                {
                    Mensajes.MostrarMensaje(Mensajes.G_STR_MENSAJES_GENERAL_ERROR_CARGARDATOSPANTALLA());
                }
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_RellenarDatos_Nomina_Completed));
            }
            finally
            {
                //Desbloquear el Formulario
                g_frm_P_NominaPago.Enabled = true;

                if (bol_ValorDevuelto)
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Foco();
                }
                else
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Foco();
                }
            }
        }

        private bool RellenarDatos_Nomina_Final(long _lng_id, bool _bol_PrimeraCarga)
        {
            bool bol_ValorDevuelto = true;

            try
            {
                g_bol_CargandoDatosNomina = true;

                //Buscar Nomina
                g_mdl_INTERNO_PER_Nominas_Modelo = g_obj_PER_Nominas_Datos.Obtener_Auxiliar(_lng_id);

                if(g_mdl_INTERNO_PER_Nominas_Modelo != null)
                {
                    //Ejercicio
                    if (g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio != null)
                    {
                        g_lng_idEjercicio = g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio.id;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Id = g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio.id;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Codigo = g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio.anioControl;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio.descripcion;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio.fechaBorrado;
                    }

                    //Empleado
                    g_lng_idEmpleado = g_mdl_INTERNO_PER_Nominas_Modelo.MAE_Empleados.id;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Empleado.Exferia_F3_SoloSeleccion_Id = g_mdl_INTERNO_PER_Nominas_Modelo.MAE_Empleados.id;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Empleado.Exferia_F3_SoloSeleccion_Codigo = g_mdl_INTERNO_PER_Nominas_Modelo.MAE_Empleados.codigo;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Empleado.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_INTERNO_PER_Nominas_Modelo.MAE_Empleados.nombre;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Empleado.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_INTERNO_PER_Nominas_Modelo.MAE_Empleados.fechaBorrado;

                    //Delegacion
                    if (g_mdl_INTERNO_PER_Nominas_Modelo.GEN_Delegaciones != null)
                    {
                        g_lng_idDelegacion = g_mdl_INTERNO_PER_Nominas_Modelo.GEN_Delegaciones.id;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_Id = g_mdl_INTERNO_PER_Nominas_Modelo.GEN_Delegaciones.id;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_Codigo = g_mdl_INTERNO_PER_Nominas_Modelo.GEN_Delegaciones.codigo;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_INTERNO_PER_Nominas_Modelo.GEN_Delegaciones.descripcion;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_INTERNO_PER_Nominas_Modelo.GEN_Delegaciones.fechaBorrado;
                    }

                    #region Filtros para Vencimientos
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_RELACIONADOS_Padre_OPCION = Variables.G_STR_OPCION_PER_NOMINA;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_RELACIONADOS_Padre_ID = g_mdl_INTERNO_PER_Nominas_Modelo.id;

                    //Filtrado de Opciones del Padre
                    List<INTERNO_Filtro_OpcionPadre_Modelo> lst_INTERNO_Filtro_OpcionPadre_Modelo = new List<INTERNO_Filtro_OpcionPadre_Modelo>();
                    //Para que busque con el Filtro del estado, que no este abierto
                    lst_INTERNO_Filtro_OpcionPadre_Modelo.Add(new INTERNO_Filtro_OpcionPadre_Modelo(nameof(INTERNO_PER_NominasVencimientos_Listado_Modelo.estado), -1, Variables.G_STR_ESTADO_CONTABILIDAD_ABIERTO));

                    //Para que busque con el Filtro solo los pendientes
                    lst_INTERNO_Filtro_OpcionPadre_Modelo.Add(new INTERNO_Filtro_OpcionPadre_Modelo(nameof(INTERNO_PER_NominasVencimientos_Listado_Modelo.Importe_Pendiente), -1, true));

                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_RELACIONADOS = lst_INTERNO_Filtro_OpcionPadre_Modelo;
                    #endregion

                    #region Si tiene un solo vencimiento se pone
                    if (_bol_PrimeraCarga==false  &&
                        g_mdl_INTERNO_PER_Nominas_Modelo.Vencimientos != null &&
                        g_mdl_INTERNO_PER_Nominas_Modelo.Vencimientos.Count > 0)
                    {
                        AUX_Vencimientos_Importes_Modelo mdl_AUX_Vencimientos_Importes_Modelo= g_mdl_INTERNO_PER_Nominas_Modelo.Vencimientos.Where(m => m.Importe_Pendiente > 0).FirstOrDefault();

                        if (mdl_AUX_Vencimientos_Importes_Modelo != null)
                        {
                            Bloquea_Desbloquea(G_ENUM_NIVELES.RestoDatos, G_ENUM_ACCIONES_BLOQUEO.Desbloquear_SiActual);

                            RellenarDatos_Vencimiento_Final(mdl_AUX_Vencimientos_Importes_Modelo.IdVencimento, false);

                            if (g_mdl_INTERNO_PER_NominasVencimientos_Modelo != null)
                            {
                                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Id = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.id;
                                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Codigo = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.codigo.ToString();
                                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.observaciones;
                                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.fechaBorrado;
                            }
                        }
                    }
                    #endregion

                    Nomina_Actualizar_DatosFiltro();

                    bol_ValorDevuelto = true;
                }
            }
            catch (Control_Errores)
            {}
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(RellenarDatos_Nomina_Final));
            }
            finally
            {
                g_bol_CargandoDatosNomina = false;
            }

            return bol_ValorDevuelto;
        }

        public void Nomina_Actualizar_DatosFiltro()
        {
            //Filtrado de Opciones del Padre
            List<INTERNO_Filtro_OpcionPadre_Modelo> lst_INTERNO_Filtro_OpcionPadre_Modelo = new List<INTERNO_Filtro_OpcionPadre_Modelo>();

            //Para que busque con el Filtro del Ejercicio
            lst_INTERNO_Filtro_OpcionPadre_Modelo.Add(new INTERNO_Filtro_OpcionPadre_Modelo(nameof(INTERNO_PER_Nominas_Listado_Modelo.idEjercicio), g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Id));

            //Para que busque con el Filtro del estado, que no este abierto
            lst_INTERNO_Filtro_OpcionPadre_Modelo.Add(new INTERNO_Filtro_OpcionPadre_Modelo(nameof(INTERNO_PER_Nominas_Listado_Modelo.estado), -1, Variables.G_STR_ESTADO_CONTABILIDAD_ABIERTO));

            //Para que busque con el Filtro del Delegacion
            lst_INTERNO_Filtro_OpcionPadre_Modelo.Add(new INTERNO_Filtro_OpcionPadre_Modelo(nameof(INTERNO_PER_Nominas_Listado_Modelo.idDelegacion), g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Delegacion.Exferia_F3_SoloSeleccion_Id));

            //Para que busque con el Filtro de la Empleado
            lst_INTERNO_Filtro_OpcionPadre_Modelo.Add(new INTERNO_Filtro_OpcionPadre_Modelo(nameof(INTERNO_PER_Nominas_Listado_Modelo.idEmpleado), g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Empleado.Exferia_F3_SoloSeleccion_Id));

            //Para que busque con el Filtro solo los pendientes
            lst_INTERNO_Filtro_OpcionPadre_Modelo.Add(new INTERNO_Filtro_OpcionPadre_Modelo(nameof(INTERNO_PER_Nominas_Listado_Modelo.Importe_Pendiente), -1, true));

            //Filtros para Nomina
            g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_RELACIONADOS = lst_INTERNO_Filtro_OpcionPadre_Modelo;
        }
        #endregion

        #region Datos Vencimiento
        public void Rellenar_Datos_Vencimiento(long _lng_idNominaVencimiento)
        {
            try
            {
                //Bloquear el formulario para que no se pueda hacer nada hasta que termine
                g_frm_P_NominaPago.Enabled = false;

                //Mostrar la pantalla de espera
                g_frm_PE_Esperando = new PE_Esperando();

                // Si la tarea asincrona esta en marcha la paro
                if (g_obj_TareaAsincrona_RellenarDatos_Vencimiento != null)
                {
                    while (g_obj_TareaAsincrona_RellenarDatos_Vencimiento.IsBusy)
                        Application.DoEvents();
                }
                else
                {
                    g_obj_TareaAsincrona_RellenarDatos_Vencimiento = new BackgroundWorker();
                    g_obj_TareaAsincrona_RellenarDatos_Vencimiento.DoWork += new DoWorkEventHandler(TareaAsincrona_RellenarDatos_Vencimiento_DoWork);
                    g_obj_TareaAsincrona_RellenarDatos_Vencimiento.RunWorkerCompleted += new RunWorkerCompletedEventHandler(TareaAsincrona_RellenarDatos_Vencimiento_Completed);
                    g_obj_TareaAsincrona_RellenarDatos_Vencimiento.WorkerReportsProgress = false;
                }

                //(Tarea Asincrona) Cargar Datos ##################################################################
                g_obj_TareaAsincrona_RellenarDatos_Vencimiento.RunWorkerAsync(_lng_idNominaVencimiento);
                //#################################################################################################

                g_frm_PE_Esperando.Show();
            }
            catch (Exception ex)
            {
                g_frm_P_NominaPago.Enabled = true;

                if (g_frm_PE_Esperando != null)
                {
                    g_frm_PE_Esperando.Close();
                    g_frm_PE_Esperando = null;
                }

                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(Rellenar_Datos_Vencimiento));
            }
        }

        private void TareaAsincrona_RellenarDatos_Vencimiento_DoWork(object sender, DoWorkEventArgs e)
        {
            try
            {
                long lng_id = (long)e.Argument;

                // Cargar Vencimiento
                e.Result = RellenarDatos_Vencimiento_Final(lng_id,false);
            }
            catch (ThreadAbortException ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_RellenarDatos_Vencimiento_DoWork));
                e.Result = false;
            }
            catch (Control_Errores)
            {
                e.Result = false;
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_RellenarDatos_Vencimiento_DoWork));
                e.Result = false;
            }
        }
        private void TareaAsincrona_RellenarDatos_Vencimiento_Completed(object sender, RunWorkerCompletedEventArgs e)
        {
            bool bol_ValorDevuelto = false;

            if (g_frm_PE_Esperando != null)
            {
                g_frm_PE_Esperando.Close();
                g_frm_PE_Esperando = null;
            }

            try
            {
                bol_ValorDevuelto = (bool)e.Result;

                //Mostrar si tuviera algun mensaje
                if (bol_ValorDevuelto == false)
                {
                    Mensajes.MostrarMensaje(Mensajes.G_STR_MENSAJES_GENERAL_ERROR_CARGARDATOSPANTALLA());
                }
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_RellenarDatos_Vencimiento_Completed));
            }
            finally
            {
                //Desbloquear el Formulario
                g_frm_P_NominaPago.Enabled = true;

                if (bol_ValorDevuelto)
                {
                    g_frm_P_NominaPago.Exferia_FechaSeleccion_Fecha.Exferia_FechaSeleccion_Foco();
                }
                else
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Foco();
                }
            }
        }

        public bool RellenarDatos_Vencimiento_Final(long _lng_id, bool _bol_PrimeraCarga)
        {
            bool bol_ValorDevuelto = false;

            try
            {
                g_mdl_INTERNO_PER_NominasVencimientos_Modelo = g_obj_PER_NominasVencimientos_Datos.Obtener_Auxiliar(_lng_id);

                if (g_mdl_INTERNO_PER_NominasVencimientos_Modelo != null)
                {
                    //Calcular el Pendiente
                    
                        decimal dcm_Pendiente = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.importe;
                        if (g_mdl_INTERNO_PER_NominasVencimientos_Modelo.Importe_Pagos != null)
                        {
                            dcm_Pendiente -= g_mdl_INTERNO_PER_NominasVencimientos_Modelo.Importe_Pagos.Value;
                        }
                        //Si se esta modificando, hay que tener en cuenta el importe que tenia para calcular el pendiente
                        if (g_mdl_PER_NominasPagos != null)
                        {
                            dcm_Pendiente += g_mdl_PER_NominasPagos.importe;
                        }

                    if (_bol_PrimeraCarga)
                    {
                        g_frm_P_NominaPago.Exferia_TextBox_Importe.Text = string.Format("{0:0.00}", g_mdl_PER_NominasPagos != null ? g_mdl_PER_NominasPagos.importe : dcm_Pendiente);
                    }
                    else
                    {
                        g_frm_P_NominaPago.Exferia_TextBox_Importe.Text = string.Format("{0:0.00}", dcm_Pendiente);
                    }

                    //Tesoreria
                    if (g_mdl_INTERNO_PER_NominasVencimientos_Modelo.MAE_Tesorerias != null)
                    {
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Id = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.MAE_Tesorerias.id;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Codigo = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.MAE_Tesorerias.codigo;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.MAE_Tesorerias.descripcion;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.MAE_Tesorerias.fechaBorrado;
                    }

                    bol_ValorDevuelto = true;
                }
            }
            catch (Control_Errores)
            { }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(RellenarDatos_Vencimiento_Final));
            }

            return bol_ValorDevuelto;
        }
        #endregion

        #region Comprobacion de cambios, para  grabar o no antes de salir o cambiar de registro
        public bool ComprobarCambios()
        {
            if(g_mdl_PER_NominasPagos != null &&
               g_mdl_PER_NominasPagos.PER_NominasRemesasLinea != null &&
               g_mdl_PER_NominasPagos.PER_NominasRemesasLinea.PER_NominasRemesasCabecera != null)
            {
                return true;
            }
            else if (g_frm_P_NominaPago.P_Base_SeModificoDatosPantalla)
            {
                if (Mensajes.MostrarMensaje_Pregunta(Mensajes.G_STR_MENSAJES_GENERAL_PREGUNTA_GUARDARCAMBIOS()))
                {
                    GrabarDatos(false);

                    if (g_obj_TareaAsincrona_GrabarDatos != null)
                    {
                        //Te quedas espernado a que termine la tarea asincrona de grabar
                        while (g_obj_TareaAsincrona_GrabarDatos.IsBusy)
                            Application.DoEvents();
                    }

                    return g_bol_GrabarDatos_TerminoCorrectamente;
                }
            }
            return true;
        }
        public bool ComprobarCambios_SinPreguntar()
        {
            if (g_mdl_PER_NominasPagos != null &&
                g_mdl_PER_NominasPagos.PER_NominasRemesasLinea != null &&
                g_mdl_PER_NominasPagos.PER_NominasRemesasLinea.PER_NominasRemesasCabecera != null)
            {
                return true;
            }
            else
            {
                GrabarDatos(false);

                //Te quedas espernado a que termine la tarea asincrona de grabar
                if (g_obj_TareaAsincrona_GrabarDatos!=null)
                {
                    while (g_obj_TareaAsincrona_GrabarDatos.IsBusy)
                        Application.DoEvents();
                }

                return g_bol_GrabarDatos_TerminoCorrectamente;
            }
        }
        #endregion

        #region Cargar Datos
        public void RecargarDatos()
        {
            try
            {
                //Bloquear el formulario para que no se pueda hacer nada hasta que termine
                g_frm_P_NominaPago.Enabled = false;

                //Mostrar la pantalla de espera
                g_frm_PE_Esperando = new PE_Esperando();

                // Si la tarea asincrona esta en marcha la paro
                if (g_obj_TareaAsincrona_CargarDatos != null)
                {

                    while (g_obj_TareaAsincrona_CargarDatos.IsBusy)
                        Application.DoEvents();
                }
                else
                {
                    g_obj_TareaAsincrona_CargarDatos = new BackgroundWorker();
                    g_obj_TareaAsincrona_CargarDatos.DoWork += new DoWorkEventHandler(TareaAsincrona_CargarDatos_DoWork);
                    g_obj_TareaAsincrona_CargarDatos.RunWorkerCompleted += new RunWorkerCompletedEventHandler(TareaAsincrona_CargarDatos_Completed);
                    g_obj_TareaAsincrona_CargarDatos.WorkerReportsProgress = false;
                }

                //Vaciar
                Vaciar_Datos(G_ENUM_NIVELES.Inicio, G_ENUM_ACCIONES_VACIADO.Vaciar_SiActual, true, true);

                //(Tarea Asincrona) Cargar Datos ##################################################################
                g_obj_TareaAsincrona_CargarDatos.RunWorkerAsync();
                //#################################################################################################

                g_frm_PE_Esperando.ShowDialog();
            }
            catch (Exception ex)
            {
                g_frm_P_NominaPago.Enabled = true;

                if (g_frm_PE_Esperando != null)
                {
                    g_frm_PE_Esperando.Close();
                    g_frm_PE_Esperando = null;
                }

                throw new Control_Errores(Mensajes.G_STR_MENSAJES_GENERAL_ERROR_CARGARDATOSPANTALLA(), ex, nameof(P_NominaPago_Controladora) + "/" + nameof(RecargarDatos), true);
            }
        }

        private void TareaAsincrona_CargarDatos_DoWork(object sender, DoWorkEventArgs e)
        {
            INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_ValorDevuelto_Modelo.TodoCorrecto = true;

            try
            {
                // Cargar Valores
                if (CargarDatos(g_frm_P_NominaPago.P_Base_id) == false)
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_CARGARDATOSPANTALLA();
                }

            }
            catch (ThreadAbortException ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_CargarDatos_DoWork));
                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_CARGARDATOSPANTALLA();
            }
            catch (Control_Errores)
            {
                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_CARGARDATOSPANTALLA();
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_CargarDatos_DoWork));
                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_CARGARDATOSPANTALLA();
            }
            finally
            {
                e.Result = mdl_ValorDevuelto_Modelo;
            }
        }
        private void TareaAsincrona_CargarDatos_Completed(object sender, RunWorkerCompletedEventArgs e)
        {
            if (g_frm_PE_Esperando != null)
            {
                g_frm_PE_Esperando.Close();
                g_frm_PE_Esperando = null;
            }
            //Desbloquear el Formulario
            g_frm_P_NominaPago.Enabled = true;

            try
            {
                INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo_Resultado = (INTERNO_ValorDevuelto_Modelo)e.Result;

                //Mostrar si tuviera algun mensaje
                if (mdl_ValorDevuelto_Modelo_Resultado.TodoCorrecto == false)
                {
                    Mensajes.MostrarMensaje(mdl_ValorDevuelto_Modelo_Resultado.Mensaje);
                    g_frm_P_NominaPago.Salir_P_Base();
                }
                else
                {
                    //Actualizar el control de Resumen de Nomina
                    g_frm_P_NominaPago.CTU_Cartera_NominaPago.Rellenar_DataGrid(G_ENUM_CTU_CARTERA_PERSONAL_TIPODOCUMENTOFILTRO.Nomina, g_mdl_INTERNO_PER_Nominas_Modelo.id, true);


                    //Si el Ejericicio Tuviera CierreAdministrativo o CierreContable tiene que bloquear todo el Formulario
                    g_obj_ENUM_VALIDACIONFECHAS_TIPOCIERRE = Datos_Generales.ComprobarBloquear_EjercicioCierre(g_frm_P_NominaPago,
                                                                                                        g_frm_P_NominaPago.P_Base_ValoresGenerales.EjercicioActivo,
                                                                                                        g_frm_P_NominaPago.P_Base_ValoresGenerales.Ejercicios_Listado.ToList(),
                                                                                                        g_frm_P_NominaPago.Exferia_Label_SinColor_Advertencia_Ejercicio,
                                                                                                        g_mdl_PER_NominasPagos.fecha,
                                                                                                        0);
                    
                }
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_CargarDatos_Completed));
                Mensajes.MostrarMensaje(Mensajes.G_STR_MENSAJES_GENERAL_ERROR_CARGARDATOSPANTALLA());

                g_frm_P_NominaPago.Salir_P_Base();
            }
            finally
            {
                //Hacemos foco al primer control.
                g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Foco();

                //Si no tiene Cierre
                if (g_obj_ENUM_VALIDACIONFECHAS_TIPOCIERRE.Equals(G_ENUM_VALIDACIONFECHAS_TIPOCIERRE.Ninguno))
                {
                    //Remesa
                    if (g_mdl_PER_NominasPagos != null &&
                    g_mdl_PER_NominasPagos.PER_NominasRemesasLinea != null &&
                    g_mdl_PER_NominasPagos.PER_NominasRemesasLinea.PER_NominasRemesasCabecera != null)
                    {
                        //Bloqueo los Controles
                        SoloLectura.Empezar(g_frm_P_NominaPago, true);
                        g_frm_P_NominaPago.Exferia_Button_Grabar.Enabled = false;
                        g_frm_P_NominaPago.Exferia_Button_Borrar.Enabled = false;
                        g_frm_P_NominaPago.Exferia_Button_CerrarAbrir.Enabled = false;
                        g_frm_P_NominaPago.Exferia_Button_Volcado.Enabled = false;
                    }
                    else
                    {
                        //Configurar Cerrar/Abrir Volcado/Desvolcado
                        Mostrar_CerradoVolcado();
                    }   
                }
            }
        }

        public bool CargarDatos(long _lng_id)
        {
            bool bol_ValorDevuelto = true;

            try
            {
                g_mdl_PER_NominasPagos = g_obj_PER_NominasPagos_Datos.Obtener(_lng_id);

                if(g_mdl_PER_NominasPagos != null)
                {
                    //Paginador ................................................................................
                    if (g_frm_P_NominaPago.P_Base_PantallaOrigen != null &&
                        g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_Objetos_Filtrados != null &&
                        g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_Objetos_Filtrados.Count > 0)
                    {
                        long lng_id_ParaPaginacion = g_mdl_PER_NominasPagos.id;
                        int int_PaginaDelObjeto = g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_Objetos_Filtrados.IndexOf(g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_Objetos_Filtrados.Where(n => n.ID.Equals(lng_id_ParaPaginacion)).FirstOrDefault());

                        g_frm_P_NominaPago.g_obj_Funciones_Paginador.SetPaginaActual(int_PaginaDelObjeto);
                        // Asignando al paginador la pagina actual.
                        g_frm_P_NominaPago.Exferia_Paginador_NominaPago.PaginaActual = g_frm_P_NominaPago.g_obj_Funciones_Paginador.GetPaginaActual();
                    }
                    //...........................................................................................

                    //Estado
                    g_str_Estado = g_mdl_PER_NominasPagos.estado;

                    //Datos de la Nomina .......................................................................
                    RellenarDatos_Nomina_Final(g_mdl_PER_NominasPagos.PER_NominasVencimientos.idNomina,true);
                    if (g_mdl_INTERNO_PER_Nominas_Modelo != null)
                    {
                        //Ejercicio
                        if (g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio != null)
                        {
                            g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Id = g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio.id;
                            g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Codigo = g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio.anioControl;
                            g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio.descripcion;
                            g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Ejercicio.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_INTERNO_PER_Nominas_Modelo.Ejercicio.fechaBorrado;
                        }

                        //Nomina
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Id = g_mdl_INTERNO_PER_Nominas_Modelo.id;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Codigo = g_mdl_INTERNO_PER_Nominas_Modelo.codigo.ToString();
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_FechaBorrado = g_mdl_INTERNO_PER_Nominas_Modelo.fechaBorrado;
                    }
                    //.............................................................................................

                    //Datos del Vencimiento .......................................................................
                    RellenarDatos_Vencimiento_Final(g_mdl_PER_NominasPagos.idNominaVencimiento,true);
                    if (g_mdl_INTERNO_PER_NominasVencimientos_Modelo != null)
                    {
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Id = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.id;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Codigo = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.codigo.ToString();
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.observaciones;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.fechaBorrado;
                    }
                    //...........................................................................................

                    //Fecha
                    g_frm_P_NominaPago.Exferia_FechaSeleccion_Fecha.Exferia_FechaSeleccion_Fecha = g_mdl_PER_NominasPagos.fecha.ToString("dd/MM/yyyy");

                    //Tesoreria
                    if (g_mdl_PER_NominasPagos.MAE_Tesorerias != null)
                    {
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Id = g_mdl_PER_NominasPagos.MAE_Tesorerias.id;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Codigo = g_mdl_PER_NominasPagos.MAE_Tesorerias.codigo;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_PER_NominasPagos.MAE_Tesorerias.descripcion;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_PER_NominasPagos.MAE_Tesorerias.fechaBorrado;
                    }
                    else
                    {
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Id = -1;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Codigo = string.Empty;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Descripcion = string.Empty;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_FechaBorrado = null;

                    }

                    //Codigo
                    g_frm_P_NominaPago.Exferia_TextBox_Codigo.Text = g_mdl_PER_NominasPagos.codigo.ToString();

                    //Observaciones
                    g_frm_P_NominaPago.Exferia_TextBox_Observaciones.Text = g_mdl_PER_NominasPagos.observaciones;

                    //confirmado
                    g_frm_P_NominaPago.Exferia_FechaSeleccion_Confirmado.Exferia_FechaSeleccion_Fecha = g_mdl_PER_NominasPagos.confirmado != null ? g_mdl_PER_NominasPagos.confirmado.Value.ToString("dd/MM/yyyy") : "";

                    //ClaveAnalitica
                    if (g_mdl_PER_NominasPagos.CTA_ClavesAnaliticas != null)
                    {
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Id = g_mdl_PER_NominasPagos.CTA_ClavesAnaliticas.id;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Codigo = g_mdl_PER_NominasPagos.CTA_ClavesAnaliticas.codigo;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_PER_NominasPagos.CTA_ClavesAnaliticas.descripcion;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_PER_NominasPagos.CTA_ClavesAnaliticas.fechaBorrado;
                    }
                    else
                    {
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Id = -1;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Codigo = string.Empty;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Descripcion = string.Empty;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_FechaBorrado = null;

                    }

                    //PredefinidoCabecera_Pago
                    if (g_mdl_PER_NominasPagos.CTA_PredefinidosCabeceras != null)
                    {
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Id = g_mdl_PER_NominasPagos.CTA_PredefinidosCabeceras.id;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Codigo = g_mdl_PER_NominasPagos.CTA_PredefinidosCabeceras.codigo;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_PER_NominasPagos.CTA_PredefinidosCabeceras.descripcion;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_PER_NominasPagos.CTA_PredefinidosCabeceras.fechaBorrado;
                    }
                    else
                    {
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Id = -1;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Codigo = string.Empty;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Descripcion = string.Empty;
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_FechaBorrado = null;

                    }

                    //Importe
                    g_frm_P_NominaPago.Exferia_TextBox_Importe.Text = g_mdl_PER_NominasPagos.importe.ToString();

                    //Remesado
                    if (g_mdl_PER_NominasPagos.PER_NominasRemesasLinea!=null && g_mdl_PER_NominasPagos.PER_NominasRemesasLinea.PER_NominasRemesasCabecera != null)
                    {
                        g_frm_P_NominaPago.Exferia_Label_SinColor_Remesado.Text = "Número de la remesa '" + g_mdl_PER_NominasPagos.PER_NominasRemesasLinea.PER_NominasRemesasCabecera.codigo + "' de la fecha '" + g_mdl_PER_NominasPagos.PER_NominasRemesasLinea.PER_NominasRemesasCabecera.fecha.ToString("dd/MM/yyyy") + "'";
                    }
                    

                    // Mostrar Campo en el Titulo de mantenimiento
                    string str_MenuSuperior_Codigo = "";
                    if (g_frm_P_NominaPago.g_mdl_PRV_OpcionesDetalle != null &&
                        g_frm_P_NominaPago.g_mdl_PRV_OpcionesDetalle.camposMostrar_TituloMantenimiento != null &&
                        g_frm_P_NominaPago.g_mdl_PRV_OpcionesDetalle.camposMostrar_TituloMantenimiento.Trim().Length > 0)
                    {
                        //Obtener el Array de Campos
                        string[] arr_Campos = g_frm_P_NominaPago.g_mdl_PRV_OpcionesDetalle.camposMostrar_TituloMantenimiento.Split(new Char[] { ',' });
                        string str_ValorAMostrarFinal = "";

                        string[] str_Separador = new string[] { " [" };
                        //Si ya hay valores de objeto, los elimino para rellenarlos de nuevo
                        if (g_frm_P_NominaPago.P_Base_TituloPantalla.Split(str_Separador, StringSplitOptions.None).Count() > 1)
                        {
                            g_frm_P_NominaPago.P_Base_TituloPantalla = (g_frm_P_NominaPago.P_Base_TituloPantalla.Split(str_Separador, StringSplitOptions.None))[0];
                        }

                        dynamic dnm_Objeto = g_mdl_PER_NominasPagos;
                        foreach (string str_campo in arr_Campos)
                        {
                            var Valor = dnm_Objeto.GetType().GetProperty(str_campo).GetValue(dnm_Objeto, null);
                            if (Valor != null)
                            {
                                str_ValorAMostrarFinal += " " + Valor;
                            }

                            // importe
                            if (str_campo.Equals(nameof(g_mdl_PER_NominasPagos.importe)))
                            {
                                str_MenuSuperior_Codigo = g_mdl_PER_NominasPagos.importe.ToString();
                            }
                        }
                        if (str_ValorAMostrarFinal != "")
                        {
                            g_frm_P_NominaPago.P_Base_TituloPantalla += " [" + str_ValorAMostrarFinal + "] -Modificar";
                        }
                    }

                    //Actualizar el Boton de Seleccion de pantalla ####################################################
                    Variables.G_EMS_CONTROL_MENUSUPERIOR.Add_Texto_NombrePantalla_Descripciones(g_frm_P_NominaPago.Tag.ToString(), str_MenuSuperior_Codigo);
                    //#################################################################################################

                    g_frm_P_NominaPago.P_Base_SeModificoDatosPantalla = false;
                }
            }
            catch (Control_Errores)
            {
                bol_ValorDevuelto = false;
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(CargarDatos));
                bol_ValorDevuelto = false;
            }

            return bol_ValorDevuelto;
        }
        #endregion

        #region Grabar Datos
        public void GrabarDatos(bool _bol_VolverAlListado)
        {
            try
            {
                //Validacion para Aviso ..................................................
                INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo = Validar_ParaAvisos();
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto == false)
                {
                    if (mdl_ValorDevuelto_Modelo.Mensaje.Trim().Length > 0)
                    {
                        if (Mensajes.MostrarMensaje_Pregunta(mdl_ValorDevuelto_Modelo.Mensaje) == false)
                        {
                            g_bol_GrabarDatos_TerminoCorrectamente = false;
                            //Poner el Foco en el objeto que tuvoel problema en validar
                            if (mdl_ValorDevuelto_Modelo.Objeto != null)
                            {
                                Funciones.Poner_Foco_Objeto(g_frm_P_NominaPago, mdl_ValorDevuelto_Modelo.Objeto);
                            }

                            return;
                        }
                    }
                }
                //.........................................................................................

                g_bol_VolverAlListado = _bol_VolverAlListado;

                g_bol_GrabarDatos_TerminoCorrectamente = true;

                g_frm_P_NominaPago.Enabled = false;
                g_frm_PE_Esperando = new PE_Esperando(Mensajes.G_STR_ESPERANDO_GRABANDODATOS());

                g_obj_TareaAsincrona_GrabarDatos = new BackgroundWorker();
                g_obj_TareaAsincrona_GrabarDatos.DoWork += new DoWorkEventHandler(TareaAsincrona_GrabarDatos_DoWork);
                g_obj_TareaAsincrona_GrabarDatos.RunWorkerCompleted += new RunWorkerCompletedEventHandler(TareaAsincrona_GrabarDatos_Completed);
                g_obj_TareaAsincrona_GrabarDatos.RunWorkerAsync();

                g_frm_PE_Esperando.ShowDialog();
            }
            catch (Exception ex)
            {
                g_bol_GrabarDatos_TerminoCorrectamente = false;
                if (g_frm_PE_Esperando != null)
                {
                    g_frm_PE_Esperando.Close();
                    g_frm_PE_Esperando = null;
                }
                g_frm_P_NominaPago.Enabled = true;

                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(GrabarDatos));
                Mensajes.MostrarMensaje(Mensajes.G_STR_MENSAJES_GENERAL_ERROR_GRABARDATOSPANTALLA());
            }
        }

        private void TareaAsincrona_GrabarDatos_DoWork(object sender, DoWorkEventArgs e)
        {
            INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_ValorDevuelto_Modelo.TodoCorrecto = true;

            try
            {
                // Validar Primero
                INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo_VALIDACION = ValidarDatos();
                if (mdl_ValorDevuelto_Modelo_VALIDACION.TodoCorrecto)
                {
                    mdl_ValorDevuelto_Modelo = GrabarDatos_Final();
                }
                else
                {
                    mdl_ValorDevuelto_Modelo = mdl_ValorDevuelto_Modelo_VALIDACION;
                }
            }
            catch (ThreadAbortException ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_GrabarDatos_DoWork));

                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_GRABARDATOSPANTALLA();
            }
            catch (Control_Errores)
            {
                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_GRABARDATOSPANTALLA();
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_GrabarDatos_DoWork));

                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_GRABARDATOSPANTALLA();
            }
            finally
            {
                e.Result = mdl_ValorDevuelto_Modelo;
            }
        }
        private void TareaAsincrona_GrabarDatos_Completed(object sender, RunWorkerCompletedEventArgs e)
        {
            if (g_frm_PE_Esperando != null)
            {
                g_frm_PE_Esperando.Close();
                g_frm_PE_Esperando = null;
            }
            g_frm_P_NominaPago.Enabled = true;

            try
            {
                INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo_Resultado = (INTERNO_ValorDevuelto_Modelo)e.Result;

                //Mostrar si tuviera algun mensaje
                if (mdl_ValorDevuelto_Modelo_Resultado.TodoCorrecto == false)
                {
                    if (mdl_ValorDevuelto_Modelo_Resultado.Mensaje.Trim().Length > 0)
                    {
                        Mensajes.MostrarMensaje(mdl_ValorDevuelto_Modelo_Resultado.Mensaje);

                        //Poner el Foco en el objeto que tuvoel problema en validar
                        if (mdl_ValorDevuelto_Modelo_Resultado.Objeto != null)
                        {
                            Funciones.Poner_Foco_Objeto(g_frm_P_NominaPago, mdl_ValorDevuelto_Modelo_Resultado.Objeto);
                        }
                    }

                    g_bol_GrabarDatos_TerminoCorrectamente = false;
                }
                else
                {
                    // Devolver al Listado el Row Añadido/Modificado
                    if (g_frm_P_NominaPago.P_Base_PantallaOrigen != null)
                    {
                        g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_ActualizarRegistro(mdl_ValorDevuelto_Modelo_Resultado.Id, mdl_ValorDevuelto_Modelo_Resultado.TipoAccion);
                    }
                    else if (g_frm_P_NominaPago.P_Base_F3Origen != null)
                    {
                        g_frm_P_NominaPago.P_Base_F3Origen.Exferia_F3_ActualizarRegistro(mdl_ValorDevuelto_Modelo_Resultado.Id, mdl_ValorDevuelto_Modelo_Resultado.TipoAccion);
                    }

                    g_frm_P_NominaPago.P_Base_SeModificoDatosPantalla = false;

                    //Grabar y Volver al listado
                    if (g_bol_VolverAlListado)
                    {
                        g_frm_P_NominaPago.Salir_P_Base();
                    }
                    else
                    {
                        g_frm_P_NominaPago.CTU_Cartera_NominaPago.Rellenar_DataGrid(G_ENUM_CTU_CARTERA_PERSONAL_TIPODOCUMENTOFILTRO.Nomina, g_mdl_INTERNO_PER_Nominas_Modelo.id, true);
                    }
                }
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_GrabarDatos_Completed));
            }
        }

        public INTERNO_ValorDevuelto_Modelo ValidarDatos()
        {
            INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_ValorDevuelto_Modelo.TodoCorrecto = true;

            try
            {
                // Nomina no puede estar Vacio (Obligatorio)
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto && g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Codigo.Trim().Length == 0)
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_VACIO(g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Titulo);
                    mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_PRINCIPAL_TextBox_Codigo;
                }

                // Si hay Nomina validar que es Correcta
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto && (g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Codigo.Trim().Length != 0) && g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Id == -1)
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_F3_INCORRECTO(g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Titulo);
                    mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_PRINCIPAL_TextBox_Codigo;
                }

                // La NominaVencimiento no puede estar Vacia (Obligatoria)
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto && g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Codigo.Trim().Length == 0 &&
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Descripcion.Trim().Length == 0)
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_VACIO(g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Titulo);
                    mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_PRINCIPAL_TextBox_Codigo;
                }

                // Si hay NominaVencimiento validar que es Correcta
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto && (g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Codigo.Trim().Length != 0 ||
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Descripcion.Trim().Length != 0) && g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Id == -1)
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_F3_INCORRECTO(g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Titulo);
                    mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_PRINCIPAL_TextBox_Codigo;
                }

                // La fecha no puede estar vacia y debe ser correcta
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto)
                {
                    int int_fechaAlta_Respuesta = Funciones.Fecha_Validacion(g_frm_P_NominaPago.Exferia_FechaSeleccion_Fecha.Exferia_FechaSeleccion_Fecha.Trim(' ', '/'));

                    if (int_fechaAlta_Respuesta == 1)//Vacia
                    {
                        mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                        mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_VACIO(g_frm_P_NominaPago.Exferia_FechaSeleccion_Fecha.Exferia_FechaSeleccion_Descripcion);
                        mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_FechaSeleccion_Fecha;
                    }
                    else if (int_fechaAlta_Respuesta == 2)//Incorrecta
                    {
                        mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                        mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_FECHA_INCORRECTA(g_frm_P_NominaPago.Exferia_FechaSeleccion_Fecha.Exferia_FechaSeleccion_Descripcion);
                        mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_FechaSeleccion_Fecha;
                    }
                }

                // Si hay Tesoreria validar que es Correcta
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto && (g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Codigo.Trim().Length != 0 ||
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Descripcion.Trim().Length != 0) && g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Id == -1)
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_F3_INCORRECTO(g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Titulo);
                    mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_PRINCIPAL_TextBox_Codigo;
                }

                // La fecha confirmacion debe ser correcta
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto)
                {
                    int int_fechaAlta_Respuesta = Funciones.Fecha_Validacion(g_frm_P_NominaPago.Exferia_FechaSeleccion_Confirmado.Exferia_FechaSeleccion_Fecha.Trim(' ', '/'));

                    if (int_fechaAlta_Respuesta == 1)//Vacia
                    {

                    }
                    else if (int_fechaAlta_Respuesta == 2)//Incorrecta
                    {
                        mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                        mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_FECHA_INCORRECTA(g_frm_P_NominaPago.Exferia_FechaSeleccion_Confirmado.Exferia_FechaSeleccion_Descripcion);
                        mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_FechaSeleccion_Confirmado;
                    }
                }

                // Si hay ClaveAnalitica validar que es Correcta
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto && (g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Codigo.Trim().Length != 0 ||
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Descripcion.Trim().Length != 0) && g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Id == -1)
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_F3_INCORRECTO(g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Titulo);
                    mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_PRINCIPAL_TextBox_Codigo;
                }

                // Si hay PredefinidoCabecera_Pago validar que es Correcta
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto && (g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Codigo.Trim().Length != 0 ||
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Descripcion.Trim().Length != 0) && g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Id == -1)
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_F3_INCORRECTO(g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Titulo);
                    mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_PRINCIPAL_TextBox_Codigo;
                }

                // La Importe no puede estar vacía
                if ((mdl_ValorDevuelto_Modelo.TodoCorrecto) && (g_frm_P_NominaPago.Exferia_TextBox_Importe.Text.Trim().Length == 0))
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_VACIO(g_frm_P_NominaPago.Exferia_Label_Importe.Text);
                    mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_TextBox_Importe;
                }

                // El importe debe ser diferente 0
                if ((mdl_ValorDevuelto_Modelo.TodoCorrecto) && (Convert.ToDecimal(g_frm_P_NominaPago.Exferia_TextBox_Importe.Text.Trim()).Equals(0m)))
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_CERO(g_frm_P_NominaPago.Exferia_Label_Importe.Text);
                    mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_TextBox_Importe;
                }
            }
            catch (Control_Errores)
            {
                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_VALIDARDATOSPANTALLA();
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(ValidarDatos));

                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_VALIDARDATOSPANTALLA();
            }

            return mdl_ValorDevuelto_Modelo;
        }
        private INTERNO_ValorDevuelto_Modelo GrabarDatos_Final()
        {
            INTERNO_ValorDevuelto_Modelo mdl_INTERNO_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = true;

            try
            {
                DateTime? dtt_fechaNula = null;

                PER_NominasPagos mdl_PER_NominasPagos = new PER_NominasPagos();

                //id
                mdl_PER_NominasPagos.id = g_mdl_PER_NominasPagos != null ? g_mdl_PER_NominasPagos.id : -1;

                //estado
                mdl_PER_NominasPagos.estado = g_str_Estado;

                //idNominaVencimiento
                mdl_PER_NominasPagos.idNominaVencimiento = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Id;

                //fecha
                mdl_PER_NominasPagos.fecha = DateTime.ParseExact(g_frm_P_NominaPago.Exferia_FechaSeleccion_Fecha.Exferia_FechaSeleccion_Fecha, "dd/MM/yyyy", CultureInfo.InvariantCulture);

                //observaciones
                mdl_PER_NominasPagos.observaciones = g_frm_P_NominaPago.Exferia_TextBox_Observaciones.Text;

                //codigo 
                long lng_Codigo = 1;
                if (g_mdl_PER_NominasPagos != null && g_mdl_PER_NominasPagos.codigo > 0)
                {
                    lng_Codigo = g_mdl_PER_NominasPagos.codigo;
                }
                else
                {
                    //Si es NUevo, tengo que mirar el ultimo Pago del vencimiento y ponerle el siguiente
                    if (g_mdl_INTERNO_PER_NominasVencimientos_Modelo != null &&
                        g_mdl_INTERNO_PER_NominasVencimientos_Modelo.PER_NominasPagos != null &&
                        g_mdl_INTERNO_PER_NominasVencimientos_Modelo.PER_NominasPagos.Count > 0)
                    {
                        long? lng_UltimoPago = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.PER_NominasPagos.Select(m => m.codigo).OrderByDescending(m => m).FirstOrDefault();
                        if (lng_UltimoPago != null)
                        {
                            lng_Codigo = lng_UltimoPago.Value + 1;
                        }
                    }
                }
                mdl_PER_NominasPagos.codigo = lng_Codigo;

                //confirmado
                mdl_PER_NominasPagos.confirmado = g_frm_P_NominaPago.Exferia_FechaSeleccion_Confirmado.Exferia_FechaSeleccion_Fecha.Trim(' ', '/') != "" ? DateTime.ParseExact(g_frm_P_NominaPago.Exferia_FechaSeleccion_Confirmado.Exferia_FechaSeleccion_Fecha, "dd/MM/yyyy", CultureInfo.InvariantCulture) : dtt_fechaNula;

                //idTesoreria
                if (g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Id != -1)
                { mdl_PER_NominasPagos.idTesoreria = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Id; }
                else
                { mdl_PER_NominasPagos.idTesoreria = null; }

                //idClaveAnalitica
                if (g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Id != -1)
                { mdl_PER_NominasPagos.idClaveAnalitica = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_ClaveAnalitica.Exferia_F3_SoloSeleccion_Id; }
                else
                { mdl_PER_NominasPagos.idClaveAnalitica = null; }

                //idPredefinidoCabecera_Pago
                if (g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Id != -1)
                { mdl_PER_NominasPagos.idPredefinidoCabecera_Pago = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Id; }
                else
                { mdl_PER_NominasPagos.idPredefinidoCabecera_Pago = null; }

                // //importe
                mdl_PER_NominasPagos.importe = Convert.ToDecimal(g_frm_P_NominaPago.Exferia_TextBox_Importe.Text);

                //se graba el modelo ya relleno
                mdl_INTERNO_ValorDevuelto_Modelo = g_obj_PER_NominasPagos_Datos.Grabar(mdl_PER_NominasPagos);

                //Si esta todo correcto
                if (mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto)
                {
                    //Volver a Cargar el modelo de Pago si esta cerrando o volcado documento
                    if (g_bol_VolverAlListado == false)
                    {
                        //Obtengo el modelo que se acaba de grabar
                        g_mdl_PER_NominasPagos = g_obj_PER_NominasPagos_Datos.Obtener(mdl_INTERNO_ValorDevuelto_Modelo.Id);

                        g_frm_P_NominaPago.P_Base_id = g_mdl_PER_NominasPagos.id;

                        //Permisos para borrar
                        g_frm_P_NominaPago.Exferia_Button_Borrar.Enabled = true;
                    }
                }
            }
            catch (Control_Errores)
            {
                mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_GRABARDATOSPANTALLA();
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(GrabarDatos_Final));
                mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_GRABARDATOSPANTALLA();
            }
            
            return mdl_INTERNO_ValorDevuelto_Modelo;
        }

        public INTERNO_ValorDevuelto_Modelo Validar_ParaAvisos()
        {
            INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_ValorDevuelto_Modelo.TodoCorrecto = true;

            try
            {

                //### Se pasa del Pendiente que hay estipulado para el vencimento ###################################################################
                decimal dcm_Importe = g_frm_P_NominaPago.Exferia_TextBox_Importe.Text.Trim().Length > 0 ? Convert.ToDecimal(g_frm_P_NominaPago.Exferia_TextBox_Importe.Text.Trim()) : 0m;
                decimal dcm_Pendiente = 0m;
               
                if (g_mdl_INTERNO_PER_NominasVencimientos_Modelo != null)
                {
                    decimal dcm_ImporteVencimiento = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.importe;
                    decimal dcm_ImporteTotalPagosRealizados = 0m;

                    if (g_mdl_INTERNO_PER_NominasVencimientos_Modelo.Importe_Pagos!=null)
                    {
                        dcm_ImporteTotalPagosRealizados = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.Importe_Pagos.Value;
                    }

                    dcm_Pendiente = dcm_ImporteVencimiento;

                    if (dcm_ImporteTotalPagosRealizados>0)
                    {
                        dcm_Pendiente -= dcm_ImporteTotalPagosRealizados;
                    }
                }


                // Si estuviera modificando el Pago, tengo que restar el importe que habia para saber exacto el pendiente 
                if (g_mdl_PER_NominasPagos != null)
                {
                    dcm_Pendiente += g_mdl_PER_NominasPagos.importe;
                }

                if (dcm_Pendiente < dcm_Importe)
                {
                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    //Buscar el vencimiento por si diera error, poder poner los datos del mensaje
                    INTERNO_OpcionesDetalle_Modelo mld_INTERNO_OpcionesDetalle_Modelo = Datos_Generales.PRV_Opciones_Buscar_Detalles(Variables.G_STR_OPCION_PER_NOMINAVENCIMIENTO);

                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_PPAGO_VALIDACION_PENDIENTE_INFERIOR_INPORTE(mld_INTERNO_OpcionesDetalle_Modelo.descripcion_Singular);
                    mdl_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_TextBox_Importe;
                }

                //Poner la Pregunta
                if (mdl_ValorDevuelto_Modelo.TodoCorrecto == false)
                {
                    mdl_ValorDevuelto_Modelo.Mensaje += Mensajes.G_STR_MENSAJES_GENERAL_PREGUNTA_DESEASCONTINUAR();
                }

            }
            catch (Control_Errores)
            {
                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_VALIDARDATOSPANTALLA();
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(Validar_ParaAvisos));

                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_VALIDARDATOSPANTALLA();
            }

            return mdl_ValorDevuelto_Modelo;
        }
        #endregion

        #region Borrar Datos
        public void BorrarDatos()
        {
            try
            {
                // Preguntar si esta Seguro de Borrar
                if (Mensajes.MostrarMensaje_Pregunta(Mensajes.G_STR_MENSAJES_GENERAL_PREGUNTA_BORRAR()))
                {
                    g_frm_P_NominaPago.Enabled = false;
                    g_frm_PE_Esperando = new PE_Esperando(Mensajes.G_STR_ESPERANDO_BORRANDODATOS());


                    g_obj_TareaAsincrona_BorrarDatos = new BackgroundWorker();
                    g_obj_TareaAsincrona_BorrarDatos.DoWork += new DoWorkEventHandler(TareaAsincrona_BorrarDatos_DoWork);
                    g_obj_TareaAsincrona_BorrarDatos.RunWorkerCompleted += new RunWorkerCompletedEventHandler(TareaAsincrona_BorrarDatos_Completed);
                    g_obj_TareaAsincrona_BorrarDatos.RunWorkerAsync();

                    g_frm_PE_Esperando.ShowDialog();
                }
            }
            catch (Exception ex)
            {
                if (g_frm_PE_Esperando != null)
                {
                    g_frm_PE_Esperando.Close();
                    g_frm_PE_Esperando = null;
                }

                g_frm_P_NominaPago.Enabled = true;

                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(BorrarDatos));
                Mensajes.MostrarMensaje(Mensajes.G_STR_MENSAJES_GENERAL_ERROR_BORRARDATOSPANTALLA());
            }
        }

        private void TareaAsincrona_BorrarDatos_DoWork(object sender, DoWorkEventArgs e)
        {
            INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_ValorDevuelto_Modelo.TodoCorrecto = true;

            try
            {
                //Borrar
                mdl_ValorDevuelto_Modelo = BorrarDatos_Final();
            }
            catch (ThreadAbortException ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_BorrarDatos_DoWork));

                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_BORRARDATOSPANTALLA();
            }
            catch (Control_Errores)
            {
                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_BORRARDATOSPANTALLA();
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_BorrarDatos_DoWork));

                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_BORRARDATOSPANTALLA();
            }
            finally
            {
                e.Result = mdl_ValorDevuelto_Modelo;
            }
        }
        private void TareaAsincrona_BorrarDatos_Completed(object sender, RunWorkerCompletedEventArgs e)
        {
            if (g_frm_PE_Esperando != null)
            {
                g_frm_PE_Esperando.Close();
                g_frm_PE_Esperando = null;
            }
            g_frm_P_NominaPago.Enabled = true;

            try
            {
                INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo_Resultado = (INTERNO_ValorDevuelto_Modelo)e.Result;

                //Mostrar si tuviera algun mensaje
                if (mdl_ValorDevuelto_Modelo_Resultado.TodoCorrecto == false)
                {
                    if (mdl_ValorDevuelto_Modelo_Resultado.Mensaje.Trim().Length > 0)
                    {
                        Mensajes.MostrarMensaje(mdl_ValorDevuelto_Modelo_Resultado.Mensaje);
                    }
                }
                else
                {
                    // Devolver al Listado el Row Borrar
                    if (g_frm_P_NominaPago.P_Base_PantallaOrigen != null)
                    {
                        g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_ActualizarRegistro(mdl_ValorDevuelto_Modelo_Resultado.Id, mdl_ValorDevuelto_Modelo_Resultado.TipoAccion);
                    }
                    else if (g_frm_P_NominaPago.P_Base_F3Origen != null)
                    {
                        g_frm_P_NominaPago.P_Base_F3Origen.Exferia_F3_ActualizarRegistro(mdl_ValorDevuelto_Modelo_Resultado.Id, mdl_ValorDevuelto_Modelo_Resultado.TipoAccion);
                    }

                    g_frm_P_NominaPago.P_Base_SeModificoDatosPantalla = false;
                    g_frm_P_NominaPago.Salir_P_Base();
                }
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_BorrarDatos_Completed));
            }
        }

        private INTERNO_ValorDevuelto_Modelo BorrarDatos_Final()
        {
            INTERNO_ValorDevuelto_Modelo mdl_INTERNO_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            try
            {
                mdl_INTERNO_ValorDevuelto_Modelo = g_obj_PER_NominasPagos_Datos.Borrar(g_mdl_PER_NominasPagos != null ? g_mdl_PER_NominasPagos.id : -1);

            }
            catch (Control_Errores)
            {
                mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_BORRARDATOSPANTALLA();
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_Nomina_Controladora) + "/" + nameof(BorrarDatos_Final));
                mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_BORRARDATOSPANTALLA();
            }

            return mdl_INTERNO_ValorDevuelto_Modelo;
        }
        #endregion

        #region Actualizar Fecha Confirmacion Pagos
        public void Actualizar_FechaConfirmacion_Pagos(List<long> _lst_id, DateTime? _dtt_FechaConfirmacion)
        {
            try
            {
                g_bol_GrabarDatos_TerminoCorrectamente = true;

                g_frm_P_NominaPago.Enabled = false;
                g_frm_PE_Esperando = new PE_Esperando(Mensajes.G_STR_ESPERANDO_GRABANDODATOS());

                //Argumentos
                List<object> lst_Argumentos = new List<object>();
                lst_Argumentos.Add(_lst_id);
                lst_Argumentos.Add(_dtt_FechaConfirmacion);

                g_TareaAsincrona_Actualizar_FechaConfirmacion_Pagos = new BackgroundWorker();
                g_TareaAsincrona_Actualizar_FechaConfirmacion_Pagos.DoWork += new DoWorkEventHandler(TareaAsincrona_Actualizar_FechaConfirmacion_Pagos_DoWork);
                g_TareaAsincrona_Actualizar_FechaConfirmacion_Pagos.RunWorkerCompleted += new RunWorkerCompletedEventHandler(TareaAsincrona_Actualizar_FechaConfirmacion_Pagos_Completed);
                g_TareaAsincrona_Actualizar_FechaConfirmacion_Pagos.RunWorkerAsync(lst_Argumentos);

                g_frm_PE_Esperando.ShowDialog();
            }
            catch (Exception ex)
            {
                g_bol_GrabarDatos_TerminoCorrectamente = false;

                if (g_frm_PE_Esperando != null)
                {
                    g_frm_PE_Esperando.Close();
                    g_frm_PE_Esperando = null;
                }
                g_frm_P_NominaPago.Enabled = true;

                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(Actualizar_FechaConfirmacion_Pagos));
                Mensajes.MostrarMensaje(Mensajes.G_STR_MENSAJES_GENERAL_ERROR_GRABARDATOSPANTALLA());
            }
        }

        private void TareaAsincrona_Actualizar_FechaConfirmacion_Pagos_DoWork(object sender, DoWorkEventArgs e)
        {
            INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_ValorDevuelto_Modelo.TodoCorrecto = false;

            try
            {
                //Argumentos
                List<object> lst_Argumentos = (List<object>)e.Argument;

                mdl_ValorDevuelto_Modelo = g_obj_PER_NominasPagos_Datos.Actualizar_Confirmacion((List<long>)lst_Argumentos[0], (DateTime?)lst_Argumentos[1]);
                mdl_ValorDevuelto_Modelo.Objeto = (DateTime?)lst_Argumentos[1];
            }
            catch (ThreadAbortException ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Actualizar_FechaConfirmacion_Pagos_DoWork));

                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_GRABARDATOSPANTALLA();
            }
            catch (Control_Errores)
            {
                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_GRABARDATOSPANTALLA();
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Actualizar_FechaConfirmacion_Pagos_DoWork));

                mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_GRABARDATOSPANTALLA();
            }
            finally
            {
                e.Result = mdl_ValorDevuelto_Modelo;
            }
        }
        private void TareaAsincrona_Actualizar_FechaConfirmacion_Pagos_Completed(object sender, RunWorkerCompletedEventArgs e)
        {
            if (g_frm_PE_Esperando != null)
            {
                g_frm_PE_Esperando.Close();
                g_frm_PE_Esperando = null;
            }
            g_frm_P_NominaPago.Enabled = true;

            try
            {
                INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo_Resultado = (INTERNO_ValorDevuelto_Modelo)e.Result;

                //Mostrar si tuviera algun mensaje
                if (mdl_ValorDevuelto_Modelo_Resultado.TodoCorrecto == false)
                {
                    g_bol_GrabarDatos_TerminoCorrectamente = false;

                    if (mdl_ValorDevuelto_Modelo_Resultado.Mensaje.Trim().Length > 0)
                    {
                        Mensajes.MostrarMensaje(mdl_ValorDevuelto_Modelo_Resultado.Mensaje);
                    }
                }
                else
                {
                    DateTime? dtt_Confirmacion = (DateTime?)mdl_ValorDevuelto_Modelo_Resultado.Objeto;
                    if (dtt_Confirmacion != null)
                    {
                        g_frm_P_NominaPago.Exferia_FechaSeleccion_Confirmado.Exferia_FechaSeleccion_Fecha = dtt_Confirmacion.Value.ToString("dd/MM/yyyy");
                    }
                    else
                    {
                        g_frm_P_NominaPago.Exferia_FechaSeleccion_Confirmado.Exferia_FechaSeleccion_Fecha = "";
                    }

                    g_frm_P_NominaPago.P_Base_SeModificoDatosPantalla = false;
                }
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Actualizar_FechaConfirmacion_Pagos_Completed));
            }
        }
        #endregion

        #region Abrir/Cerrar/Volcar/Desvolcar
        public void Mostrar_CerradoVolcado()
        {
            try
            {
                //Por Defecto
                g_str_Estado = Variables.G_STR_ESTADO_CONTABILIDAD_ABIERTO;
                if (g_lst_CTA_VolcadoCabecera != null) { g_lst_CTA_VolcadoCabecera.Clear(); }

                //CERRADO O ABIERTO ##############################################################################################################
                //Buscar si esta Cerrado
                if (g_mdl_PER_NominasPagos != null)
                {
                    List<long> lst_idPredefinidoFichero = new List<long>();
                    lst_idPredefinidoFichero.Add(Variables.G_PREDEFINIDOFICHEROS_PAGONOMINAS.Id);

                    //Cargamos el ensamblado #########################################################################################################################################################################
                    Assembly m_assembly_1 = Assembly.LoadFrom(Variables.G_STR_LIBRERIA_RUTAINICIAL + @"\" + Variables.G_STR_LIBRERIA_CONTABILIDAD + ".dll");
                    //Obtenemos el tipo de la clase
                    Type m_type_1 = m_assembly_1.GetType("" + Variables.G_STR_LIBRERIA_CONTABILIDAD + "." + Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD);
                    //creamos la instancia
                    var obj_Clase_1 = Activator.CreateInstance(m_type_1);
                    //Cargamos el metodo solicitado
                    MethodInfo obj_MethodInfo_1 = obj_Clase_1.GetType().GetMethod(Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD_PROCEDIMIENTO_CTAVOLCADOCABECERA_OBTENERMODELOLISTADO_POR_DOCUMENTOPREDEFINIDOFICHERO, BindingFlags.Instance | BindingFlags.NonPublic);

                    //Obtener valores
                    object[] arr_Parametros_1 = { g_mdl_PER_NominasPagos.id, lst_idPredefinidoFichero };

                    //Pasamos los parametros al metodo y lo ejecutamos
                    g_lst_CTA_VolcadoCabecera = (List<CTA_VolcadoCabecera>)obj_MethodInfo_1.Invoke(obj_Clase_1, arr_Parametros_1);
                    //##################################################################################################################################################################################################

                }

                //Buscar el Estado del Pago
                if (g_mdl_PER_NominasPagos != null)
                {
                    g_str_Estado = g_obj_PER_NominasPagos_Datos.Obtener_Estado(g_mdl_PER_NominasPagos.id);

                    //Si esta Cerrado Bloqueo para que no deje hacer nada
                    if (g_str_Estado.Equals(Variables.G_STR_ESTADO_CONTABILIDAD_CERRADO))
                    {
                        //Cambiar Imagen del Boton de Desvolcar
                        g_frm_P_NominaPago.Exferia_Button_Volcado.Exferia_Button_Imagen = Imagenes.G_ENUM_IMAGENES.G_IMG_VOLCAR;
                        Imagenes.Asignar_Imagen(g_frm_P_NominaPago.Exferia_Button_Volcado);
                        g_frm_P_NominaPago.Exferia_Button_Volcado.Tag = "0";

                        //Cambiar Imagen del Boton de Cerrar
                        g_frm_P_NominaPago.Exferia_Button_CerrarAbrir.Exferia_Button_Imagen = Imagenes.G_ENUM_IMAGENES.G_IMG_CERRADO;
                        Imagenes.Asignar_Imagen(g_frm_P_NominaPago.Exferia_Button_CerrarAbrir);
                        g_frm_P_NominaPago.Exferia_Button_CerrarAbrir.Tag = "1";

                        //Bloqueo los Controles
                        SoloLectura.Empezar(g_frm_P_NominaPago, true);
                    }
                    //Si esta Volcado 
                    else if (g_str_Estado.Equals(Variables.G_STR_ESTADO_CONTABILIDAD_VOLCADO))
                    {
                        //Cambiar Imagen del Boton de Cerrar
                        g_frm_P_NominaPago.Exferia_Button_CerrarAbrir.Exferia_Button_Imagen = Imagenes.G_ENUM_IMAGENES.G_IMG_CERRADO;
                        Imagenes.Asignar_Imagen(g_frm_P_NominaPago.Exferia_Button_CerrarAbrir);
                        g_frm_P_NominaPago.Exferia_Button_CerrarAbrir.Tag = "1";

                        //Cambiar Imagen del Boton de Volcar
                        g_frm_P_NominaPago.Exferia_Button_Volcado.Exferia_Button_Imagen = Imagenes.G_ENUM_IMAGENES.G_IMG_DESVOLCAR;
                        Imagenes.Asignar_Imagen(g_frm_P_NominaPago.Exferia_Button_Volcado);
                        g_frm_P_NominaPago.Exferia_Button_Volcado.Tag = "1";

                        //Bloqueo los Controles
                        SoloLectura.Empezar(g_frm_P_NominaPago, true);
                    }
                    //Abierto
                    else
                    {
                        //Cambiar Imagen del Boton de Abrir
                        g_frm_P_NominaPago.Exferia_Button_CerrarAbrir.Exferia_Button_Imagen = Imagenes.G_ENUM_IMAGENES.G_IMG_ABIERTO;
                        Imagenes.Asignar_Imagen(g_frm_P_NominaPago.Exferia_Button_CerrarAbrir);
                        g_frm_P_NominaPago.Exferia_Button_CerrarAbrir.Tag = "0";

                        //Cambiar Imagen del Boton de Desvolcar
                        g_frm_P_NominaPago.Exferia_Button_Volcado.Exferia_Button_Imagen = Imagenes.G_ENUM_IMAGENES.G_IMG_VOLCAR;
                        Imagenes.Asignar_Imagen(g_frm_P_NominaPago.Exferia_Button_Volcado);
                        g_frm_P_NominaPago.Exferia_Button_Volcado.Tag = "0";

                        //Desbloqueo los Controles
                        SoloLectura.Empezar(g_frm_P_NominaPago, false);
                    }
                }
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(Mostrar_CerradoVolcado));
            }
        }

        #region Cerrar Documento
        public void Cerrar_Documento()
        {
            try
            {
                g_frm_PE_Esperando = new PE_Esperando(Mensajes.G_STR_ESPERANDO_CERRANDO_DOCUMENTO());

                BackgroundWorker obj_TareaAsincrona_Cerrar_Documento = new BackgroundWorker();

                obj_TareaAsincrona_Cerrar_Documento.DoWork += new DoWorkEventHandler(TareaAsincrona_Cerrar_Documento_DoWork);
                obj_TareaAsincrona_Cerrar_Documento.RunWorkerCompleted += new RunWorkerCompletedEventHandler(TareaAsincrona_Cerrar_Documento_Completed);
                obj_TareaAsincrona_Cerrar_Documento.RunWorkerAsync();

                //Mostrar Pantalla de Espera
                g_frm_PE_Esperando.ShowDialog();
            }
            catch (Exception ex)
            {
                if (g_frm_PE_Esperando != null)
                {
                    g_frm_PE_Esperando.Close();
                    g_frm_PE_Esperando = null;
                }

                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(Cerrar_Documento));
            }
        }

        private void TareaAsincrona_Cerrar_Documento_DoWork(object sender, DoWorkEventArgs e)
        {
            INTERNO_ValorDevuelto_Modelo mdl_INTERNO_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = true;
            mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = "";

            using (TransactionScope transaccion_SQL = new TransactionScope(TransactionScopeOption.Required))
            {
                try
                {
                    // Validar Primero
                    INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo_VALIDACION = ValidarDatos_CerrarDocumento();
                    if (mdl_ValorDevuelto_Modelo_VALIDACION.TodoCorrecto)
                    {
                        //Insertar el idPredefinidoCabecera
                        List<long> lst_idPredefinidoCabecera = new List<long>();
                        List<object> lst_Argumentos = new List<object>();


                        //Validar que tiene un idPredefinidoCabecera para Pago
                        if (Variables.G_BOL_MODULO_CONTABILIDAD_ACTIVA)
                        {
                            lst_idPredefinidoCabecera.Add(g_mdl_PER_NominasPagos.idPredefinidoCabecera_Pago.Value);

                            lst_Argumentos.Add(lst_idPredefinidoCabecera);
                            lst_Argumentos.Add(g_mdl_PER_NominasPagos.id);
                            lst_Argumentos.Add(g_frm_P_NominaPago.g_mdl_PRV_OpcionesDetalle.opcion);
                            lst_Argumentos.Add(null);
                        }
                        //Sin Contabilidad
                        else
                        {
                            List<long> lst_ids = new List<long>();
                            lst_ids.Add(g_mdl_PER_NominasPagos.id);

                            lst_Argumentos.Add(null);
                            lst_Argumentos.Add(-1);
                            lst_Argumentos.Add(g_frm_P_NominaPago.g_mdl_PRV_OpcionesDetalle.opcion);
                            lst_Argumentos.Add(lst_ids);

                        }

                        //Cargamos el ensamblado #########################################################################################################################################################################
                        Assembly m_assembly_1 = Assembly.LoadFrom(Variables.G_STR_LIBRERIA_RUTAINICIAL + @"\" + Variables.G_STR_LIBRERIA_CONTABILIDAD + ".dll");
                        //Obtenemos el tipo de la clase
                        Type m_type_1 = m_assembly_1.GetType("" + Variables.G_STR_LIBRERIA_CONTABILIDAD + "." + Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD);
                        //creamos la instancia
                        var obj_Clase_1 = Activator.CreateInstance(m_type_1);
                        //Cargamos el metodo solicitado
                        MethodInfo obj_MethodInfo_1 = obj_Clase_1.GetType().GetMethod(Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD_PROCEDIMIENTO_ACCIONDOCUMENTO_CERRAR, BindingFlags.Instance | BindingFlags.NonPublic);

                        //Obtener valores
                        object[] arr_Parametros_1 = lst_Argumentos.ToArray();

                        //Pasamos los parametros al metodo y lo ejecutamos
                        mdl_INTERNO_ValorDevuelto_Modelo = (INTERNO_ValorDevuelto_Modelo)obj_MethodInfo_1.Invoke(obj_Clase_1, arr_Parametros_1);
                        //########################################################################################################################################################################


                    }
                    else
                    {
                        mdl_INTERNO_ValorDevuelto_Modelo = mdl_ValorDevuelto_Modelo_VALIDACION;
                    }

                    if (mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto)
                    {
                        transaccion_SQL.Complete();
                    }

                    transaccion_SQL.Dispose();
                }
                catch (ThreadAbortException ex)
                {
                    transaccion_SQL.Dispose();

                    Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Cerrar_Documento_DoWork));

                    mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_CERRAR_DOCUMENTO();
                }
                catch (Control_Errores)
                {
                    transaccion_SQL.Dispose();

                    mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_CERRAR_DOCUMENTO();
                }
                catch (Exception ex)
                {
                    transaccion_SQL.Dispose();

                    Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Cerrar_Documento_DoWork));

                    mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_CERRAR_DOCUMENTO();
                }
                finally
                {
                    e.Result = mdl_INTERNO_ValorDevuelto_Modelo;
                }
            }

        }
        private void TareaAsincrona_Cerrar_Documento_Completed(object sender, RunWorkerCompletedEventArgs e)
        {
            if (g_frm_PE_Esperando != null)
            {
                g_frm_PE_Esperando.Close();
                g_frm_PE_Esperando = null;
            }

            try
            {
                //Termino 
                INTERNO_ValorDevuelto_Modelo mdl_INTERNO_ValorDevuelto_Modelo_CERRAR_TERMINO = (INTERNO_ValorDevuelto_Modelo)e.Result;

                //Termino todo Correctamente
                if (mdl_INTERNO_ValorDevuelto_Modelo_CERRAR_TERMINO.TodoCorrecto)
                {
                    Mostrar_CerradoVolcado();

                    //Actualizar registro en Listado principal
                    if (g_frm_P_NominaPago.P_Base_PantallaOrigen != null)
                    {
                        List<INTERNO_ActualizarCampoListadoGeneral_Modelo> lst_INTERNO_ActualizarCampoListadoGeneral_Modelo = new List<INTERNO_ActualizarCampoListadoGeneral_Modelo>();
                        lst_INTERNO_ActualizarCampoListadoGeneral_Modelo.Add(new INTERNO_ActualizarCampoListadoGeneral_Modelo(g_mdl_PER_NominasPagos.id, nameof(INTERNO_PER_NominasPagos_Listado_Modelo.estado), Variables.G_STR_ESTADO_CONTABILIDAD_CERRADO));

                        g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_ActualizarRegistros_Campo(lst_INTERNO_ActualizarCampoListadoGeneral_Modelo, G_ENUM_TIPOACCION.INT_MODIFICAR);
                        g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_ActualizarRegistro_ConObjeto(Variables.G_STR_OPCION_PER_NOMINAPAGO, G_ENUM_TIPOACCION.INT_NADA);
                    }

                    //Actualizar el control de Resumen de Facturas
                    g_frm_P_NominaPago.CTU_Cartera_NominaPago.Rellenar_DataGrid(G_ENUM_CTU_CARTERA_PERSONAL_TIPODOCUMENTOFILTRO.Nomina, g_mdl_INTERNO_PER_Nominas_Modelo.id, true);
                }
                //Ocurrio un Error
                else
                {
                    Mensajes.MostrarMensaje(mdl_INTERNO_ValorDevuelto_Modelo_CERRAR_TERMINO.Mensaje);
                }
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Cerrar_Documento_Completed));
            }
        }

        public INTERNO_ValorDevuelto_Modelo ValidarDatos_CerrarDocumento()
        {
            INTERNO_ValorDevuelto_Modelo mdl_INTERNO_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = true;

            try
            {
                //Si tienes contabilidad tienes que tener los Predefinidos
                if (Variables.G_BOL_MODULO_CONTABILIDAD_ACTIVA)
                {
                    // la Clave Predefinido no puede estar Vacio (Obligatorio)
                    if (mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto && g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Codigo.Trim().Length == 0 &&
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Descripcion.Trim().Length == 0)
                    {
                        mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                        mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_VACIO(g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Titulo);
                        mdl_INTERNO_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_PRINCIPAL_TextBox_Codigo;
                    }

                    // Si hay  Clave Predefinido validar que es Correcto
                    if (mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto && (g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Codigo.Trim().Length != 0 ||
                        g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Descripcion.Trim().Length != 0) && g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Id == -1)
                    {
                        mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                        mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_F3_INCORRECTO(g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Titulo);
                        mdl_INTERNO_ValorDevuelto_Modelo.Objeto = g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_PRINCIPAL_TextBox_Codigo;
                    }
                }
            }
            catch (Control_Errores)
            {
                mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_VALIDARDATOSPANTALLA();
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(ValidarDatos_CerrarDocumento));

                mdl_INTERNO_ValorDevuelto_Modelo.TodoCorrecto = false;
                mdl_INTERNO_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_GENERAL_ERROR_VALIDARDATOSPANTALLA();
            }

            return mdl_INTERNO_ValorDevuelto_Modelo;
        }
        #endregion

        #region Abrir Documento
        public void Abrir_Documento()
        {
            try
            {
                g_frm_PE_Esperando = new PE_Esperando(Mensajes.G_STR_ESPERANDO_CERRANDO_DOCUMENTO());

                BackgroundWorker obj_TareaAsincrona_Abrir_Documento = new BackgroundWorker();

                obj_TareaAsincrona_Abrir_Documento.DoWork += new DoWorkEventHandler(TareaAsincrona_Abrir_Documento_DoWork);
                obj_TareaAsincrona_Abrir_Documento.RunWorkerCompleted += new RunWorkerCompletedEventHandler(TareaAsincrona_Abrir_Documento_Completed);
                obj_TareaAsincrona_Abrir_Documento.RunWorkerAsync();

                //Mostrar Pantalla de Espera
                g_frm_PE_Esperando.ShowDialog();
            }
            catch (Exception ex)
            {
                if (g_frm_PE_Esperando != null)
                {
                    g_frm_PE_Esperando.Close();
                    g_frm_PE_Esperando = null;
                }

                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(Abrir_Documento));
            }
        }

        private void TareaAsincrona_Abrir_Documento_DoWork(object sender, DoWorkEventArgs e)
        {
            INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_ValorDevuelto_Modelo.TodoCorrecto = true;
            mdl_ValorDevuelto_Modelo.Mensaje = "";

            using (TransactionScope transaccion_SQL = new TransactionScope(TransactionScopeOption.Required))
            {
                try
                {

                    List<object> lst_Argumentos = new List<object>();
                    if (Variables.G_BOL_MODULO_CONTABILIDAD_ACTIVA)
                    {
                        //Insertar el idPredefinidoCabecera
                        List<long> lst_idPredefinidoFicheros_VolcadoCabecera = new List<long>();
                        if (g_lst_CTA_VolcadoCabecera != null)
                        {
                            lst_idPredefinidoFicheros_VolcadoCabecera.AddRange(g_lst_CTA_VolcadoCabecera.Select(m => m.idPredefinidoFichero).ToList());
                        }
                        long lng_idVolcadoCabecera_APasarDiario = -1;
                        if (g_lst_CTA_VolcadoCabecera != null && g_lst_CTA_VolcadoCabecera.Count > 0)
                        {
                            lng_idVolcadoCabecera_APasarDiario = g_lst_CTA_VolcadoCabecera.FirstOrDefault().id;
                        }

                        //Argumentos
                        lst_Argumentos.Add(g_mdl_PER_NominasPagos.id);
                        lst_Argumentos.Add(lst_idPredefinidoFicheros_VolcadoCabecera);
                        lst_Argumentos.Add(lng_idVolcadoCabecera_APasarDiario);
                        lst_Argumentos.Add(g_frm_P_NominaPago.g_mdl_PRV_OpcionesDetalle.opcion);
                        lst_Argumentos.Add(null);
                        lst_Argumentos.Add(Variables.G_PREDEFINIDOFICHEROS_PAGONOMINAS.Id);
                    }
                    //Sin Contabilidad
                    else
                    {
                        List<long> lst_ids = new List<long>();
                        lst_ids.Add(g_mdl_PER_NominasPagos.id);

                        //Argumentos
                        lst_Argumentos.Add(g_mdl_PER_NominasPagos.id);
                        lst_Argumentos.Add(null);
                        lst_Argumentos.Add(-1);
                        lst_Argumentos.Add(g_frm_P_NominaPago.g_mdl_PRV_OpcionesDetalle.opcion);
                        lst_Argumentos.Add(lst_ids);
                        lst_Argumentos.Add(-1);
                    }

                    //Cargamos el ensamblado #########################################################################################################################################################################
                    Assembly m_assembly_1 = Assembly.LoadFrom(Variables.G_STR_LIBRERIA_RUTAINICIAL + @"\" + Variables.G_STR_LIBRERIA_CONTABILIDAD + ".dll");
                    //Obtenemos el tipo de la clase
                    Type m_type_1 = m_assembly_1.GetType("" + Variables.G_STR_LIBRERIA_CONTABILIDAD + "." + Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD);
                    //creamos la instancia
                    var obj_Clase_1 = Activator.CreateInstance(m_type_1);
                    //Cargamos el metodo solicitado
                    MethodInfo obj_MethodInfo_1 = obj_Clase_1.GetType().GetMethod(Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD_PROCEDIMIENTO_ACCIONDOCUMENTO_ABRIR, BindingFlags.Instance | BindingFlags.NonPublic);

                    //Obtener valores
                    object[] arr_Parametros_1 = lst_Argumentos.ToArray();

                    //Pasamos los parametros al metodo y lo ejecutamos
                    mdl_ValorDevuelto_Modelo = (INTERNO_ValorDevuelto_Modelo)obj_MethodInfo_1.Invoke(obj_Clase_1, arr_Parametros_1);
                    //########################################################################################################################################################################

                    if (mdl_ValorDevuelto_Modelo.TodoCorrecto)
                    {
                        transaccion_SQL.Complete();
                    }

                    transaccion_SQL.Dispose();
                }
                catch (ThreadAbortException ex)
                {
                    transaccion_SQL.Dispose();

                    Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Abrir_Documento_DoWork));

                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_CERRAR_DOCUMENTO();
                }
                catch (Control_Errores)
                {
                    transaccion_SQL.Dispose();

                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_CERRAR_DOCUMENTO();
                }
                catch (Exception ex)
                {
                    transaccion_SQL.Dispose();

                    Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Abrir_Documento_DoWork));

                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_CERRAR_DOCUMENTO();
                }
                finally
                {
                    e.Result = mdl_ValorDevuelto_Modelo;
                }
            }
        }
        private void TareaAsincrona_Abrir_Documento_Completed(object sender, RunWorkerCompletedEventArgs e)
        {
            if (g_frm_PE_Esperando != null)
            {
                g_frm_PE_Esperando.Close();
                g_frm_PE_Esperando = null;
            }

            try
            {
                //Termino 
                INTERNO_ValorDevuelto_Modelo mdl_INTERNO_ValorDevuelto_Modelo_CERRAR_TERMINO = (INTERNO_ValorDevuelto_Modelo)e.Result;

                //Termino todo Correctamente
                if (mdl_INTERNO_ValorDevuelto_Modelo_CERRAR_TERMINO.TodoCorrecto)
                {
                    Mostrar_CerradoVolcado();

                    //Actualizar registro en Listado principal
                    if (g_frm_P_NominaPago.P_Base_PantallaOrigen != null)
                    {
                        List<INTERNO_ActualizarCampoListadoGeneral_Modelo> lst_INTERNO_ActualizarCampoListadoGeneral_Modelo = new List<INTERNO_ActualizarCampoListadoGeneral_Modelo>();
                        lst_INTERNO_ActualizarCampoListadoGeneral_Modelo.Add(new INTERNO_ActualizarCampoListadoGeneral_Modelo(g_mdl_PER_NominasPagos.id, nameof(INTERNO_PER_NominasPagos_Listado_Modelo.estado), Variables.G_STR_ESTADO_CONTABILIDAD_ABIERTO));

                        g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_ActualizarRegistros_Campo(lst_INTERNO_ActualizarCampoListadoGeneral_Modelo, G_ENUM_TIPOACCION.INT_MODIFICAR);
                        g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_ActualizarRegistro_ConObjeto(Variables.G_STR_OPCION_PER_NOMINAPAGO, G_ENUM_TIPOACCION.INT_NADA);
                    }

                    //Actualizar el control de Resumen de Facturas
                    g_frm_P_NominaPago.CTU_Cartera_NominaPago.Rellenar_DataGrid(G_ENUM_CTU_CARTERA_PERSONAL_TIPODOCUMENTOFILTRO.Nomina, g_mdl_INTERNO_PER_Nominas_Modelo.id, true);
                }
                //Ocurrio un Error
                else
                {
                    Mensajes.MostrarMensaje(mdl_INTERNO_ValorDevuelto_Modelo_CERRAR_TERMINO.Mensaje);
                }
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Abrir_Documento_Completed));
            }
        }
        #endregion

        #region Volcar Documento
        public void Volcar_Documento()
        {
            try
            {
                g_frm_PE_Esperando = new PE_Esperando(Mensajes.G_STR_ESPERANDO_VOLCANDO_DOCUMENTO());

                BackgroundWorker obj_TareaAsincrona_Volcar_Documento = new BackgroundWorker();

                obj_TareaAsincrona_Volcar_Documento.DoWork += new DoWorkEventHandler(TareaAsincrona_Volcar_Documento_DoWork);
                obj_TareaAsincrona_Volcar_Documento.RunWorkerCompleted += new RunWorkerCompletedEventHandler(TareaAsincrona_Volcar_Documento_Completed);
                obj_TareaAsincrona_Volcar_Documento.RunWorkerAsync();

                //Mostrar Pantalla de Espera
                g_frm_PE_Esperando.ShowDialog();
            }
            catch (Exception ex)
            {
                if (g_frm_PE_Esperando != null)
                {
                    g_frm_PE_Esperando.Close();
                    g_frm_PE_Esperando = null;
                }

                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(Volcar_Documento));
            }
        }

        private void TareaAsincrona_Volcar_Documento_DoWork(object sender, DoWorkEventArgs e)
        {
            INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_ValorDevuelto_Modelo.TodoCorrecto = true;
            mdl_ValorDevuelto_Modelo.Mensaje = "";

            using (TransactionScope transaccion_SQL = new TransactionScope(TransactionScopeOption.Required))
            {
                try
                {
                    //Insertar el idPredefinidoCabecera
                    List<long> lst_idPredefinidoCabecera = new List<long>();

                    //Validar que tiene un idPredefinidoCabcera para el pago
                    if (g_mdl_PER_NominasPagos.idPredefinidoCabecera_Pago != null && g_mdl_PER_NominasPagos.idPredefinidoCabecera_Pago.Value > 0)
                    {
                        lst_idPredefinidoCabecera.Add(g_mdl_PER_NominasPagos.idPredefinidoCabecera_Pago.Value);
                    }
                    else
                    {
                        mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                        mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_GENERAL_VALIDACIONES_F3_INCORRECTO(g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Titulo);
                    }

                    if (mdl_ValorDevuelto_Modelo.TodoCorrecto)
                    {
                        //Saber si ya estaba Cerrado
                        bool bol_CerrarPrimero = true;
                        long lng_idVolcadoCabecera_APasarDiario = -1;//Registro que hay que pasar al Diario
                        if (g_lst_CTA_VolcadoCabecera != null && g_lst_CTA_VolcadoCabecera.Count > 0)
                        {
                            bol_CerrarPrimero = false;
                            lng_idVolcadoCabecera_APasarDiario = g_lst_CTA_VolcadoCabecera.FirstOrDefault().id;
                        }

                        //Cargamos el ensamblado #########################################################################################################################################################################
                        Assembly m_assembly_1 = Assembly.LoadFrom(Variables.G_STR_LIBRERIA_RUTAINICIAL + @"\" + Variables.G_STR_LIBRERIA_CONTABILIDAD + ".dll");
                        //Obtenemos el tipo de la clase
                        Type m_type_1 = m_assembly_1.GetType("" + Variables.G_STR_LIBRERIA_CONTABILIDAD + "." + Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD);
                        //creamos la instancia
                        var obj_Clase_1 = Activator.CreateInstance(m_type_1);
                        //Cargamos el metodo solicitado
                        MethodInfo obj_MethodInfo_1 = obj_Clase_1.GetType().GetMethod(Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD_PROCEDIMIENTO_ACCIONDOCUMENTO_VOLCAR, BindingFlags.Instance | BindingFlags.NonPublic);

                        //Obtener valores
                        object[] arr_Parametros_1 = {   lng_idVolcadoCabecera_APasarDiario,
                                                    g_frm_P_NominaPago.P_Base_ValoresGenerales.lng_idEmpresa,
                                                    g_frm_P_NominaPago.P_Base_ValoresGenerales.EjercicioActivo.id,
                                                    g_mdl_PER_NominasPagos.fecha,
                                                    g_frm_P_NominaPago.P_Base_ValoresGenerales.Ejercicios_Listado.ToList(),
                                                    Variables.G_PREDEFINIDOFICHEROS_PAGONOMINAS.Id,
                                                    bol_CerrarPrimero,
                                                    lst_idPredefinidoCabecera,
                                                    g_mdl_PER_NominasPagos.id,
                                                    g_frm_P_NominaPago.g_mdl_PRV_OpcionesDetalle.opcion,
                                                    null};

                        //Pasamos los parametros al metodo y lo ejecutamos
                        mdl_ValorDevuelto_Modelo = (INTERNO_ValorDevuelto_Modelo)obj_MethodInfo_1.Invoke(obj_Clase_1, arr_Parametros_1);
                        //########################################################################################################################################################################

                        if (mdl_ValorDevuelto_Modelo.TodoCorrecto)
                        {
                            //Generar en ContaPlus si estuviera marcado
                            if (Variables.G_MDL_INTERNO_VALORESGENERALES_MODELO.Control != null &&
                                Variables.G_MDL_INTERNO_VALORESGENERALES_MODELO.Control.idVolcadoExportacion != null &&
                                Variables.G_MDL_INTERNO_VALORESGENERALES_MODELO.Control.idVolcadoExportacion.Equals(Variables.G_LNG_VOLCADOEXPORTACION_CONTAPLUS))
                            {
                                //idVolcadoCabecera, se coje de aquie porque si el documento no estaba cerrado, el idVolcadoCabecera se generar dentro
                                List<long> lst_idVolcadosCabecera = new List<long>();
                                if (mdl_ValorDevuelto_Modelo.Objeto_Auxiliar_3 != null &&
                                    mdl_ValorDevuelto_Modelo.Objeto_Auxiliar_3.ToString().Trim().Length > 0)
                                {
                                    lst_idVolcadosCabecera.Add(long.Parse(mdl_ValorDevuelto_Modelo.Objeto_Auxiliar_3.ToString()));
                                }

                                //Cargamos el ensamblado #########################################################################################################################################################################
                                Assembly m_assembly_2 = Assembly.LoadFrom(Variables.G_STR_LIBRERIA_RUTAINICIAL + @"\" + Variables.G_STR_LIBRERIA_CONTABILIDAD + ".dll");
                                //Obtenemos el tipo de la clase
                                Type m_type_2 = m_assembly_2.GetType("" + Variables.G_STR_LIBRERIA_CONTABILIDAD + "." + Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD);
                                //creamos la instancia
                                var obj_Clase_2 = Activator.CreateInstance(m_type_2);
                                //Cargamos el metodo solicitado
                                MethodInfo obj_MethodInfo_2 = obj_Clase_2.GetType().GetMethod(Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD_PROCEDIMIENTO_ACCIONDOCUMENTO_EXPORTAR_CONTAPLUS, BindingFlags.Instance | BindingFlags.NonPublic);

                                //Obtener valores
                                object[] arr_Parametros_2 = { lst_idVolcadosCabecera };

                                //Pasamos los parametros al metodo y lo ejecutamos
                                INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo_Exportar = (INTERNO_ValorDevuelto_Modelo)obj_MethodInfo_2.Invoke(obj_Clase_2, arr_Parametros_2);
                                //########################################################################################################################################################################

                                if (mdl_ValorDevuelto_Modelo_Exportar.TodoCorrecto)
                                {
                                    transaccion_SQL.Complete();
                                }
                                else
                                {
                                    mdl_ValorDevuelto_Modelo = mdl_ValorDevuelto_Modelo_Exportar;
                                }
                            }
                            else
                            {
                                transaccion_SQL.Complete();
                            }
                        }
                    }

                    transaccion_SQL.Dispose();
                }
                catch (ThreadAbortException ex)
                {
                    transaccion_SQL.Dispose();

                    Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Volcar_Documento_DoWork));

                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_VOLCAR_DOCUMENTO();
                }
                catch (Control_Errores)
                {
                    transaccion_SQL.Dispose();

                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_VOLCAR_DOCUMENTO();
                }
                catch (Exception ex)
                {
                    transaccion_SQL.Dispose();

                    Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Volcar_Documento_DoWork));

                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_VOLCAR_DOCUMENTO();
                }
                finally
                {
                    e.Result = mdl_ValorDevuelto_Modelo;
                }
            }
        }
        private void TareaAsincrona_Volcar_Documento_Completed(object sender, RunWorkerCompletedEventArgs e)
        {
            if (g_frm_PE_Esperando != null)
            {
                g_frm_PE_Esperando.Close();
                g_frm_PE_Esperando = null;
            }

            try
            {


                //Termino 
                INTERNO_ValorDevuelto_Modelo mdl_INTERNO_ValorDevuelto_Modelo_VOLCARVOLCAR_TERMINO = (INTERNO_ValorDevuelto_Modelo)e.Result;

                //Termino todo Correctamente
                if (mdl_INTERNO_ValorDevuelto_Modelo_VOLCARVOLCAR_TERMINO.TodoCorrecto)
                {
                    Mostrar_CerradoVolcado();

                    //Actualizar registro en Listado principal
                    if (g_frm_P_NominaPago.P_Base_PantallaOrigen != null)
                    {
                        List<INTERNO_ActualizarCampoListadoGeneral_Modelo> lst_INTERNO_ActualizarCampoListadoGeneral_Modelo = new List<INTERNO_ActualizarCampoListadoGeneral_Modelo>();
                        lst_INTERNO_ActualizarCampoListadoGeneral_Modelo.Add(new INTERNO_ActualizarCampoListadoGeneral_Modelo(g_mdl_PER_NominasPagos.id, nameof(INTERNO_PER_NominasPagos_Listado_Modelo.estado), Variables.G_STR_ESTADO_CONTABILIDAD_VOLCADO));

                        g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_ActualizarRegistros_Campo(lst_INTERNO_ActualizarCampoListadoGeneral_Modelo, G_ENUM_TIPOACCION.INT_MODIFICAR);
                    }
                }
                //Ocurrio un Error
                else
                {
                    Mensajes.MostrarMensaje(mdl_INTERNO_ValorDevuelto_Modelo_VOLCARVOLCAR_TERMINO.Mensaje);
                }
            }
            catch (Exception ex)
            { 
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Volcar_Documento_Completed));
            }
        }
        #endregion

        #region Desvolcar Documento
        public void Desvolcar_Documento()
        {
            try
            {
                g_frm_PE_Esperando = new PE_Esperando(Mensajes.G_STR_ESPERANDO_DESVOLCANDO_DOCUMENTO());

                BackgroundWorker obj_TareaAsincrona_Desvolcar_Documento = new BackgroundWorker();

                obj_TareaAsincrona_Desvolcar_Documento.DoWork += new DoWorkEventHandler(TareaAsincrona_Desvolcar_Documento_DoWork);
                obj_TareaAsincrona_Desvolcar_Documento.RunWorkerCompleted += new RunWorkerCompletedEventHandler(TareaAsincrona_Desvolcar_Documento_Completed);
                obj_TareaAsincrona_Desvolcar_Documento.RunWorkerAsync();

                //Mostrar Pantalla de Espera
                g_frm_PE_Esperando.ShowDialog();
            }
            catch (Exception ex)
            {
                if (g_frm_PE_Esperando != null)
                {
                    g_frm_PE_Esperando.Close();
                    g_frm_PE_Esperando = null;
                }

                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(Desvolcar_Documento));
            }
        }

        private void TareaAsincrona_Desvolcar_Documento_DoWork(object sender, DoWorkEventArgs e)
        {
            INTERNO_ValorDevuelto_Modelo mdl_ValorDevuelto_Modelo = new INTERNO_ValorDevuelto_Modelo();
            mdl_ValorDevuelto_Modelo.TodoCorrecto = true;
            mdl_ValorDevuelto_Modelo.Mensaje = "";

            using (TransactionScope transaccion_SQL = new TransactionScope(TransactionScopeOption.Required))
            {
                try
                {
                    long lng_idVolcadoCabecera_ABorrar = -1;
                    DateTime? dtt_Fecha = null;
                    if (g_lst_CTA_VolcadoCabecera != null && g_lst_CTA_VolcadoCabecera.Count > 0)
                    {
                        CTA_VolcadoCabecera mdl_CTA_VolcadoCabecera = g_lst_CTA_VolcadoCabecera.FirstOrDefault();
                        lng_idVolcadoCabecera_ABorrar = mdl_CTA_VolcadoCabecera.id;
                        dtt_Fecha = mdl_CTA_VolcadoCabecera.fecha;
                    }

                    //Cargamos el ensamblado #########################################################################################################################################################################
                    Assembly m_assembly_1 = Assembly.LoadFrom(Variables.G_STR_LIBRERIA_RUTAINICIAL + @"\" + Variables.G_STR_LIBRERIA_CONTABILIDAD + ".dll");
                    //Obtenemos el tipo de la clase
                    Type m_type_1 = m_assembly_1.GetType("" + Variables.G_STR_LIBRERIA_CONTABILIDAD + "." + Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD);
                    //creamos la instancia
                    var obj_Clase_1 = Activator.CreateInstance(m_type_1);
                    //Cargamos el metodo solicitado
                    MethodInfo obj_MethodInfo_1 = obj_Clase_1.GetType().GetMethod(Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD_PROCEDIMIENTO_ACCIONDOCUMENTO_DESVOLCAR, BindingFlags.Instance | BindingFlags.NonPublic);

                    //Obtener valores
                    object[] arr_Parametros_1 = {   lng_idVolcadoCabecera_ABorrar,
                                                    dtt_Fecha.Value,
                                                    g_frm_P_NominaPago.P_Base_ValoresGenerales.Ejercicios_Listado.ToList(),
                                                    Variables.G_PREDEFINIDOFICHEROS_PAGONOMINAS.Id,
                                                    null,
                                                    g_mdl_PER_NominasPagos.id,
                                                    g_frm_P_NominaPago.g_mdl_PRV_OpcionesDetalle.opcion,
                                                    null};

                    //Pasamos los parametros al metodo y lo ejecutamos
                    mdl_ValorDevuelto_Modelo = (INTERNO_ValorDevuelto_Modelo)obj_MethodInfo_1.Invoke(obj_Clase_1, arr_Parametros_1);
                    //########################################################################################################################################################################

                    if (mdl_ValorDevuelto_Modelo.TodoCorrecto)
                    {
                        //Termino transaccion
                        transaccion_SQL.Complete();
                    }
                    transaccion_SQL.Dispose();
                }
                catch (ThreadAbortException ex)
                {
                    transaccion_SQL.Dispose();

                    Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Desvolcar_Documento_DoWork));

                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_DESVOLCAR_DOCUMENTO();
                }
                catch (Control_Errores)
                {
                    transaccion_SQL.Dispose();

                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_DESVOLCAR_DOCUMENTO();
                }
                catch (Exception ex)
                {
                    transaccion_SQL.Dispose();

                    Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(TareaAsincrona_Desvolcar_Documento_DoWork));

                    mdl_ValorDevuelto_Modelo.TodoCorrecto = false;
                    mdl_ValorDevuelto_Modelo.Mensaje = Mensajes.G_STR_MENSAJES_ERROR_DESVOLCAR_DOCUMENTO();
                }
                finally
                {
                    e.Result = mdl_ValorDevuelto_Modelo;
                }
            }

        }
        private void TareaAsincrona_Desvolcar_Documento_Completed(object sender, RunWorkerCompletedEventArgs e)
        {
            if (g_frm_PE_Esperando != null)
            {
                g_frm_PE_Esperando.Close();
                g_frm_PE_Esperando = null;
            }

            //Termino 
            INTERNO_ValorDevuelto_Modelo mdl_INTERNO_ValorDevuelto_Modelo_VOLCARDESVOLCAR_TERMINO = (INTERNO_ValorDevuelto_Modelo)e.Result;

            //Termino todo Correctamente
            if (mdl_INTERNO_ValorDevuelto_Modelo_VOLCARDESVOLCAR_TERMINO.TodoCorrecto)
            {
                Mostrar_CerradoVolcado();

                //Actualizar registro en Listado principal
                if (g_frm_P_NominaPago.P_Base_PantallaOrigen != null)
                {
                    List<INTERNO_ActualizarCampoListadoGeneral_Modelo> lst_INTERNO_ActualizarCampoListadoGeneral_Modelo = new List<INTERNO_ActualizarCampoListadoGeneral_Modelo>();
                    lst_INTERNO_ActualizarCampoListadoGeneral_Modelo.Add(new INTERNO_ActualizarCampoListadoGeneral_Modelo(g_mdl_PER_NominasPagos.id, nameof(INTERNO_PER_NominasPagos_Listado_Modelo.estado), Variables.G_STR_ESTADO_CONTABILIDAD_CERRADO));

                    g_frm_P_NominaPago.P_Base_PantallaOrigen.P_Base_ActualizarRegistros_Campo(lst_INTERNO_ActualizarCampoListadoGeneral_Modelo, G_ENUM_TIPOACCION.INT_MODIFICAR);
                }
            }
            //Ocurrio un Error
            else
            {
                Mensajes.MostrarMensaje(mdl_INTERNO_ValorDevuelto_Modelo_VOLCARDESVOLCAR_TERMINO.Mensaje);
            }
        }
        #endregion

        #endregion

        #region Cargar Datos desde un vencimiento
        public void CargarDatos_Desde_Vencimiento(PER_NominasVencimientos _mdl_PER_NominasVencimientos)
        {
            try
            {
                //Vaciar
                Vaciar_Datos(G_ENUM_NIVELES.Inicio, G_ENUM_ACCIONES_VACIADO.Vaciar_SiActual, true, true);

                //Estado
                g_str_Estado = Variables.G_STR_ESTADO_CONTABILIDAD_ABIERTO;

                //Datos de la Nomina .......................................................................
                RellenarDatos_Nomina_Final(_mdl_PER_NominasVencimientos.idNomina,false);
                if (g_mdl_INTERNO_PER_Nominas_Modelo != null)
                {
                    //Codigo
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Id = g_mdl_INTERNO_PER_Nominas_Modelo.id;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_Codigo = g_mdl_INTERNO_PER_Nominas_Modelo.codigo.ToString();
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Simple_Nomina.Exferia_F3_SoloSeleccion_Simple_FechaBorrado = g_mdl_INTERNO_PER_Nominas_Modelo.fechaBorrado;
                }
                //.............................................................................................

                //Datos del Vencimiento .......................................................................
                RellenarDatos_Vencimiento_Final(_mdl_PER_NominasVencimientos.id,false);
                if (g_mdl_INTERNO_PER_NominasVencimientos_Modelo != null)
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Id = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.id;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Codigo = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.codigo.ToString();
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_Descripcion = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.observaciones;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_NominaVencimiento.Exferia_F3_SoloSeleccion_FechaBorrado = g_mdl_INTERNO_PER_NominasVencimientos_Modelo.fechaBorrado;
                }
                //...........................................................................................

                g_frm_P_NominaPago.Exferia_FechaSeleccion_Fecha.Exferia_FechaSeleccion_Fecha = g_frm_P_NominaPago.P_Base_FechaTrabajo.ToString("dd/MM/yyyy");

                //Tesoreria 
                if (_mdl_PER_NominasVencimientos.MAE_Tesorerias != null)
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Id = _mdl_PER_NominasVencimientos.MAE_Tesorerias.id;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Codigo = _mdl_PER_NominasVencimientos.MAE_Tesorerias.codigo;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Descripcion = _mdl_PER_NominasVencimientos.MAE_Tesorerias.descripcion;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_FechaBorrado = _mdl_PER_NominasVencimientos.MAE_Tesorerias.fechaBorrado;
                }
                else
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Id = -1;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Codigo = string.Empty;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_Descripcion = string.Empty;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_Tesoreria.Exferia_F3_SoloSeleccion_FechaBorrado = null;
                }

                //CTA_PredefinidosCabeceras_pago
                //Cargamos el ensamblado #########################################################################################################################################################################
                Assembly m_assembly_1 = Assembly.LoadFrom(Variables.G_STR_LIBRERIA_RUTAINICIAL + @"\" + Variables.G_STR_LIBRERIA_CONTABILIDAD + ".dll");
                //Obtenemos el tipo de la clase
                Type m_type_1 = m_assembly_1.GetType("" + Variables.G_STR_LIBRERIA_CONTABILIDAD + "." + Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD);
                //creamos la instancia
                var obj_Clase_1 = Activator.CreateInstance(m_type_1);
                //Cargamos el metodo solicitado
                MethodInfo obj_MethodInfo_1 = obj_Clase_1.GetType().GetMethod(Variables.G_STR_LIBRERIA_DATOSCONTABILIDAD_PROCEDIMIENTO_CTAPREDEFINIDOCABECERA_OBTENERMODELO_POR_DEFECTO, BindingFlags.Instance | BindingFlags.NonPublic);

                //Obtener valores
                object[] arr_Parametros_1 = { Variables.G_PREDEFINIDOFICHEROS_PAGONOMINAS.Id };

                //Pasamos los parametros al metodo y lo ejecutamos
                CTA_PredefinidosCabeceras mdl_CTA_PredefinidosCabeceras_Pago = (CTA_PredefinidosCabeceras)obj_MethodInfo_1.Invoke(obj_Clase_1, arr_Parametros_1);
                //##################################################################################################################################################################################################

                if (mdl_CTA_PredefinidosCabeceras_Pago != null &&
                    mdl_CTA_PredefinidosCabeceras_Pago.idPredefinidoFichero != null &&
                    mdl_CTA_PredefinidosCabeceras_Pago.idPredefinidoFichero.Value.Equals(Variables.G_PREDEFINIDOFICHEROS_PAGONOMINAS.Id))
                {
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Id = mdl_CTA_PredefinidosCabeceras_Pago.id;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Codigo = mdl_CTA_PredefinidosCabeceras_Pago.codigo;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_Descripcion = mdl_CTA_PredefinidosCabeceras_Pago.descripcion;
                    g_frm_P_NominaPago.Exferia_F3_SoloSeleccion_PredefinidoCabecera_Pago.Exferia_F3_SoloSeleccion_FechaBorrado = mdl_CTA_PredefinidosCabeceras_Pago.fechaBorrado;
                }

                //importe
                g_frm_P_NominaPago.Exferia_TextBox_Importe.Text = _mdl_PER_NominasVencimientos.importe.ToString();

                //Actualizar el control de Resumen de Facturas
                g_frm_P_NominaPago.CTU_Cartera_NominaPago.Rellenar_DataGrid(G_ENUM_CTU_CARTERA_PERSONAL_TIPODOCUMENTOFILTRO.Nomina, g_mdl_INTERNO_PER_Nominas_Modelo.id, true);
            }
            catch (Exception ex)
            {
                Control_Errores.Errores_Log("", ex, nameof(P_NominaPago_Controladora) + "/" + nameof(CargarDatos_Desde_Vencimiento));
                Mensajes.MostrarMensaje(Mensajes.G_STR_MENSAJES_GENERAL_ERROR_CARGARDATOSPANTALLA());
                g_frm_P_NominaPago.Salir_P_Base();
            }
        }
        #endregion
    }
}
