diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index 6fd0f5399..ddc112746 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -16263,11 +16263,15 @@ Partial Class Compras_Compras Dim TempSubTotal, TempDescuentos, TempIVA, TempSubTotal2, TempRetIVA, TempRetISR, TempTotal, DifTotales, TempIEPS As Double 'Dim TempPorcentajeRetIVA = LblRetIVA.Text.ToDouble / 100 'Dim TempPorcentajeRetISR = LblRetISR.Text.ToDouble / 100 + Dim Amortizacion As Decimal = 0 + If UsuarioActual.CveEmpresa = 119 Then + Amortizacion = LblAmortizacion.Text.Trim.ToDecimal + End If TempSubTotal = TxtSubTotal.Text.ToDouble SubTotalOriginal = TxtSubTotal.Text.ToDouble SubTotal2Original = TxtSubTotal2.Text.ToDouble - TempDescuentos = TxtDescuento.Text.Trim.ToDouble + LblAmortizacion.Text.Trim.ToDouble + TempDescuentos = TxtDescuento.Text.Trim.ToDouble + Amortizacion TempSubTotal2 = TempSubTotal - TempDescuentos TempIVA = TxtIVA.Text.ToDouble TempIEPS = TxtIEPS.Text.ToDouble