From 17cf5c8bebf9022c2f5c7931ce80bcde78e4af7e Mon Sep 17 00:00:00 2001 From: HECTOR RODRIGUEZ Date: Tue, 4 May 2021 17:53:30 -0700 Subject: [PATCH] cambio en el campo IVA --- Bancos/DepositosCaja.aspx | 9 +++++---- Bancos/DepositosCaja.aspx.vb | 16 +++++++++++----- 2 files changed, 16 insertions(+), 9 deletions(-) diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx index ceae430b7..445f02eb9 100644 --- a/Bancos/DepositosCaja.aspx +++ b/Bancos/DepositosCaja.aspx @@ -272,6 +272,7 @@ var comision = 0; var descuento = 0; var saldo = 0; + var IVA = 0 function FnSuma(chk, cantidad) { var saldoInicial = ToDouble($('#C_lblValorTotal').text()); @@ -375,7 +376,7 @@ $('#C_TxtComision').val(0) alert("No es posible poner una comision superior a lo seleccionado") } else { - saldo = ValorTotalSeleccionado + comision2 + descuento; + saldo = ValorTotalSeleccionado + comision2 + descuento + IVA; $('#C_lblValorTotal').text(FormatoNumero(saldo, 2)); comision = ToDouble($('#C_TxtComision').val()) } @@ -392,7 +393,7 @@ $('#C_TxtDescuento').val(descuento) alert("No es posible poner un descuento superior a lo seleccionado") } else { - saldo = ValorTotalSeleccionado + comision2 + comision; + saldo = ValorTotalSeleccionado + comision2 + comision + IVA; $('#C_lblValorTotal').text(FormatoNumero(saldo, 2)); descuento = ToDouble($('#C_TxtDescuento').val()) } @@ -410,9 +411,9 @@ $('#C_TxtIVA').val(descuento) alert("No es posible poner un IVA superior a lo seleccionado") } else { - saldo = ValorTotalSeleccionado + comision2 + comision; + saldo = ValorTotalSeleccionado + descuento + comision + comision2; $('#C_lblValorTotal').text(FormatoNumero(saldo, 2)); - descuento = ToDouble($('#C_TxtDescuento').val()) + IVA = ToDouble($('#C_TxtIVA').val()) } } diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb index a0f7165c5..b245a4e7d 100644 --- a/Bancos/DepositosCaja.aspx.vb +++ b/Bancos/DepositosCaja.aspx.vb @@ -165,14 +165,20 @@ Partial Class Bancos_DepositosCaja If ChkFaltante.Checked Then CveSubProyecto = DdlSubProyectoDeposito.SelectedValue.ToEntero CveClasificacion = DdlClasificacion.SelectedValue.ToEntero - - If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, True, Comision, DdlClasificacion.SelectedItem.Text, 51, DdlClasificacion.SelectedItem.Text, Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then - OcurrioError = True + If Comision <> 0 Then + If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, True, Comision, DdlClasificacion.SelectedItem.Text, 51, DdlClasificacion.SelectedItem.Text, Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then + OcurrioError = True + End If End If - If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, True, IVA, DdlClasificacion.SelectedItem.Text, 14, DdlClasificacion.SelectedItem.Text, Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then - OcurrioError = True + + If IVA <> 0 Then + IVA = CDec(0.16) + If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, True, IVA, DdlClasificacion.SelectedItem.Text, 14, DdlClasificacion.SelectedItem.Text, Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then + OcurrioError = True + End If End If + End If If ChkDescuento.Checked Then