AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

cambio en el campo IVA

Browse Source
This commit is contained in:
HECTOR RODRIGUEZ
2021-05-04 17:53:30 -07:00
parent d6b17f9df1
commit 17cf5c8beb
2 changed files with 16 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
Bancos/DepositosCaja.aspx
View File

@@ -272,6 +272,7 @@
var comision = 0; var comision = 0;
var descuento = 0; var descuento = 0;
var saldo = 0; var saldo = 0;
var IVA = 0
function FnSuma(chk, cantidad) { function FnSuma(chk, cantidad) {
var saldoInicial = ToDouble($('#C_lblValorTotal').text()); var saldoInicial = ToDouble($('#C_lblValorTotal').text());
@@ -375,7 +376,7 @@
$('#C_TxtComision').val(0) $('#C_TxtComision').val(0)
alert("No es posible poner una comision superior a lo seleccionado") alert("No es posible poner una comision superior a lo seleccionado")
} else { } else {
saldo = ValorTotalSeleccionado + comision2 + descuento; saldo = ValorTotalSeleccionado + comision2 + descuento + IVA;
$('#C_lblValorTotal').text(FormatoNumero(saldo, 2)); $('#C_lblValorTotal').text(FormatoNumero(saldo, 2));
comision = ToDouble($('#C_TxtComision').val()) comision = ToDouble($('#C_TxtComision').val())
} }
@@ -392,7 +393,7 @@
$('#C_TxtDescuento').val(descuento) $('#C_TxtDescuento').val(descuento)
alert("No es posible poner un descuento superior a lo seleccionado") alert("No es posible poner un descuento superior a lo seleccionado")
} else { } else {
saldo = ValorTotalSeleccionado + comision2 + comision; saldo = ValorTotalSeleccionado + comision2 + comision + IVA;
$('#C_lblValorTotal').text(FormatoNumero(saldo, 2)); $('#C_lblValorTotal').text(FormatoNumero(saldo, 2));
descuento = ToDouble($('#C_TxtDescuento').val()) descuento = ToDouble($('#C_TxtDescuento').val())
} }
@@ -410,9 +411,9 @@
$('#C_TxtIVA').val(descuento) $('#C_TxtIVA').val(descuento)
alert("No es posible poner un IVA superior a lo seleccionado") alert("No es posible poner un IVA superior a lo seleccionado")
} else { } else {
saldo = ValorTotalSeleccionado + comision2 + comision; saldo = ValorTotalSeleccionado + descuento + comision + comision2;
$('#C_lblValorTotal').text(FormatoNumero(saldo, 2)); $('#C_lblValorTotal').text(FormatoNumero(saldo, 2));
descuento = ToDouble($('#C_TxtDescuento').val()) IVA = ToDouble($('#C_TxtIVA').val())
} }
} }

16
Bancos/DepositosCaja.aspx.vb
View File

@@ -165,14 +165,20 @@ Partial Class Bancos_DepositosCaja
If ChkFaltante.Checked Then If ChkFaltante.Checked Then
CveSubProyecto = DdlSubProyectoDeposito.SelectedValue.ToEntero CveSubProyecto = DdlSubProyectoDeposito.SelectedValue.ToEntero
CveClasificacion = DdlClasificacion.SelectedValue.ToEntero CveClasificacion = DdlClasificacion.SelectedValue.ToEntero
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 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 OcurrioError = True
End If
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
End If End If
If ChkDescuento.Checked Then If ChkDescuento.Checked Then