diff --git a/App_Code/ClsCompProveedores.vb b/App_Code/ClsCompProveedores.vb index cc81e5ff1..56585d092 100644 --- a/App_Code/ClsCompProveedores.vb +++ b/App_Code/ClsCompProveedores.vb @@ -292,7 +292,7 @@ Public Class ClsCompProveedores Return Retorno End Function - Public Function GetProveedores(TipoConsulta As TipoConsulta, CveProveedor As Integer, Codigo As String, RazonSocial As String, NombreComercial As String, + Public Function GetProveedores(tipoConsulta As TipoConsulta, CveProveedor As Integer, Codigo As String, RazonSocial As String, NombreComercial As String, NombreCorto As String, RFC As String, ContactoNombre As String, Telefono As String, Estatus As Integer, CveEmpresa As Integer, Optional CveTipoProveedor As Integer = -1, Optional CveUsuarioResponsable As Integer = -1, Optional CveMonedaPreferente As Integer = -1, Optional CveProveedorClasificacion As Integer = -1) As Boolean @@ -301,7 +301,7 @@ Public Class ClsCompProveedores DataAdapter("PA_Comp_ProveedoresGet") With SqlAdapter.SelectCommand.Parameters - .Add("@TipoConsulta", SqlDbType.Int).Value = TipoConsulta + .Add("@TipoConsulta", SqlDbType.Int).Value = tipoConsulta .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor .Add("@Codigo", SqlDbType.VarChar).Value = Codigo .Add("@RazonSocial", SqlDbType.VarChar).Value = RazonSocial @@ -321,7 +321,7 @@ Public Class ClsCompProveedores Try SqlAdapter.Fill(Data) - If Data.Rows.Count = 1 Then + If Data.Rows.Count = 1 And tipoConsulta <> TipoConsulta.ParaGlobalDT Then Me.CveProveedor = Data.Rows(0)("CveProveedor").ToString.ToEntero Me.Codigo = Data.Rows(0)("Codigo").ToString Me.RazonSocial = Data.Rows(0)("RazonSocial").ToString