From bff89fa84ceb88bb859df6276c6ff363c247d675 Mon Sep 17 00:00:00 2001 From: rakcsle Date: Tue, 21 Jan 2025 15:31:02 -0700 Subject: [PATCH] =?UTF-8?q?5=20Fecha=20de=20pago:=20Aumentar=20d=C3=ADas,?= =?UTF-8?q?=20en:=20ProveedoresAbonar,=20PopUpIE,=20ExC,=20Deudores,=20Acr?= =?UTF-8?q?eedores,=20transferencias=20entre=20cuentas,=20-=20Pendiente=20?= =?UTF-8?q?fechas=20anteriores-?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Bancos/PagoAcreedor.aspx | 18 ++- Bancos/PagoAcreedor.aspx.cs | 222 ++++++++++++++++++++++--------- Bancos/PagoDeudor.aspx | 18 ++- Bancos/PagoDeudor.aspx.cs | 93 +++++++++++++ Bancos/ProveedoresAbonar.aspx | 7 +- Bancos/ProveedoresAbonar.aspx.vb | 7 +- Bancos/Transferencias.aspx | 7 + Bancos/Transferencias.aspx.vb | 36 +++++ 8 files changed, 333 insertions(+), 75 deletions(-) diff --git a/Bancos/PagoAcreedor.aspx b/Bancos/PagoAcreedor.aspx index eeca92ae5..bf3356817 100644 --- a/Bancos/PagoAcreedor.aspx +++ b/Bancos/PagoAcreedor.aspx @@ -28,7 +28,8 @@
- + @@ -71,6 +72,12 @@ + + + +
@@ -155,7 +162,8 @@
- + @@ -201,6 +209,12 @@ + + + +
diff --git a/Bancos/PagoAcreedor.aspx.cs b/Bancos/PagoAcreedor.aspx.cs index 2605d9662..9643bbd97 100644 --- a/Bancos/PagoAcreedor.aspx.cs +++ b/Bancos/PagoAcreedor.aspx.cs @@ -12,7 +12,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas { #region "PROPIEDADES" - + private int CveMonedaCuentaPago { get @@ -36,7 +36,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas protected void Page_Load(object sender, EventArgs e) { if (!IsPostBack) - { + { CveMonedaCuentaPago = 0; rowComisiones.Visible = true; @@ -53,18 +53,21 @@ public partial class Bancos_PagoAcreedor : ClsPaginas CargarCentrosDeCosto(null, null, null, LblSubProyecto); LblSubProyecto2.Text = LblSubProyecto.Text; + ValidaFechaDocumentoDiasPosterioresPrestamo(); + ValidaFechaDocumentoDiasPosteriores(); + } } private void CargaSubproyectos() { - DdlSubProyecto.DataSource = get_GlobalDTSubProyectos( UsuarioActual.CveEmpresa); + DdlSubProyecto.DataSource = get_GlobalDTSubProyectos(UsuarioActual.CveEmpresa); DdlSubProyecto.DataBind(); DdlSubProyecto.Items.Insert(0, new ListItem("Seleccione", "-1")); - DdlSubProyectoPago.DataSource = get_GlobalDTSubProyectos( UsuarioActual.CveEmpresa); + DdlSubProyectoPago.DataSource = get_GlobalDTSubProyectos(UsuarioActual.CveEmpresa); DdlSubProyectoPago.DataBind(); DdlSubProyectoPago.Items.Insert(0, new ListItem("Seleccione", "-1")); @@ -116,7 +119,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas CveMonedaCuentaPago = 0; if (dr != null) { - CveMonedaCuentaPago = dr["CveMoneda"].ToString().ToEntero(); + CveMonedaCuentaPago = dr["CveMoneda"].ToString().ToEntero(); } if (CveMonedaCuentaPago != 1) @@ -144,8 +147,8 @@ public partial class Bancos_PagoAcreedor : ClsPaginas bancos.Dispose(); TxtFolio.Text = Folio.ToString(); - - TxtDDImporte.Attributes.Add("onblur",$"validaDeudoresDiversos({CveMonedaCuentaPago});FormatoMoneda(this);"); + + TxtDDImporte.Attributes.Add("onblur", $"validaDeudoresDiversos({CveMonedaCuentaPago});FormatoMoneda(this);"); UpDatos.Update(); } @@ -231,7 +234,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas { decimal ImporteBanco = TxtImporte.Text.ToDecimal(); decimal ImporteMNBanco = ImporteBanco; - decimal ImporteComplementaria = 0; + decimal ImporteComplementaria = 0; decimal TCPago = TxtTCPago.Text.ToDecimal(); string Conc = TxtObservaciones.Text == "" ? TxtFolio.Text : TxtObservaciones.Text; string Ref = TxtObservaciones.Text == "" ? TxtFolio.Text : TxtObservaciones.Text; @@ -243,14 +246,14 @@ public partial class Bancos_PagoAcreedor : ClsPaginas if (CveIE > 0) { - + decimal Importe; decimal ImporteMN; decimal ImporteComision; decimal ImporteComisionMN; decimal AcumImporteMN = 0; decimal ImporteBancosMN, ImporteAcreedorMN; - bool TipoMovtoComision = false; + bool TipoMovtoComision = false; int CveConceptoDiferenciaCambiaria = 0; //GUARDA PREPOLIZAS DETALLE @@ -262,7 +265,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas ImporteAcreedorMN = Importe; ImporteBancosMN = Importe; ImporteComisionMN = ImporteComision; - ImporteComplementaria = 0; + ImporteComplementaria = 0; if (gvr.FCTextBox("TxtComision").Text.ToDecimal() < 0) { @@ -273,7 +276,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas else { TipoMovtoComision = false; - } + } if (gvr.FCCheckBox("Chk").Checked) { @@ -308,7 +311,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas } else if (CveMonedaPago == 2 && tCveMoneda == 2) { - + //ImporteComisionMN = ImporteComision; //ImporteMN = Importe; //ImporteComplementaria = (Importe * TC - Importe).RoundSQL(); @@ -318,48 +321,48 @@ public partial class Bancos_PagoAcreedor : ClsPaginas //ImporteComplementaria = ImporteComplementaria.RoundSQL(); ImporteComisionMN = ImporteComisionMN.RoundSQL(); ImporteComision = ImporteComision.RoundSQL(); - AcumImporteMN += ImporteMN; - - if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, ImporteMN, CveConceptoContablePago, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) + AcumImporteMN += ImporteMN; + + if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, ImporteMN, CveConceptoContablePago, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) { MsgError = "No se pudo insertar concepto de pago acreedor"; break; - } - + } + if (tCveMoneda > 1 && MsgError == "") { ImporteComplementaria = (Importe * TC - Importe).RoundSQL(); - if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, ImporteComplementaria, CveConceptoContablePrestamoComplementario, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), ImporteME: Importe, TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) + if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, ImporteComplementaria, CveConceptoContablePrestamoComplementario, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), ImporteME: Importe, TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) MsgError = "No se pudo insertar concepto de acreedor complementaria"; } - if (ImporteBancosMN != ImporteAcreedorMN && MsgError == "") - { - bool TipoMovto = false; + if (ImporteBancosMN != ImporteAcreedorMN && MsgError == "") + { + bool TipoMovto = false; if (TCPago > TC) { CveConceptoDiferenciaCambiaria = 65; - TipoMovto = false; + TipoMovto = false; } else if (TCPago < TC) { CveConceptoDiferenciaCambiaria = 64; TipoMovto = true; } - Importe = ((Importe * TCPago) - (Importe * TC)).Abs(); + Importe = ((Importe * TCPago) - (Importe * TC)).Abs(); - if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovto, Importe, Importe, CveConceptoDiferenciaCambiaria, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteME: Importe, CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) + if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovto, Importe, Importe, CveConceptoDiferenciaCambiaria, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteME: Importe, CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) MsgError = "No se pudo insertar concepto de diferencia cambiaria"; } - - if (ImporteComision != 0 && MsgError == "" && DdlOtrosPagos.SelectedValue == "2" ) + + if (ImporteComision != 0 && MsgError == "" && DdlOtrosPagos.SelectedValue == "2") { - + ImporteComisionMN = (ImporteComision * TCPago).RoundSQL(); int tTipoConceptoOtro = 255; //if (DdlOtrosPagos.SelectedValue == "3") tTipoConceptoOtro = 43; //deudores diversos - if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoComision, ImporteComision, ImporteComisionMN, tTipoConceptoOtro, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(),CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) + if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoComision, ImporteComision, ImporteComisionMN, tTipoConceptoOtro, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) { MsgError = "No se pudo insertar concepto de pago acreedor"; break; @@ -389,30 +392,30 @@ public partial class Bancos_PagoAcreedor : ClsPaginas //CveMonedaPago ImporteComision = ImporteComision.RoundSQL(); - ImporteComisionMN = (ImporteComision * TCPago).RoundSQL() ; + ImporteComisionMN = (ImporteComision * TCPago).RoundSQL(); ImporteComisionMN = (ImporteComision * TCPago).RoundSQL(); - + int tTipoConceptoOtro = 43; //deudores diversos if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoComision, ImporteComision, ImporteComisionMN, tTipoConceptoOtro, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), TipoCambio: TCPago, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) { - MsgError = "No se pudo insertar concepto de pago acreedor"; + MsgError = "No se pudo insertar concepto de pago acreedor"; } } if (CveMonedaPago != 1) - { - ImporteComplementaria = (ImporteBanco * TCPago - ImporteBanco).RoundSQL(); + { + ImporteComplementaria = (ImporteBanco * TCPago - ImporteBanco).RoundSQL(); } - if (MsgError == "" && !ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, ImporteBanco, ImporteBanco, 30, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(),ImporteME: ImporteBanco, TipoCambio: TCPago, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) MsgError = "No se pudo insertar concepto de bancos"; - + if (MsgError == "" && !ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, ImporteBanco, ImporteBanco, 30, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteME: ImporteBanco, TipoCambio: TCPago, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) MsgError = "No se pudo insertar concepto de bancos"; + //movimiento de ajuste por sino se aplicó en el proceso anterior - if (MsgError == "" && CveMonedaPago != 1 ) + if (MsgError == "" && CveMonedaPago != 1) { - if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, ImporteBanco, ImporteComplementaria, 204, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteME: ImporteBanco, TipoCambio: TCPago, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) MsgError = "No se pudo insertar concepto de bancos complementaria"; - } + if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, ImporteBanco, ImporteComplementaria, 204, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteME: ImporteBanco, TipoCambio: TCPago, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) MsgError = "No se pudo insertar concepto de bancos complementaria"; + } } else @@ -426,15 +429,15 @@ public partial class Bancos_PagoAcreedor : ClsPaginas } //VALIDA QUE CUADRE LA PREPOLIZA - Usuario UA = UsuarioActual; - if (MsgError == "" && ObjMov.ValidacionesPrePoliza(CvePrePoliza, ref UA,Opcion:5)) + Usuario UA = UsuarioActual; + if (MsgError == "" && ObjMov.ValidacionesPrePoliza(CvePrePoliza, ref UA, Opcion: 5)) { if (ObjMov.ValorPolizaDescuadre > 0) { MsgError = ObjMov.MensajePolizaDescuadre; ModExtensiones.GuardaLogAD($"Bancos/IE PAGO ACREEDOR | Error:{ObjMov.MensajePolizaDescuadre} Diferencia:{ObjMov.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas"); } - } + } if (MsgError.Equals("")) { @@ -445,10 +448,10 @@ public partial class Bancos_PagoAcreedor : ClsPaginas } //GUARDA COMPROBANTE - if (!filemove.Equals("")) - { - filemove.FilesMove(CveIE.ToString(), string.Format(@"{0}IE", UsuarioActual.Empresa.Ruta), ConcatenarDirectorioBase: false); - } + if (!filemove.Equals("")) + { + filemove.FilesMove(CveIE.ToString(), string.Format(@"{0}IE", UsuarioActual.Empresa.Ruta), ConcatenarDirectorioBase: false); + } System.IO.FileInfo archivo = null; if (DdlTipoTransaccion.SelectedValue.ToEntero().Contiene(2, 8, 9)) @@ -481,10 +484,10 @@ public partial class Bancos_PagoAcreedor : ClsPaginas //{ // Msg.AppendFormat(@"

Ver Póliza", IDPoliza); //} - + Msg.AppendFormat(@"Ver Póliza
", CvePrePoliza); Msg.AppendFormat($"Imprimir"); - + } else { @@ -542,8 +545,8 @@ public partial class Bancos_PagoAcreedor : ClsPaginas } private void AsignaCuentaProveedor(int CveProveedor) - { - + { + } protected void BtnGuardarPrestamo_Click(object sender, EventArgs e) @@ -597,8 +600,8 @@ public partial class Bancos_PagoAcreedor : ClsPaginas if (CveMoneda != 1) { - ImporteMN = Importe; - ImporteComplementaria = Importe * TC - Importe; + ImporteMN = Importe; + ImporteComplementaria = Importe * TC - Importe; } @@ -611,7 +614,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas filemove.FilesMove(CveIE.ToString(), string.Format(@"{0}IE", UsuarioActual.Empresa.Ruta), ConcatenarDirectorioBase: false); } - if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, ImporteMN,CveConceptoContableBanco, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) + if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, ImporteMN, CveConceptoContableBanco, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) { MsgError = "No se pudo insertar concepto de bancos"; } @@ -619,23 +622,23 @@ public partial class Bancos_PagoAcreedor : ClsPaginas if (CveMoneda != 1) { - if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, ImporteMN, CveConceptoContablePrestamo, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) + if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, ImporteMN, CveConceptoContablePrestamo, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) { MsgError = "No se pudo insertar concepto de acreedor"; - } - if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, ImporteComplementaria, CveConceptoContableBancoComplementario, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteME: Importe, TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) + } + if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, ImporteComplementaria, CveConceptoContableBancoComplementario, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteME: Importe, TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) { MsgError = "No se pudo insertar concepto de bancos complementaria"; } - if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, ImporteComplementaria, CveConceptoContablePrestamoComplementario, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteME: Importe, TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) + if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, ImporteComplementaria, CveConceptoContablePrestamoComplementario, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteME: Importe, TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) { MsgError = "No se pudo insertar concepto de acreedor complementaria"; } - + } else { - if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, ImporteMN, CveConceptoContablePrestamo, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) + if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, ImporteMN, CveConceptoContablePrestamo, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) { MsgError = "No se pudo insertar concepto de acreedor"; } @@ -653,14 +656,14 @@ public partial class Bancos_PagoAcreedor : ClsPaginas //VALIDA QUE CUADRE LA POLIZA Usuario UA = UsuarioActual; - if (MsgError == "" && ObjMov.ValidacionesPrePoliza(CvePrePoliza, ref UA, Opcion: 5)) + if (MsgError == "" && ObjMov.ValidacionesPrePoliza(CvePrePoliza, ref UA, Opcion: 5)) { if (ObjMov.ValorPolizaDescuadre > 0) { MsgError = ObjMov.MensajePolizaDescuadre; ModExtensiones.GuardaLogAD($"Bancos/IE PAGO ACREEDOR | Error:{ObjMov.MensajePolizaDescuadre} Diferencia:{ObjMov.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas"); } - } + } if (MsgError.Equals("")) { @@ -808,7 +811,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas divDD.Visible = false; if (DdlOtrosPagos.SelectedValue == "2") { - TxtOtrosImportes.Visible = true; + TxtOtrosImportes.Visible = true; TxtTotal.Visible = true; GvMovAcreedor.Columns[8].Visible = true; TxtOtrosImportes.Text = ""; @@ -818,14 +821,14 @@ public partial class Bancos_PagoAcreedor : ClsPaginas else { if (DdlOtrosPagos.SelectedValue == "3") - { + { TxtDDImporte.Text = ""; divDD.Visible = true; RegistraScript($"$get('TxtImporte').value = FormatoNumero(SumaValores({CveMonedaCuentaPago}), 2);"); - } + } TxtOtrosImportes.Visible = false; TxtTotal.Visible = false; - GvMovAcreedor.Columns[8].Visible = false; + GvMovAcreedor.Columns[8].Visible = false; } UpDatos.Update(); UpMovAcreedor.Update(); @@ -835,4 +838,93 @@ public partial class Bancos_PagoAcreedor : ClsPaginas { CargaReporte(); } + + + + + protected void DdlTipoTransaccion_SelectedIndexChanged(object sender, EventArgs e) + { + ValidaFechaDocumentoDiasPosteriores(); + } + + protected void RVTxtFechaDocumento_Init(object sender, EventArgs e) + { + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(2).ToShortDateString(); + RVTxtFechaDocumento.MinimumValue = NowADS().AddMonths(-38).ToShortDateString(); + Calendario.EndDate = NowADS().AddDays(2); + } + + private void ValidaFechaDocumentoDiasPosteriores() + { + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(3).ToShortDateString(); + RVTxtFechaDocumento.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 días de la fecha actual"; + + Calendario.EndDate = NowADS().AddDays(3); + + // Equivalente a: If DdlTipoMovto.SelectedValue.Contiene("1", "16") Then + // Suponiendo que "Contiene" verifique si SelectedValue es "1" o "16" + if (DdlTipoTransaccion.SelectedValue == "1" || DdlTipoTransaccion.SelectedValue == "16") + { + // cheques, 3 meses + RVTxtFechaDocumento.MaximumValue = NowADS().AddMonths(3).ToShortDateString(); + RVTxtFechaDocumento.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 meses de la fecha actual"; + Calendario.EndDate = NowADS().AddMonths(3); + } + + // transfer, 3 semanas + if (DdlTipoTransaccion.SelectedValue == "2") + { + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(21).ToShortDateString(); + RVTxtFechaDocumento.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 semanas de la fecha actual"; + Calendario.EndDate = NowADS().AddDays(21); + } + + UpDatos.Update(); + //UpGuardar.Update(); + } + + + + + protected void DdlTipoTransanccionPrestamo_SelectedIndexChanged(object sender, EventArgs e) + { + ValidaFechaDocumentoDiasPosterioresPrestamo(); + } + protected void RVTxtFechaPrestamo_Init(object sender, EventArgs e) + { + RVTxtFechaPrestamo.MaximumValue = NowADS().AddDays(2).ToShortDateString(); + RVTxtFechaPrestamo.MinimumValue = NowADS().AddMonths(-38).ToShortDateString(); + CalendarioPrestamo.EndDate = NowADS().AddDays(2); + + } + + private void ValidaFechaDocumentoDiasPosterioresPrestamo() + { + RVTxtFechaPrestamo.MaximumValue = NowADS().AddDays(3).ToShortDateString(); + RVTxtFechaPrestamo.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 días de la fecha actual"; + + CalendarioPrestamo.EndDate = NowADS().AddDays(3); + + // Equivalente a: If DdlTipoMovto.SelectedValue.Contiene("1", "16") Then + // Suponiendo que "Contiene" verifique si SelectedValue es "1" o "16" + if (DdlTipoTransanccionPrestamo.SelectedValue == "1" || DdlTipoTransanccionPrestamo.SelectedValue == "16") + { + // cheques, 3 meses + RVTxtFechaPrestamo.MaximumValue = NowADS().AddMonths(3).ToShortDateString(); + RVTxtFechaPrestamo.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 meses de la fecha actual"; + CalendarioPrestamo.EndDate = NowADS().AddMonths(3); + } + + // transfer, 3 semanas + if (DdlTipoTransanccionPrestamo.SelectedValue == "2") + { + RVTxtFechaPrestamo.MaximumValue = NowADS().AddDays(21).ToShortDateString(); + RVTxtFechaPrestamo.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 semanas de la fecha actual"; + CalendarioPrestamo.EndDate = NowADS().AddDays(21); + } + + UpPrestamo.Update(); + + } + } diff --git a/Bancos/PagoDeudor.aspx b/Bancos/PagoDeudor.aspx index 09e008c7e..09be4eddd 100644 --- a/Bancos/PagoDeudor.aspx +++ b/Bancos/PagoDeudor.aspx @@ -42,7 +42,8 @@
- + @@ -95,6 +96,12 @@ + + + +
@@ -209,7 +216,8 @@
- + @@ -263,6 +271,12 @@ + + + +
diff --git a/Bancos/PagoDeudor.aspx.cs b/Bancos/PagoDeudor.aspx.cs index e2af4114e..10ebf8179 100644 --- a/Bancos/PagoDeudor.aspx.cs +++ b/Bancos/PagoDeudor.aspx.cs @@ -56,6 +56,9 @@ public partial class Bancos_PagoDeudor : ClsPaginas TxtImporte.Attributes.Add("disabled", "disabled"); CargarCentrosDeCosto(null, null, null, LblSubProyecto); LblSubProyecto2.Text = LblSubProyecto.Text; + + ValidaFechaDocumentoDiasPosterioresPrestamo(); + ValidaFechaDocumentoDiasPosteriores(); } } @@ -372,6 +375,48 @@ public partial class Bancos_PagoDeudor : ClsPaginas if (ObjComp != null) ObjComp.Dispose(); } + + protected void DdlTipoTransaccionPrestamo_SelectedIndexChanged(object sender, EventArgs e) + { + ValidaFechaDocumentoDiasPosterioresPrestamo(); + } + protected void RVTxtFechaPrestamo_Init(object sender, EventArgs e) + { + RVTxtFechaPrestamo.MaximumValue = NowADS().AddDays(2).ToShortDateString(); + RVTxtFechaPrestamo.MinimumValue = NowADS().AddMonths(-38).ToShortDateString(); + CalendarioPrestamo.EndDate = NowADS().AddDays(2); + + } + + private void ValidaFechaDocumentoDiasPosterioresPrestamo() + { + RVTxtFechaPrestamo.MaximumValue = NowADS().AddDays(3).ToShortDateString(); + RVTxtFechaPrestamo.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 días de la fecha actual"; + + CalendarioPrestamo.EndDate = NowADS().AddDays(3); + + // Equivalente a: If DdlTipoMovto.SelectedValue.Contiene("1", "16") Then + // Suponiendo que "Contiene" verifique si SelectedValue es "1" o "16" + if (DdlTipoTransaccionPrestamo.SelectedValue == "1" || DdlTipoTransaccionPrestamo.SelectedValue == "16") + { + // cheques, 3 meses + RVTxtFechaPrestamo.MaximumValue = NowADS().AddMonths(3).ToShortDateString(); + RVTxtFechaPrestamo.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 meses de la fecha actual"; + CalendarioPrestamo.EndDate = NowADS().AddMonths(3); + } + + // transfer, 3 semanas + if (DdlTipoTransaccionPrestamo.SelectedValue == "2") + { + RVTxtFechaPrestamo.MaximumValue = NowADS().AddDays(21).ToShortDateString(); + RVTxtFechaPrestamo.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 semanas de la fecha actual"; + CalendarioPrestamo.EndDate = NowADS().AddDays(21); + } + + UpPrestamo.Update(); + //UpGuardar.Update(); + } + #endregion #region "PAGO DEUDORES" @@ -830,4 +875,52 @@ public partial class Bancos_PagoDeudor : ClsPaginas TxtFechaDocumento.Attributes.Remove("onchange"); DivImporteME.Visible = false; } + + + + protected void DdlTipoTransaccion_SelectedIndexChanged(object sender, EventArgs e) + { + ValidaFechaDocumentoDiasPosteriores(); + } + + protected void RVTxtFechaDocumento_Init(object sender, EventArgs e) + { + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(2).ToShortDateString(); + RVTxtFechaDocumento.MinimumValue = NowADS().AddMonths(-38).ToShortDateString(); + Calendario.EndDate = NowADS().AddDays(2); + } + + private void ValidaFechaDocumentoDiasPosteriores() + { + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(3).ToShortDateString(); + RVTxtFechaDocumento.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 días de la fecha actual"; + + Calendario.EndDate = NowADS().AddDays(3); + + // Equivalente a: If DdlTipoMovto.SelectedValue.Contiene("1", "16") Then + // Suponiendo que "Contiene" verifique si SelectedValue es "1" o "16" + if (DdlTipoTransaccion.SelectedValue == "1" || DdlTipoTransaccion.SelectedValue == "16") + { + // cheques, 3 meses + RVTxtFechaDocumento.MaximumValue = NowADS().AddMonths(3).ToShortDateString(); + RVTxtFechaDocumento.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 meses de la fecha actual"; + Calendario.EndDate = NowADS().AddMonths(3); + } + + // transfer, 3 semanas + if (DdlTipoTransaccion.SelectedValue == "2") + { + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(21).ToShortDateString(); + RVTxtFechaDocumento.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 semanas de la fecha actual"; + Calendario.EndDate = NowADS().AddDays(21); + } + + UpMovDeudor.Update(); + //UpGuardar.Update(); + } + + + + + } \ No newline at end of file diff --git a/Bancos/ProveedoresAbonar.aspx b/Bancos/ProveedoresAbonar.aspx index c2daed3a9..41b6c9341 100644 --- a/Bancos/ProveedoresAbonar.aspx +++ b/Bancos/ProveedoresAbonar.aspx @@ -105,15 +105,16 @@ - + + - - + <%-- + --%> diff --git a/Bancos/ProveedoresAbonar.aspx.vb b/Bancos/ProveedoresAbonar.aspx.vb index 288fe1d16..96b6496a6 100644 --- a/Bancos/ProveedoresAbonar.aspx.vb +++ b/Bancos/ProveedoresAbonar.aspx.vb @@ -1714,8 +1714,9 @@ Partial Class Bancos_ProveedoresAbonar Private Sub RVTxtFechaDocumento_Init(sender As Object, e As EventArgs) Handles RVTxtFechaDocumento.Init RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(2).ToShortDateString - RVTxtFechaDocumentoMenor.MinimumValue = NowADS().AddMonths(-38).ToShortDateString - RVTxtFechaDocumentoMenor.MaximumValue = NowADS().AddDays(2).ToShortDateString + RVTxtFechaDocumento.MinimumValue = NowADS().AddMonths(-38).ToShortDateString + 'RVTxtFechaDocumentoMenor.MinimumValue = NowADS().AddMonths(-38).ToShortDateString + 'RVTxtFechaDocumentoMenor.MaximumValue = NowADS().AddDays(2).ToShortDateString Calendario.EndDate = NowADS().AddDays(2) End Sub @@ -1724,7 +1725,7 @@ Partial Class Bancos_ProveedoresAbonar RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(3).ToShortDateString - RVTxtFechaDocumentoMenor.MaximumValue = NowADS().AddDays(3).ToShortDateString + 'RVTxtFechaDocumentoMenor.MaximumValue = NowADS().AddDays(3).ToShortDateString RVTxtFechaDocumento.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 días de la fecha actual" Calendario.EndDate = NowADS().AddDays(3) diff --git a/Bancos/Transferencias.aspx b/Bancos/Transferencias.aspx index 2ea396687..652eb1306 100644 --- a/Bancos/Transferencias.aspx +++ b/Bancos/Transferencias.aspx @@ -82,6 +82,13 @@ + + + + + + diff --git a/Bancos/Transferencias.aspx.vb b/Bancos/Transferencias.aspx.vb index 2094cb900..5541134c4 100644 --- a/Bancos/Transferencias.aspx.vb +++ b/Bancos/Transferencias.aspx.vb @@ -78,6 +78,7 @@ Partial Class Bancos_Transferencias DdlTipoMovto_SelectedIndexChanged(Nothing, Nothing) + End If End Sub @@ -616,6 +617,9 @@ Partial Class Bancos_Transferencias RFVTxtPaguese.Visible = True End If End If + + ValidaFechaDocumentoDiasPosteriores() + UPPDatos.Update() End Sub @@ -662,4 +666,36 @@ Partial Class Bancos_Transferencias DdlCajaChica.Items.Insert(0, New ListItem("Seleccione", "-1")) End Sub + + Private Sub RVTxtFechaDocumento_Init(sender As Object, e As EventArgs) Handles RVTxtFechaDocumento.Init + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(2).ToShortDateString + RVTxtFechaDocumento.MinimumValue = NowADS().AddMonths(-38).ToShortDateString + Calendario.EndDate = NowADS().AddDays(2) + + End Sub + + Private Sub ValidaFechaDocumentoDiasPosteriores() + + + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(3).ToShortDateString + RVTxtFechaDocumento.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 días de la fecha actual" + + Calendario.EndDate = NowADS().AddDays(3) + + If DdlTipoMovto.SelectedValue.Contiene("1", "16") Then 'cheques, 3meses + RVTxtFechaDocumento.MaximumValue = NowADS().AddMonths(3).ToShortDateString + RVTxtFechaDocumento.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 meses de la fecha actual" + Calendario.EndDate = NowADS().AddMonths(3) + End If + If DdlTipoMovto.SelectedValue = "2" Then 'transfer, 3semanas + RVTxtFechaDocumento.MaximumValue = NowADS().AddDays(21).ToShortDateString + RVTxtFechaDocumento.ErrorMessage = "ERROR:
La fecha del documento no puede ser superior a 3 semanas de la fecha actual" + Calendario.EndDate = NowADS().AddDays(21) + End If + + UPPDatos.Update() + 'UpGuardar.Update() + + End Sub + End Class