diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb index 5e3f93992..3c54087eb 100644 --- a/Bancos/IE.aspx.vb +++ b/Bancos/IE.aspx.vb @@ -2506,25 +2506,16 @@ Partial Class Bancos_IE End If Dep.Dispose() - - - If CveOCSolicitudAnticipo > 0 Then - - - - Dim ObjOC As New ClsOC If ObjOC.GetOCAnticipoSaldo(CveOCSolicitudAnticipo, UsuarioActual.CveEmpresa) Then - SaldoOCAnticipo = ObjOC.DtResultados(0)("Saldo").ToString.ToDecimal.Round(2) + SaldoOCAnticipo = ObjOC.DtResultados(0)("Saldo").ToString.ToDecimal.RoundSQL(2) Else SaldoOCAnticipo = 0 End If ObjOC.Dispose() Dim ImporteComparacion As Decimal = TxtImporte.Text.ToDecimal - - ' If ChkPagarPesos.Checked Then ImporteComparacion = ImporteOriginalDolaras End If