Clsventas CambioClientesVendedor CveCliente a Entero

2023-01-30 08:45:28 -07:00
parent d2396eb112
commit d01e9c0a93
1 changed files with 1 additions and 1 deletions
--- a/App_Code/ClsVentas.vb
+++ b/App_Code/ClsVentas.vb
@@ -5725,7 +5725,7 @@ Public Class ClsVentas
        Dim Retorno As Boolean = False
        DataAdapter("PA_Vta_ClientesVendedorCambio")
        With SqlAdapter.SelectCommand.Parameters
-            .Add("@CveCliente", SqlDbType.VarChar).Value = CveCliente
+            .Add("@CveCliente", SqlDbType.Int).Value = CveCliente
            .Add("@CveVendedor", SqlDbType.Int).Value = CveVendedor
            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
        End With