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