-
-
+
-
-
-
+
+
+
+
+
+
+
+
@@ -295,6 +314,26 @@
debugger;
} else {
+ //debugger;
+ }
+ }
+ var txtcomision = ToDouble($('#C_TxtIVA').val());
+ if (txtcomision != 0) {
+ var comisionNegativa = 0;
+ if (txtcomision < 0) {
+ comisionNegativa = txtcomision * -1;
+ }
+ if (comisionNegativa > saldo) {
+ $('#C_TxtIVA').val(0);
+ comision = 0;
+ descuento = 0;
+ txtcomision = 0;
+ alert("No es posible poner un importe IVA superior a lo seleccionado");
+ saldo = 0;
+ $('#C_lblValorTotal').text(FormatoNumero(ValorTotalSeleccionado, 2));
+ debugger;
+ } else {
+
//debugger;
}
}
@@ -351,7 +390,25 @@
}
if (comisionNegativa > ValorTotalSeleccionado) {
$('#C_TxtDescuento').val(descuento)
- alert("No es posible poner una comision superior a lo seleccionado")
+ alert("No es posible poner un descuento superior a lo seleccionado")
+ } else {
+ saldo = ValorTotalSeleccionado + comision2 + comision;
+ $('#C_lblValorTotal').text(FormatoNumero(saldo, 2));
+ descuento = ToDouble($('#C_TxtDescuento').val())
+ }
+
+ }
+
+
+ function txtSumaIVA(txt) {
+ var comision2 = ToDouble($('#C_TxtIVA').val());
+ var comisionNegativa = 0;
+ if (comision2 < 0) {
+ comisionNegativa = comision2 * -1;
+ }
+ if (comisionNegativa > ValorTotalSeleccionado) {
+ $('#C_TxtIVA').val(descuento)
+ alert("No es posible poner un IVA superior a lo seleccionado")
} else {
saldo = ValorTotalSeleccionado + comision2 + comision;
$('#C_lblValorTotal').text(FormatoNumero(saldo, 2));
@@ -367,12 +424,16 @@
$('#divSubProyecto').css("display", "block");
$('#LblClasificacion').css("display", "block");
$('#divClasificacion').css("display", "block");
+ $('#DivIVA').css("display", "block");
+
} else {
$('#DivComision').css("display", "none");
$('#LblSubproyecto').css("display", "none");
$('#divSubProyecto').css("display", "none");
$('#LblClasificacion').css("display", "none");
$('#divClasificacion').css("display", "none");
+ $('#DivIVA').css("display", "none");
+
}
}
diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index ef5e7ca4e..a0f7165c5 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -23,6 +23,8 @@ Partial Class Bancos_DepositosCaja
txtFechaF.Text = Now.ToShortDateString
TxtComision.Attributes.Add("onKeyUp", "txtSuma(event);")
TxtDescuento.Attributes.Add("onKeyUp", "txtSumaDescuento(event);")
+ TxtIVA.Attributes.Add("onKeyUp", "txtSumaIVA(event);")
+
CargaCuentas()
ChkFaltante.Attributes.Add("onclick", "CheckFaltante(this);")
@@ -88,6 +90,7 @@ Partial Class Bancos_DepositosCaja
Dim TotalImportePrePoliza As Decimal
Dim Comision As Decimal = TxtComision.Text.ToDecimal
Dim Descuento As Decimal = TxtDescuento.Text.ToDecimal
+ Dim IVA As Decimal = TxtIVA.Text.ToDecimal
For Each Gvr As GridViewRow In GvFacturas.Rows
@@ -101,7 +104,7 @@ Partial Class Bancos_DepositosCaja
TotalImportePrePoliza = TotalImporte
If Comision <> 0 Then
- TotalImporte = TotalImporte + Comision + Descuento
+ TotalImporte = TotalImporte + Comision + Descuento + IVA
'Comision = -(Comision) ' se inverte el valor, va cargada
'Descuento = -(Descuento) ' se inverte el valor, va cargada
If DdlSubProyectoDeposito.SelectedValue.ToEntero = -1 Or DdlClasificacion.SelectedValue.ToEntero = -1 Then
@@ -166,6 +169,10 @@ Partial Class Bancos_DepositosCaja
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
+
+ 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
If ChkDescuento.Checked Then