diff --git a/App_Code/modExtensiones.vb b/App_Code/modExtensiones.vb
index 9a18a5716..fbe97480e 100644
--- a/App_Code/modExtensiones.vb
+++ b/App_Code/modExtensiones.vb
@@ -968,25 +968,25 @@ Namespace Extensiones
 
 
         <Runtime.CompilerServices.Extension()>
-        Public Function RoundAD(Valor As Double, Optional Decimales As Integer = 2) As Double
-            Return Math.Round(Valor, Decimales)
-        End Function
-        <Runtime.CompilerServices.Extension()>
-        Public Function RoundAD(Valor As Decimal, Optional Decimales As Integer = 2) As Decimal
-            Return Math.Round(Valor, Decimales)
+        Public Function RoundAD(Valor As Double, Optional Decimales As Integer = 2) As Double
+            Return Math.Round(Valor, Decimales, MidpointRounding.AwayFromZero)
+        End Function
+        <Runtime.CompilerServices.Extension()>
+        Public Function RoundAD(Valor As Decimal, Optional Decimales As Integer = 2) As Decimal
+            Return Math.Round(Valor, Decimales, MidpointRounding.AwayFromZero)
         End Function
 
         <Runtime.CompilerServices.Extension()>
-        Public Function RoundSQL(Valor As Double, Optional Decimales As Integer = 2) As Double
-            'Return Math.Round(Valor, Decimales, MidpointRounding.AwayFromZero)
-            'primero, se redondea a 4, para que concuerde al redondeo de sql, si se redondea a 2 decimales por ejemplo
-            Return If(Decimales < 4, Math.Round(Math.Round(Valor, 4, MidpointRounding.AwayFromZero), Decimales, MidpointRounding.AwayFromZero), Math.Round(Valor, Decimales, MidpointRounding.AwayFromZero))
+        Public Function RoundSQL(Valor As Double, Optional Decimales As Integer = 2) As Double
+            'Return Math.Round(Valor, Decimales, MidpointRounding.AwayFromZero)
+            'primero, se redondea a 4, para que concuerde al redondeo de sql, si se redondea a 2 decimales por ejemplo
+            Return Math.Round(Valor, Decimales, MidpointRounding.AwayFromZero)
         End Function
 
         <Runtime.CompilerServices.Extension()>
         Public Function RoundSQL(Valor As Decimal, Optional Decimales As Integer = 2) As Decimal
             'primero, se redondea a 4, para que concuerde al redondeo de sql
-            Return If(Decimales < 4, Math.Round(Math.Round(Valor, 4, MidpointRounding.AwayFromZero), Decimales, MidpointRounding.AwayFromZero), Math.Round(Valor, Decimales, MidpointRounding.AwayFromZero))
+            Return Math.Round(Valor, Decimales, MidpointRounding.AwayFromZero)
         End Function
         <Runtime.CompilerServices.Extension()>
         Public Function Abs(Valor As Double) As Double