From 198c9a408d2dbcc643cfa967354168253dc20f3f Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Tue, 22 Feb 2022 06:53:42 -0700
Subject: [PATCH] retrn value

---
 App_Code/ClsCRM.vb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/App_Code/ClsCRM.vb b/App_Code/ClsCRM.vb
index 5db431cb1..cdad985da 100644
--- a/App_Code/ClsCRM.vb
+++ b/App_Code/ClsCRM.vb
@@ -447,11 +447,11 @@ Public Class ClsCRM
             .Add("@Correo", SqlDbType.VarChar).Value = Correo
             .Add("@CveGiroClasificacion", SqlDbType.Int).Value = CveGiroClasificacion
 
-            .Add("@RETURN_VALUE", SqlDbType.Int).Direction = ParameterDirection.ReturnValue
+            .Add("@CveEmpresaCRM", SqlDbType.Int).Direction = ParameterDirection.ReturnValue
         End With
         Try
             SqlAdapter.Fill(Data)
-            CveEmpresaCRM = SqlAdapter.SelectCommand.Parameters("@RETURN_VALUE").Value.ToString().ToEntero()
+            CveEmpresaCRM = SqlAdapter.SelectCommand.Parameters("@CveEmpresaCRM").Value.ToString().ToEntero()
         Catch ex As Exception
             OnError("Ocurrió un error al agregar la Empresa CRM.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
         End Try