From 8070b0e6fe4d050e2a2eaba05489d4c9702729d9 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Sat, 23 Mar 2024 15:54:37 -0700
Subject: [PATCH] - mejora en unitario

---
 App_Code/ClsProductosServicios.vb | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/App_Code/ClsProductosServicios.vb b/App_Code/ClsProductosServicios.vb
index 05d871ea6..c9bcb106e 100644
--- a/App_Code/ClsProductosServicios.vb
+++ b/App_Code/ClsProductosServicios.vb
@@ -906,8 +906,6 @@ Public Class ClsProductosServicios
         DataAdapter("PA_Inv_UltimoPrecioCompraGet")
 
         With SqlAdapter.SelectCommand.Parameters
-
-
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
             .Add("@CvePS", SqlDbType.Int).Value = CvePS
             .Add("@PU", SqlDbType.Money).Direction = ParameterDirection.Output
@@ -915,7 +913,7 @@ Public Class ClsProductosServicios
 
         Try
             SqlAdapter.Fill(Data)
-            Retorno = CDbl(SqlAdapter.SelectCommand.Parameters("@PU").Value)
+            Retorno = SqlAdapter.SelectCommand.Parameters("@PU").Value.ToString.ToDecimal
 
         Catch Ex1 As SqlException
             Me.OnError("Ocurrió un error al obtener el precio unitario.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())